Revision: | 45 |
Committed: | Tue Dec 6 10:33:46 2016 UTC (7 years, 11 months ago) by tony |
File size: | 413 byte(s) |
Log Message: | Committing updates for Release R2-0-0 |
# | Content |
---|---|
1 | program TwoDArrayExample; |
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 |
11 | { you can add units after this }; |
12 | |
13 | {$R *.res} |
14 | |
15 | begin |
16 | Application.Title := 'Arrays'; |
17 | RequireDerivedFormResource := True; |
18 | Application.Initialize; |
19 | Application.CreateForm(TForm1, Form1); |
20 | Application.Run; |
21 | end. |
22 |