view CDAR.dpr @ 2:104f349dcfcc default tip

Added tag cdar-2.3 for changeset 87b91371db05b8cabe2dc3e2d2dc3ba830ab463b
author "Meillo r e t u r n s <meillo@marmaro.de>"
date Sun, 03 Dec 2006 21:56:41 +0100
parents ef71164288c1
children
line wrap: on
line source

{
    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.