X-Git-Url: http://deadsoftware.ru/gitweb?p=d2df-editor.git;a=blobdiff_plain;f=src%2Feditor%2FEditor.lpr;h=f1a9c3055c2b81e17809a831312df8aba3ba392e;hp=71f5906bf6784736fa889e0cb245e44726b9d4a2;hb=a5105ea646c6744f8532a09cb4c37afe5554bcd5;hpb=aba84f24d3a0b7831b93917c9d1e5856267c174a diff --git a/src/editor/Editor.lpr b/src/editor/Editor.lpr index 71f5906..f1a9c30 100644 --- a/src/editor/Editor.lpr +++ b/src/editor/Editor.lpr @@ -52,7 +52,8 @@ uses {$R *.res} begin - Application.Initialize; + Application.Initialize(); + Application.CreateForm(TMainForm, MainForm); Application.CreateForm(TOptionsForm, OptionsForm); Application.CreateForm(TAboutForm, AboutForm); @@ -72,7 +73,7 @@ begin Application.CreateForm(TMapTestForm, MapTestForm); Application.CreateForm(TChooseTypeForm, ChooseTypeForm); Application.CreateForm(TSelectLanguageForm, SelectLanguageForm); - if ParamStr(1) <> '' then OpenMap(ParamStr(1), ''); - Application.Run; + if ParamStr(1) <> '' then OpenMap(ParamStr(1), ''); + Application.Run(); end.