Details |
Last modification |
View Log
| Rev |
Author |
Line No. |
Line |
| 6 |
kaklik |
1 |
program Project1;
|
|
|
2 |
|
|
|
3 |
uses
|
|
|
4 |
Forms,
|
|
|
5 |
Unit1 in '..\pokus1\Unit1.pas' {Teplomer};
|
|
|
6 |
|
|
|
7 |
{$R *.res}
|
|
|
8 |
|
|
|
9 |
begin
|
|
|
10 |
Application.Initialize;
|
|
|
11 |
Application.CreateForm(TTeplomer, Teplomer);
|
|
|
12 |
Application.Run;
|
|
|
13 |
end.
|