> 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
