View Issue Details

IDProjectCategoryView StatusLast Update
0002079JEDI VCL00 JVCL Componentspublic2004-08-21 05:31
ReportermaxpAssigned ToAHUser 
PrioritynormalSeveritymajorReproducibilityalways
Status resolvedResolutionfixed 
Product Version 
Target VersionFixed in Version 
Summary0002079: SameFileName is invalid!
DescriptionSameFileName function from JvJCLUtils (JVCL package JVCL3-2004-08-17.zip):
function SameFileName(const Fn1, Fn2: string): Boolean;
begin
  Result := CompareText(Fn1, Fn2) <> 0;
end;

returns TRUE for DIFFERENT file names and FALSE for SAME ones. I think it is not correct, at least for TargetFileName function:
function TargetFileName(const FileName: TFileName): TFileName;
begin
  Result := FileName;
  if SameFileName(ExtractFileExt(FileName), '.lnk') then
    if ResolveLink(GetAppHandle, FileName, Result) <> 0 then
      raise EJVCLException.CreateResFmt(@RsECantGetShortCut, [FileName]);
end;

It is obvious that SameFileName should return TRUE for same files!
TagsNo tags attached.

Activities

AHUser

2004-08-21 05:31

developer   ~0005064

Fixed in CVS.

Issue History

Date Modified Username Field Change
2004-08-21 03:34 maxp New Issue
2004-08-21 05:31 AHUser Status new => resolved
2004-08-21 05:31 AHUser Resolution open => fixed
2004-08-21 05:31 AHUser Assigned To => AHUser
2004-08-21 05:31 AHUser Note Added: 0005064