demo01LCL.lpr 297 B

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