X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Feditor%2FEditor.lpr;h=3889b5109fd514598830302435c888ccfe509be8;hb=352afa5b7b27f7783344f1878fcfa1fae1001db1;hp=e5d615625dc332d9094a59823bba66049db33924;hpb=67cddfbb3e682ca99f9b9a2e98e87332bd5c30be;p=d2df-editor.git

diff --git a/src/editor/Editor.lpr b/src/editor/Editor.lpr
index e5d6156..3889b51 100644
--- a/src/editor/Editor.lpr
+++ b/src/editor/Editor.lpr
@@ -78,6 +78,13 @@ begin
   Application.AddOnExceptionHandler(H.ExceptionHandler, True);
   Application.Initialize();
 
+{$IF DECLARED(UseHeapTrace)}
+  (* http://wiki.freepascal.org/heaptrc *)
+  GlobalSkipIfNoLeaks := True;
+  //SetHeapTraceOutput('EditorLeaks.log');
+  //HaltOnError := False;
+{$ENDIF}
+
   Application.CreateForm(TMainForm, MainForm);
   Application.CreateForm(TOptionsForm, OptionsForm);
   Application.CreateForm(TAboutForm, AboutForm);