lclimager.lpr 403 B

123456789101112131415161718192021
  1. program LCLImager;
  2. {$mode objfpc}{$H+}
  3. uses
  4. Interfaces, // this includes the LCL widgetset
  5. Forms
  6. { add your units here },
  7. MainUnit, AboutUnit;
  8. {$R *.res}
  9. begin
  10. Application.Title:='LCL Imager';
  11. Application.Scaled:=True;
  12. Application.Initialize;
  13. Application.CreateForm(TMainForm, MainForm);
  14. Application.CreateForm(TAboutForm, AboutForm);
  15. Application.Run;
  16. end.