Mercurial > cdar
view 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 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.