source: trunk/Packages/CoolStreaming/Demo/DynNumber/DynNumberDemo.lpr

Last change on this file was 2, checked in by chronos, 9 years ago
  • Added: TPakFile class for extraction PAK files from original game.
File size: 572 bytes
Line 
1program DynNumberDemo;
2
3{$mode objfpc}{$H+}
4
5uses
6 {$IFDEF UNIX}{$IFDEF UseCThreads}
7 cthreads,
8 {$ENDIF}{$ENDIF}
9 Interfaces, SysUtils, // this includes the LCL widgetset
10 Forms, UMainForm, CoolStreaming
11 { you can add units after this };
12
13{$R *.res}
14
15const
16 HeapTraceLog = 'heaptrclog.trc';
17begin
18 // Heap trace
19 DeleteFile(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
20 SetHeapTraceOutput(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
21
22 Application.Initialize;
23 Application.CreateForm(TMainForm, MainForm);
24 Application.Run;
25end.
26
Note: See TracBrowser for help on using the repository browser.