Explorar el Código

* And -> or. Fixes issue #41573

Michaël Van Canneyt hace 2 semanas
padre
commit
ebfc7485b1
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      packages/vcl-compat/src/system.ioutils.pp

+ 1 - 1
packages/vcl-compat/src/system.ioutils.pp

@@ -1516,7 +1516,7 @@ end;
 
 class function TPath.Exists(const aPath: string; aFollowLink: Boolean): Boolean;
 begin
-  Result:=TDirectory.Exists(aPath, aFollowLink) and TFile.Exists(aPath, aFollowLink);
+  Result:=TDirectory.Exists(aPath, aFollowLink) or TFile.Exists(aPath, aFollowLink);
 end;
 
 class function TPath.GetAttributes(const aPath: string; aFollowLink: Boolean