X-Git-Url: https://deadsoftware.ru/gitweb?p=d2df-editor.git;a=blobdiff_plain;f=src%2Feditor%2Ff_main.pas;h=8d11a3b7cb75b8d8b3c70f8be2d690b912c97fcc;hp=ca323f69220c99e1b7d12e4918cea0edba16e6e7;hb=c8c226903e99aea13032c2a321809dd360dddac1;hpb=a97fbe542af199db61003389576f0274bb90b940 diff --git a/src/editor/f_main.pas b/src/editor/f_main.pas index ca323f6..8d11a3b 100644 --- a/src/editor/f_main.pas +++ b/src/editor/f_main.pas @@ -288,6 +288,7 @@ const var MainForm: TMainForm; + StartMap: String; OpenedMap: String; OpenedWAD: String; @@ -6530,6 +6531,7 @@ begin end; procedure TMainForm.OnIdle(Sender: TObject; var Done: Boolean); + var f: AnsiString; begin // FIXME: this is a shitty hack if not gDataLoaded then @@ -6545,6 +6547,12 @@ begin MainForm.FormResize(nil); end; Draw(); + if StartMap <> '' then + begin + f := StartMap; + StartMap := ''; + OpenMap(f, ''); + end; end; procedure TMainForm.miMapPreviewClick(Sender: TObject);