| 1234567891011121314151617181920212223 |
- program MDButton;
- {$mode objfpc}{$H+}
- uses
- {$IFDEF UNIX}{$IFDEF UseCThreads}
- cthreads,
- {$ENDIF}{$ENDIF}
- Interfaces, // this includes the LCL widgetset
- Forms, umain
- { you can add units after this };
- {$R *.res}
- begin
- Application.Scaled:=True;
- Application.Title:='MDButton';
- RequireDerivedFormResource:=True;
- Application.Initialize;
- Application.CreateForm(TfrmMain, frmMain);
- Application.Run;
- end.
|