mirror of
https://git.vladimir.cc/vladimir/ewsdr.git
synced 2026-08-25 20:27:33 +00:00
31 lines
653 B
ObjectPascal
31 lines
653 B
ObjectPascal
program ewsdr;
|
|
|
|
{$IFDEF FPC}
|
|
{$MODE Delphi}
|
|
{$ENDIF}
|
|
|
|
// Без этого на Windows запускается консольное окно
|
|
{$IFDEF WINDOWS}
|
|
{$APPTYPE GUI}
|
|
{$ENDIF}
|
|
|
|
uses
|
|
{$IFDEF UNIX}
|
|
cthreads,
|
|
{$ENDIF}
|
|
Interfaces, // LCL platform
|
|
Forms, MainForm, AudioOutput, DeviceForm, FlatButton, FreqDisplay, VfoOverlay,
|
|
WDSP, WDSPEngine, WebPageHtml, WebServer, WebUtils, WinFirewall, WsClient,
|
|
Settings;
|
|
|
|
{$R *.res}
|
|
|
|
begin
|
|
RequireDerivedFormResource := True;
|
|
Application.Title:='EWSDR';
|
|
Application.Scaled:=True;
|
|
Application.Initialize;
|
|
Application.CreateForm(TMainForm, MainForm.MainForm);
|
|
Application.Run;
|
|
end.
|