Revision: | 45 |
Committed: | Tue Dec 6 10:33:46 2016 UTC (7 years, 4 months ago) by tony |
File size: | 369 byte(s) |
Log Message: | Committing updates for Release R2-0-0 |
# | Content |
---|---|
1 | program LocalDBExample; |
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, Unit2, ibexpress; |
11 | |
12 | {$R *.res} |
13 | |
14 | begin |
15 | Application.Initialize; |
16 | Application.CreateForm(TForm1, Form1); |
17 | Application.CreateForm(TSelectDeptDlg, SelectDeptDlg); |
18 | Application.Run; |
19 | end. |
20 |