serverdemo.lpr 360 B

123456789101112131415161718192021
  1. program serverdemo;
  2. {$mode objfpc}{$H+}
  3. uses
  4. {$IFDEF UNIX}{$IFDEF UseCThreads}
  5. cthreads,
  6. {$ENDIF}{$ENDIF}
  7. Interfaces, // this includes the LCL widgetset
  8. Forms,
  9. MainServer;
  10. { you can add units after this }
  11. {$R *.res}
  12. begin
  13. Application.Initialize;
  14. Application.CreateForm(TFrmServer, FrmServer);
  15. Application.Run;
  16. end.