paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-27 16:40:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazFileUtils: FileIsReadable on Windows should only return True if the file actually exists.

Browse Source 
git-svn-id: trunk@49543 -
This commit is contained in:
bart 2015-07-14 10:25:53 +00:00
parent f53444d668
commit 8f7215b840
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazutils/winlazfileutils.inc
View File

@ -1045,7 +1045,7 @@ end;
function FileIsReadable(const AFilename: string): boolean;
begin
Result:=true;
Result:=FileExistsUTF8(AFilename);
end;
function FileIsWritable(const AFilename: string): boolean;