Initial

Исходный код версии 2.0

sources/cdejecter_gui/__history/cdejecter_gui.lpr;3

@@ -0,0 +1,18 @@
+program cdejecter_gui;
+{$mode delphi}
+{$codepage UTF8}
+uses Interfaces, Forms, kernel, cde_MainForm, Dialogs, ch_languageform,
+  cde_LinkCreatorForm, cde_DriveAdderForm, cde_loadingform, cde_disc_frame;
+{$R *.res}
+begin
+Application.Title:= 'CD Ejecter';
+RequireDerivedFormResource:= True;
+Application.Initialize;
+Application.CreateForm(Tcde_Main, cde_Main);
+Application.CreateForm(Tcde_loadingfrm, cde_loadingfrm);
+Application.CreateForm(TCh_language, Ch_language);
+Application.CreateForm(Tcde_LinkCreatorFrm, cde_LinkCreatorFrm);
+Application.CreateForm(Tcde_DriveAdderFrm, cde_DriveAdderFrm);
+UpdateLanguage;
+Application.Run;
+end.