1 |
program project1; |
2 |
|
3 |
{$mode objfpc}{$H+} |
4 |
|
5 |
uses |
6 |
{$IFDEF UNIX}{$IFDEF UseCThreads} |
7 |
cthreads, |
8 |
{$ENDIF}{$ENDIF} |
9 |
Interfaces, // this includes the LCL widgetset |
10 |
ibexpress,Forms, Unit1, Unit2, Unit3, ListUsersUnit, LimboTransactionsUnit |
11 |
{ you can add units after this }; |
12 |
|
13 |
{$R *.res} |
14 |
|
15 |
begin |
16 |
RequireDerivedFormResource := True; |
17 |
Application.Initialize; |
18 |
Application.CreateForm(TForm1, Form1); |
19 |
Application.CreateForm(TForm2, Form2); |
20 |
Application.CreateForm(TForm3, Form3); |
21 |
Application.CreateForm(TListUsersForm, ListUsersForm); |
22 |
Application.CreateForm(TLimboTransactionsForm, LimboTransactionsForm); |
23 |
Application.Run; |
24 |
end. |
25 |
|