forked from kegge13/BistroMath
-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathBistroMath.lpr
More file actions
37 lines (33 loc) · 780 Bytes
/
BistroMath.lpr
File metadata and controls
37 lines (33 loc) · 780 Bytes
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
program BistroMath;
{$I BistroMath_opt.inc}
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
cmem,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
SysUtils, Forms, tachartlazaruspkg, lazcontrols, runtimetypeinfocontrols,
WellForm,
KlemLogo;
{$R *.res}
begin
{$IFDEF HEAPTRACE}
{$IFDEF DEBUG}
{$IFDEF HEAPTRACE_REPORT}
if FileExists('bistromath.trc') then
DeleteFile('bistromath.trc');
SetHeapTraceOutput('bistromath.trc');
{$ENDIF}
{$ENDIF DEBUG}
{$ELSE}
{$if declared(useHeapTrace)}
useHeapTrace := False;
{$endIf}
{$ENDIF HEAPTRACE}
RequireDerivedFormResource:= True;
Application.Scaled:=True;
Application.Initialize;
Application.CreateForm(TAnalyseForm, AnalyseForm);
Application.Run;
end.