|
@@ -200,6 +200,10 @@ begin
|
|
end;
|
|
end;
|
|
|
|
|
|
begin
|
|
begin
|
|
|
|
+ {$IFDEF DEBUG}
|
|
|
|
+ ReportMemoryLeaksOnShutdown := True;
|
|
|
|
+ {$ENDIF}
|
|
|
|
+
|
|
InitialCurDir := GetCurrentDir;
|
|
InitialCurDir := GetCurrentDir;
|
|
if not SetCurrentDir(PathExtractDir(NewParamStr(0))) then
|
|
if not SetCurrentDir(PathExtractDir(NewParamStr(0))) then
|
|
SetCurrentDir(GetSystemDir);
|
|
SetCurrentDir(GetSystemDir);
|