19 lines
632 B
Plaintext
19 lines
632 B
Plaintext
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.
|