diff options
| -rw-r--r-- | src/corelib/fpg_utils.pas | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/corelib/fpg_utils.pas b/src/corelib/fpg_utils.pas index 3300a07f..822051a5 100644 --- a/src/corelib/fpg_utils.pas +++ b/src/corelib/fpg_utils.pas @@ -132,7 +132,9 @@ end; function fpgDeleteFile(const FileName: TfpgString): Boolean; begin - Result := DeleteFile(fpgToOSEncoding(FileName)); + { Don't remove 'SysUtils.' prefix, it is required under Windows, other + FPC tries to use Windows.DeleteFile API - which is wrong } + Result := SysUtils.DeleteFile(fpgToOSEncoding(FileName)); end; function fpgDirectoryExists(const ADirectory: TfpgString): Boolean; |