diff options
Diffstat (limited to '')
| -rw-r--r-- | src/base/UPlatform.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/base/UPlatform.pas b/src/base/UPlatform.pas index e88e45b2..0942ec7b 100644 --- a/src/base/UPlatform.pas +++ b/src/base/UPlatform.pas @@ -85,7 +85,7 @@ end; *} function TPlatform.GetExecutionDir(): string; begin - Result := ExtractFilePath(ParamStr(0)); + Result := ExpandFileName(ExtractFilePath(ParamStr(0))); end; (** |