Revision: | 17 |
Committed: | Sat Dec 28 19:22:24 2013 UTC (10 years, 10 months ago) by tony |
File size: | 454 byte(s) |
Log Message: | Committing updates for Release R1-0-5 |
# | 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, Unit3; |
11 | |
12 | {$R *.res} |
13 | |
14 | begin |
15 | Application.Initialize; |
16 | Application.CreateForm(TForm1, Form1); |
17 | Application.CreateForm(TEditEmployeeDlg, EditEmployeeDlg); |
18 | Application.CreateForm(TAddEmployeeDlg, AddEmployeeDlg); |
19 | Application.Run; |
20 | end. |
21 |