fpcsrc/utils/fpmc/fpmcgtk.pp


1
2
3
4
5
6
7
8
9
10
11
12
13

{$mode objfpc}
{$H+}
{$apptype gui}
program fpmcgtk;

uses fpgtk,fpglib,fpgtkext,frmmain;

begin
  application := TFPgtkApplication.Create;
  application.MainWindow := TMainForm.Create;
  application.Run;
  application.Free;
end.