summaryrefslogtreecommitdiff
path: root/examples/apps/ide/src/templates/fpgui/simpleform.pas
diff options
context:
space:
mode:
Diffstat (limited to 'examples/apps/ide/src/templates/fpgui/simpleform.pas')
-rw-r--r--examples/apps/ide/src/templates/fpgui/simpleform.pas45
1 files changed, 45 insertions, 0 deletions
diff --git a/examples/apps/ide/src/templates/fpgui/simpleform.pas b/examples/apps/ide/src/templates/fpgui/simpleform.pas
new file mode 100644
index 00000000..d804f4a3
--- /dev/null
+++ b/examples/apps/ide/src/templates/fpgui/simpleform.pas
@@ -0,0 +1,45 @@
+unit ${UNITNAME};
+
+{$mode objfpc}{$H+}
+
+interface
+
+uses
+ SysUtils,
+ Classes,
+ fpg_base,
+ fpg_main,
+ fpg_form;
+
+type
+
+ T${FORMNAME} = class(TfpgForm)
+ private
+ {@VFD_HEAD_BEGIN: ${FORMNAME}}
+ {@VFD_HEAD_END: ${FORMNAME}}
+ public
+ procedure AfterCreate; override;
+ end;
+
+{@VFD_NEWFORM_DECL}
+
+implementation
+
+{@VFD_NEWFORM_IMPL}
+
+procedure T${FORMNAME}.AfterCreate;
+begin
+ {%region 'Auto-generated GUI code' -fold}
+ {@VFD_BODY_BEGIN: ${FORMNAME}}
+ Name := '${FORMNAME}';
+ SetPosition(374, 228, 490, 258);
+ WindowTitle := 'New Form';
+ Hint := '';
+ WindowPosition := wpOneThirdDown;
+
+ {@VFD_BODY_END: ${FORMNAME}}
+ {%endregion}
+end;
+
+
+end.