Last change
on this file was 14, checked in by george, 15 years ago |
- Upraveno: Rozšíření sady tříd objektových typů.
|
File size:
839 bytes
|
Line | |
---|
1 | program TestApplication;
|
---|
2 |
|
---|
3 | uses
|
---|
4 | Forms,
|
---|
5 | UMainForm in 'UMainForm.pas' {MainForm},
|
---|
6 | UInterfacedBits in 'UInterfacedBits.pas',
|
---|
7 | UObjectTypeBase in 'Level 1\UObjectTypeBase.pas',
|
---|
8 | UObjectBoolean in 'Level 1\UObjectBoolean.pas',
|
---|
9 | UObjectByte in 'Level 1\UObjectByte.pas',
|
---|
10 | UObjectDateTime in 'Level 1\UObjectDateTime.pas',
|
---|
11 | UObjectDouble in 'Level 1\UObjectDouble.pas',
|
---|
12 | UObjectChar in 'Level 1\UObjectChar.pas',
|
---|
13 | UObjectInteger in 'Level 1\UObjectInteger.pas',
|
---|
14 | UObjectString in 'Level 2\UObjectString.pas',
|
---|
15 | UFileSystem in 'Level 2\UFileSystem.pas',
|
---|
16 | UObjectPoint in 'Level 2\UObjectPoint.pas',
|
---|
17 | USystem in 'Level 3\USystem.pas',
|
---|
18 | UObjectStringList in 'Level 3\UObjectStringList.pas';
|
---|
19 |
|
---|
20 | {$R *.res}
|
---|
21 |
|
---|
22 | begin
|
---|
23 | Application.Initialize;
|
---|
24 | Application.CreateForm(TMainForm, MainForm);
|
---|
25 | Application.Run;
|
---|
26 | end.
|
---|
Note:
See
TracBrowser
for help on using the repository browser.