> Any idea ?

Just compared function FindFirst of D7 and D10, they are different.

D10
const
  faSpecial = faHidden or faSysFile or faDirectory;

D7
const
  faSpecial = faHidden or faSysFile or faVolumeID or faDirectory;

Also const faVolumeID is tagged as deprecated in D10, and commented "not used 
in Win32"?
Bug or not a bug? 

Alternate:

function IsDirectory(const Path : String) : Boolean;
var
    Attr : DWORD;
begin
    Attr := GetFileAttributes(PChar(ExcludeTrailingPathDelimiter(Path)));
    Result := (Attr <> MaxDWord) and ((Attr and FILE_ATTRIBUTE_DIRECTORY) <> 0);
end;


Francois PIETTE wrote:
> In ICS-V6, there is a function IsDirectory located in
> OverbyteIcsHttpSrv. IsDirectory is based on SysUtils.FindFirst. So
> far so good. The problem is the behaviour difference between D7 and
> D2006. When supplying "c:" as root directory, D2006 list it as a
> directory because IsDirectory returns TRUE. But when compiled with D7
> the same program doesn't list the directory because IsDirectory (and
> FindFirst) say it is not a directory. 
> 
> Very strange behaviour change !
> Any idea ?
> 
> Contribute to the SSL Effort. Visit
> http://www.overbyte.be/eng/ssl.html --
> [EMAIL PROTECTED]
> http://www.overbyte.be
-- 
To unsubscribe or change your settings for TWSocket mailing list
please goto http://www.elists.org/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be

Reply via email to