Rev 8 | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
8 | daniel-mar | 1 | program ShowTime32; |
2 | daniel-mar | 2 | |
25 | daniel-mar | 3 | (* |
4 | * Plumbers Don't Wear Ties - Inofficial Win32 Player |
||
5 | * Copyright 2017 - 2020 Daniel Marschall, ViaThinkSoft |
||
6 | * |
||
7 | * Licensed under the Apache License, Version 2.0 (the "License"); |
||
8 | * you may not use this file except in compliance with the License. |
||
9 | * You may obtain a copy of the License at |
||
10 | * |
||
11 | * http://www.apache.org/licenses/LICENSE-2.0 |
||
12 | * |
||
13 | * Unless required by applicable law or agreed to in writing, software |
||
14 | * distributed under the License is distributed on an "AS IS" BASIS, |
||
15 | * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. |
||
16 | * See the License for the specific language governing permissions and |
||
17 | * limitations under the License. |
||
18 | *) |
||
19 | |||
2 | daniel-mar | 20 | uses |
21 | Forms, |
||
22 | Main in 'Main.pas' {MainForm}, |
||
23 | Game in 'Game.pas', |
||
24 | GameBinStruct in '..\FileFormat\Delphi\GameBinStruct.pas'; |
||
25 | |||
26 | {$R *.res} |
||
27 | |||
28 | begin |
||
29 | Application.Initialize; |
||
30 | Application.CreateForm(TMainForm, MainForm); |
||
31 | Application.Run; |
||
32 | end. |