fix(windows): place TODO for file access check

This commit is contained in:
Ross 2022-07-25 14:03:06 +10:00
parent 16a63d84ea
commit d0456e724f

View file

@ -161,6 +161,7 @@ begin
FTempOutPath := buf; FTempOutPath := FTempOutPath + '\';
inf := nil;
// #TODO 6570Check we can access the file and display an error if we can't, then exit.
FZip := TZipFile.Create;
try
FZip.Open(FileName, TZipMode.zmRead);