16 lines
392 B
Plaintext
16 lines
392 B
Plaintext
program cdejecter_gui;
|
|
{$mode delphi}
|
|
{$codepage UTF8}
|
|
uses Interfaces, Forms, kernel, cde_MainForm, Dialogs, cde_disc_frame,
|
|
cde_SettingsForm;
|
|
{$R *.res}
|
|
begin
|
|
Application.Title:= 'CD Ejecter';
|
|
RequireDerivedFormResource:= True;
|
|
Application.Initialize;
|
|
Application.CreateForm(Tcde_Main, cde_Main);
|
|
UpdateLanguage;
|
|
Application.CreateForm(Tcde_Settings, cde_Settings);
|
|
Application.Run;
|
|
end.
|