diff options
author | Graeme Geldenhuys <graemeg@gmail.com> | 2013-03-15 15:05:45 +0000 |
---|---|---|
committer | David Laurence Emerson <dle3ab@angelbase.com> | 2013-05-28 00:42:48 -0700 |
commit | dc1859b7e87a08c76d8aaac872f148c1090c7d37 (patch) | |
tree | f3c240ba65a83f0513410baa18864fd2752a184c /examples/apps/ide/src/templates/fpgui/mainform.pas | |
parent | cd989d3d12e439bab5c0e648c85a6c338bfc6fc5 (diff) | |
download | fpGUI-dc1859b7e87a08c76d8aaac872f148c1090c7d37.tar.xz |
ide: Adds template files (units, programs etc)
Soon the IDE will be able to select and process these files correctly.
Diffstat (limited to 'examples/apps/ide/src/templates/fpgui/mainform.pas')
-rw-r--r-- | examples/apps/ide/src/templates/fpgui/mainform.pas | 45 |
1 files changed, 45 insertions, 0 deletions
diff --git a/examples/apps/ide/src/templates/fpgui/mainform.pas b/examples/apps/ide/src/templates/fpgui/mainform.pas new file mode 100644 index 00000000..6b9500ac --- /dev/null +++ b/examples/apps/ide/src/templates/fpgui/mainform.pas @@ -0,0 +1,45 @@ +unit frm_main; + +{$mode objfpc}{$H+} + +interface + +uses + SysUtils, + Classes, + fpg_base, + fpg_main, + fpg_form; + +type + + TMainForm = class(TfpgForm) + private + {@VFD_HEAD_BEGIN: MainForm} + {@VFD_HEAD_END: MainForm} + public + procedure AfterCreate; override; + end; + +{@VFD_NEWFORM_DECL} + +implementation + +{@VFD_NEWFORM_IMPL} + +procedure TMainForm.AfterCreate; +begin + {%region 'Auto-generated GUI code' -fold} + {@VFD_BODY_BEGIN: MainForm} + Name := 'MainForm'; + SetPosition(374, 228, 490, 258); + WindowTitle := 'MainForm'; + Hint := ''; + WindowPosition := wpOneThirdDown; + + {@VFD_BODY_END: MainForm} + {%endregion} +end; + + +end. |