project1.lpr 402 B

12345678910111213141516171819202122232425
  1. program project1;
  2. {$mode objfpc}{$H+}
  3. uses
  4. {$IFDEF UNIX}
  5. cthreads,
  6. {$ENDIF}
  7. {$IFDEF HASAMIGA}
  8. athreads,
  9. {$ENDIF}
  10. Interfaces, // this includes the LCL widgetset
  11. Forms, Unit1
  12. { you can add units after this };
  13. {$R *.res}
  14. begin
  15. RequireDerivedFormResource:=True;
  16. Application.Scaled:=True;
  17. Application.Initialize;
  18. Application.CreateForm(TForm1, Form1);
  19. Application.Run;
  20. end.