Ignore:
Timestamp:
Feb 13, 2012, 4:07:34 PM (13 years ago)
Author:
chronos
Message:
  • Modified: Partialy solved project open/close/save management.
Location:
trunk/IDE
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/IDE

    • Property svn:ignore

      •  

        old new  
        44Transpascal.lps
        55Transpascal.exe
         6heaptrclog.trc

  • trunk/IDE/Transpascal.lpr

    r35 r36  
    1616{$R *.res}
    1717
     18{$IFDEF DEBUG}
    1819const
    1920  HeapTraceLog = 'heaptrclog.trc';
     21{$ENDIF}
    2022
    2123begin
    2224  Application.Title := 'Transpascal IDE';
     25  {$IFDEF DEBUG}
    2326  // Heap trace
    24 //  DeleteFile(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
    25 //  SetHeapTraceOutput(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
     27  DeleteFile(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
     28  SetHeapTraceOutput(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
     29  {$ENDIF}
    2630
    2731  Application.Initialize;
Note: See TracChangeset for help on using the changeset viewer.