Revision: | 37 |
Committed: | Mon Feb 15 14:44:25 2016 UTC (8 years, 9 months ago) by tony |
File size: | 442 byte(s) |
Log Message: | Committing updates for Release R1-4-0 |
# | Content |
---|---|
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 | Forms, Unit1, ibexpress, Unit2 |
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(TSelectSQLResults, SelectSQLResults); |
20 | Application.Run; |
21 | end. |
22 |