init

ewsdr.lpr

@@ -0,0 +1,29 @@
+program ewsdr;
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
+
+// Без этого на Windows запускается консольное окно
+{$IFDEF WINDOWS}
+  {$APPTYPE GUI}
+{$ENDIF}
+
+uses
+  {$IFDEF UNIX}
+  cthreads,
+  {$ENDIF}
+  Interfaces,  // LCL platform
+  Forms,
+  MainForm;
+
+{$R *.res}
+
+begin
+  RequireDerivedFormResource := True;
+  Application.Title:='EWSDR';
+  Application.Scaled:=True;
+  Application.Initialize;
+  Application.CreateForm(TMainForm, MainForm.MainForm);
+  Application.Run;
+end.