You've already forked multithread
mirror of
https://github.com/loginov-dmitry/multithread.git
synced 2025-12-25 23:37:08 +02:00
27 lines
470 B
ObjectPascal
27 lines
470 B
ObjectPascal
// JCL_DEBUG_EXPERT_GENERATEJDBG OFF
|
|
// JCL_DEBUG_EXPERT_INSERTJDBG OFF
|
|
program WaitWindowExample;
|
|
|
|
uses
|
|
{$IFDEF FPC}
|
|
{$IFDEF UNIX}
|
|
cthreads,
|
|
{$ENDIF}
|
|
Interfaces,
|
|
{$ENDIF}
|
|
|
|
Forms,
|
|
MainFrm in 'MainFrm.pas' {MainForm},
|
|
TimeIntervals,
|
|
ParamsUtils,
|
|
LDSWaitFrm in '..\LDSWaitFrm.pas' {LDSWaitForm};
|
|
|
|
{$R *.res}
|
|
|
|
begin
|
|
Application.Initialize;
|
|
Application.MainFormOnTaskbar := True;
|
|
Application.CreateForm(TMainForm, MainForm);
|
|
Application.Run;
|
|
end.
|