test.lpr 424 B

1234567891011121314151617181920212223
  1. program MDButton;
  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, umain
  9. { you can add units after this };
  10. {$R *.res}
  11. begin
  12. Application.Scaled:=True;
  13. Application.Title:='MDButton';
  14. RequireDerivedFormResource:=True;
  15. Application.Initialize;
  16. Application.CreateForm(TfrmMain, frmMain);
  17. Application.Run;
  18. end.