15 lines
383 B
Plaintext
15 lines
383 B
Plaintext
program cdejecter_gui;
|
|
{$mode delphi}
|
|
{$codepage UTF8}
|
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Forms, kernel, cde_MainForm, Dialogs,
|
|
cde_disc_frame;
|
|
{$R *.res}
|
|
begin
|
|
Application.Title:= 'CD Ejecter';
|
|
RequireDerivedFormResource:= True;
|
|
Application.Initialize;
|
|
Application.CreateForm(Tcde_Main, cde_Main);
|
|
UpdateLanguage;
|
|
Application.Run;
|
|
end.
|