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.