diff options
| author | Graeme Geldenhuys <graemeg@gmail.com> | 2013-04-29 12:19:52 +0100 |
|---|---|---|
| committer | Graeme Geldenhuys <graemeg@gmail.com> | 2013-04-29 12:38:55 +0100 |
| commit | 5d8cef173d81fc0bd88977385b56feb4ec4625ff (patch) | |
| tree | 8d250a5841514904d4503744547ad542be9aea44 /extras/mseide_templates/fpgui_app0.mct | |
| parent | b9112094c1d9e319890f902f19f55764cb3f0c49 (diff) | |
| download | fpGUI-5d8cef173d81fc0bd88977385b56feb4ec4625ff.tar.xz | |
Adds various useful MSEide code templates
Diffstat (limited to 'extras/mseide_templates/fpgui_app0.mct')
| -rw-r--r-- | extras/mseide_templates/fpgui_app0.mct | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/extras/mseide_templates/fpgui_app0.mct b/extras/mseide_templates/fpgui_app0.mct new file mode 100644 index 00000000..542cd09d --- /dev/null +++ b/extras/mseide_templates/fpgui_app0.mct @@ -0,0 +1,37 @@ +[header] +name=fpguiapp +comment=fpGUI template application (no forms) +select=0 +indent=0 +cursorcol=0 +cursorrow=0 +params=0 +paramdefaults=0 +[] +{$mode objfpc}{$h+} +{$ifdef mswindows}{$apptype gui}{$endif} + +uses + {$IFDEF UNIX}{$IFDEF UseCThreads} + cthreads, + {$ENDIF}{$ENDIF} + Classes, fpg_main, frm_main; + + +procedure MainProc; +var + frm: TMainForm; +begin + fpgApplication.Initialize; + frm := TMainForm.Create(nil); + try + frm.Show; + fpgApplication.Run; + finally + frm.Free; + end; +end; + +begin + MainProc; +end. |