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 wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/CDAR.dpr	Sun Dec 03 21:54:43 2006 +0100
@@ -0,0 +1,45 @@
+{
+    Copyright (C) 2003 &>  by Meillo  r e t u r n s
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License along
+    with this program; if not, write to the Free Software Foundation, Inc.,
+    51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+}
+program CDAR;
+
+uses
+  Forms,
+  unit_Welcome in 'unit_Welcome.pas' {form_Welcome},
+  unit_Start in 'unit_Start.pas' {form_Start},
+  unit_Editor in 'unit_Editor.pas' {form_Editor},
+  modul_allgemein in 'modul_allgemein.pas',
+  unit_Editor_ws in 'unit_Editor_ws.pas' {form_Editor_ws},
+  unit_Editor_as in 'unit_Editor_as.pas' {form_Editor_as},
+  unit_Editor_tutorial in 'unit_Editor_tutorial.pas' {form_editor_tutorial},
+  unit_Editor_CreateAR in 'unit_Editor_CreateAR.pas' {form_editor_CreateAR},
+  unit_Easteregg in 'unit_Easteregg.pas' {form_easteregg},
+  unit_Editor_as_BrowseDir in 'unit_Editor_as_BrowseDir.pas' {form_Editor_as_BrowseDir};
+
+{$R *.res}
+
+begin
+  Application.Initialize;
+  Application.Title := 'CD-Autorunner';
+  Application.CreateForm(Tform_Start, form_Start);
+  if paramstr(1) <> '' then  //About-Fenster ausblenden
+      begin
+        Application.ShowMainForm := False;
+        Form_start.Visible := False;
+      end;
+  Application.Run;
+end.