summaryrefslogtreecommitdiff
path: root/examples/apps/uidesigner/tests/tabsheet_design.lpr
diff options
context:
space:
mode:
Diffstat (limited to 'examples/apps/uidesigner/tests/tabsheet_design.lpr')
-rw-r--r--examples/apps/uidesigner/tests/tabsheet_design.lpr30
1 files changed, 30 insertions, 0 deletions
diff --git a/examples/apps/uidesigner/tests/tabsheet_design.lpr b/examples/apps/uidesigner/tests/tabsheet_design.lpr
new file mode 100644
index 00000000..7acb50aa
--- /dev/null
+++ b/examples/apps/uidesigner/tests/tabsheet_design.lpr
@@ -0,0 +1,30 @@
+program tabsheet_design;
+
+{$mode objfpc}{$H+}
+
+uses
+ {$IFDEF UNIX}{$IFDEF UseCThreads}
+ cthreads,
+ {$ENDIF}{$ENDIF}
+ Classes, fpgfx, tabtest;
+
+
+procedure MainProc;
+var
+ frm: TfrmTabTest;
+begin
+ fpgApplication.Initialize;
+ frm := TfrmTabTest.Create(nil);
+ try
+ frm.Show;
+ fpgApplication.Run;
+ finally
+ frm.Free;
+ end;
+end;
+
+begin
+ MainProc;
+end.
+
+