diff options
author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-10-19 07:52:43 +0000 |
---|---|---|
committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-10-19 07:52:43 +0000 |
commit | c6891d52382d3eec25a781ffab6ad4fe22bf4f4c (patch) | |
tree | 68b74863c13618575acf5f6efe901f6166cdc55f /uidesigner | |
parent | b816ec5c4a1c722a19d5d6b1896e13430f755403 (diff) | |
download | fpGUI-c6891d52382d3eec25a781ffab6ad4fe22bf4f4c.tar.xz |
* minor adjustment in uidesigner startup when a file is passed in as a parameter.
Diffstat (limited to 'uidesigner')
-rw-r--r-- | uidesigner/uidesigner.lpr | 7 |
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; |