-
Notifications
You must be signed in to change notification settings - Fork 20
/
Copy pathsoulEngine.dpr
66 lines (47 loc) · 1.18 KB
/
soulEngine.dpr
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
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
program soulEngine;
{$I 'sDef.inc'}
uses
Forms,
Dialogs,
SysUtils,
uMain in 'uMain.pas' {__fMain},
uMainForm in 'uMainForm.pas' {__mainForm},
uPHPMod in 'uPHPMod.pas' {phpMOD: TDataModule},
uGuiScreen in 'uGuiScreen.pas',
uApplication in 'uApplication.pas',
{$IFDEF VS_EDITOR}
uPHPCatButtons in 'uPHPCatButtons.pas',
uVSEditor in 'uVSEditor.pas',
{$ENDIF}
regGui in 'regGui.pas';
{$R *.res}
{
$IFDEF ADD_HTMLREAD
uHTMLView in 'units\uHTMLView.pas',
$ENDIF
$IFDEF VS_EDITOR
uPHPCatButtons in 'units\uPHPCatButtons.pas',
uVSEditor in 'units\uVSEditor.pas',
$ENDIF
}
{var
isPSE: Boolean;
}
begin
Application.Initialize;
Application.MainFormOnTaskBar := false;
Application.ShowMainForm := false;
Application.CreateForm(T__mainForm, __mainForm);
Application.CreateForm(T__fMain, __fMain);
Application.CreateForm(TphpMOD, phpMOD);
{$IFDEF VS_EDITOR}
Application.CreateForm(TphpVSEditor, phpVSEditor);
{$ENDIF}
{$IFDEF VS_EDITOR}
Application.CreateForm(TPHPCatButtons, PHPCatButtons);
{$ENDIF}
T__fMain.loadEngine(dllPHPPath);
//if not isPSE then
__mainForm.FormActivate(__mainForm);
Application.Run;
end.