cdar
diff CDAR.dpr @ 0:ef71164288c1
begin of using hg for cdar
author | "Meillo r e t u r n s <meillo@marmaro.de>" |
---|---|
date | Sun, 03 Dec 2006 21:54:43 +0100 |
parents | |
children |
line diff
1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000 1.2 +++ b/CDAR.dpr Sun Dec 03 21:54:43 2006 +0100 1.3 @@ -0,0 +1,45 @@ 1.4 +{ 1.5 + Copyright (C) 2003 &> by Meillo r e t u r n s 1.6 + 1.7 + This program is free software; you can redistribute it and/or modify 1.8 + it under the terms of the GNU General Public License as published by 1.9 + the Free Software Foundation; either version 2 of the License, or 1.10 + (at your option) any later version. 1.11 + 1.12 + This program is distributed in the hope that it will be useful, 1.13 + but WITHOUT ANY WARRANTY; without even the implied warranty of 1.14 + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 1.15 + GNU General Public License for more details. 1.16 + 1.17 + You should have received a copy of the GNU General Public License along 1.18 + with this program; if not, write to the Free Software Foundation, Inc., 1.19 + 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. 1.20 +} 1.21 +program CDAR; 1.22 + 1.23 +uses 1.24 + Forms, 1.25 + unit_Welcome in 'unit_Welcome.pas' {form_Welcome}, 1.26 + unit_Start in 'unit_Start.pas' {form_Start}, 1.27 + unit_Editor in 'unit_Editor.pas' {form_Editor}, 1.28 + modul_allgemein in 'modul_allgemein.pas', 1.29 + unit_Editor_ws in 'unit_Editor_ws.pas' {form_Editor_ws}, 1.30 + unit_Editor_as in 'unit_Editor_as.pas' {form_Editor_as}, 1.31 + unit_Editor_tutorial in 'unit_Editor_tutorial.pas' {form_editor_tutorial}, 1.32 + unit_Editor_CreateAR in 'unit_Editor_CreateAR.pas' {form_editor_CreateAR}, 1.33 + unit_Easteregg in 'unit_Easteregg.pas' {form_easteregg}, 1.34 + unit_Editor_as_BrowseDir in 'unit_Editor_as_BrowseDir.pas' {form_Editor_as_BrowseDir}; 1.35 + 1.36 +{$R *.res} 1.37 + 1.38 +begin 1.39 + Application.Initialize; 1.40 + Application.Title := 'CD-Autorunner'; 1.41 + Application.CreateForm(Tform_Start, form_Start); 1.42 + if paramstr(1) <> '' then //About-Fenster ausblenden 1.43 + begin 1.44 + Application.ShowMainForm := False; 1.45 + Form_start.Visible := False; 1.46 + end; 1.47 + Application.Run; 1.48 +end.