From c6891d52382d3eec25a781ffab6ad4fe22bf4f4c Mon Sep 17 00:00:00 2001
From: graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>
Date: Sun, 19 Oct 2008 07:52:43 +0000
Subject: * minor adjustment in uidesigner startup when a file is passed in as
 a parameter.

---
 uidesigner/uidesigner.lpr | 7 +++++--
 1 file 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;
-- 
cgit v1.2.3-70-g09d2