summaryrefslogtreecommitdiff
path: root/uidesigner
diff options
context:
space:
mode:
Diffstat (limited to 'uidesigner')
-rw-r--r--uidesigner/uidesigner.lpr7
1 files changed, 5 insertions, 2 deletions
diff --git a/uidesigner/uidesigner.lpr b/uidesigner/uidesigner.lpr
index 2ec6834a..9f0a715f 100644
--- a/uidesigner/uidesigner.lpr
+++ b/uidesigner/uidesigner.lpr
@@ -36,12 +36,15 @@ begin
PropList := TPropertyList.Create;
maindsgn := TMainDesigner.Create;
maindsgn.CreateWindows;
+
+ // Note: This needs improving!!
+ fpgApplication.MainForm := frmMain;
+
+ { If file passed in as param, load it! }
maindsgn.EditedFileName := ParamStr(1);
if FileExists(maindsgn.EditedFileName) then
maindsgn.OnLoadFile(maindsgn);
- // Note: This needs improving!!
- fpgApplication.MainForm := frmMain;
fpgApplication.Run;
PropList.Free;