source: trunk/VCSCommander.lpr

Last change on this file was 24, checked in by chronos, 7 months ago
  • Fixed: Test cases executed with FormTests form from Common package.
File size: 755 bytes
Line 
1program VCSCommander;
2
3uses
4 {$IFDEF UNIX}
5 cthreads, clocale,
6 {$ENDIF}
7 Interfaces, // this includes the LCL widgetset
8 Forms, FormMain, Core, Common, FormBrowse, VCS,
9 FormFavorites, FormSettings, FormConsole, Subversion, Project, SysUtils,
10 FormCommit, FormCheckout, Bazaar, Backend, FormLog,
11 FormProjectGroup, Test
12 { you can add units after this };
13
14{$R *.res}
15
16{$IFDEF DEBUG}
17const
18 HeapTraceLog = 'heaptrclog.trc';
19{$ENDIF}
20
21
22begin
23 {$IFDEF DEBUG}
24 // Heap trace
25 DeleteFile(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
26 SetHeapTraceOutput(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
27 {$ENDIF}
28
29 RequireDerivedFormResource := True;
30 Application.Initialize;
31 Application.CreateForm(TCore, Core.Core);
32 Application.Run;
33end.
34
Note: See TracBrowser for help on using the repository browser.