UPD: Save exceptions log to user directory.

This commit is contained in:
cobines 2009-11-12 23:34:52 +00:00
commit 6ec69db26f

View file

@ -1732,7 +1732,7 @@ var
begin
// Write exception backtrace to a file.
filename := ExtractOnlyFileName(Application.ExeName) + '.err';
filename := gpIniDir + ExtractOnlyFileName(Application.ExeName) + '.err';
AssignFile(f, filename);
if not FileExists(filename) then
Rewrite(f)