|
@@ -110,7 +110,7 @@ begin
|
|
Result:=False;
|
|
Result:=False;
|
|
ADrv:=ExtractFileDrive(Dir);
|
|
ADrv:=ExtractFileDrive(Dir);
|
|
if (ADrv<>'') and
|
|
if (ADrv<>'') and
|
|
- (not DirectoryExists(ADrv)+DirectorySeparator)
|
|
|
|
|
|
+ (not DirectoryExists(ADrv+DirectorySeparator))
|
|
{$IFNDEF FORCEDIR_NO_UNC_SUPPORT} and (not IsUncDrive(ADrv)){$ENDIF} then
|
|
{$IFNDEF FORCEDIR_NO_UNC_SUPPORT} and (not IsUncDrive(ADrv)){$ENDIF} then
|
|
Exit;
|
|
Exit;
|
|
if Dir='' then
|
|
if Dir='' then
|