X-Git-Url: http://deadsoftware.ru/gitweb?p=d2df-editor.git;a=blobdiff_plain;f=src%2Feditor%2Ff_addresource.pas;h=f738384273e0e92aa8d74d2656175ef08389f274;hp=d67765e20d111ae91e253ee8350953e1a46ff8c4;hb=2789c629b21057292614b015b9a03595bab89c2f;hpb=73501e904776246ca81b42be2b14015df1f4d084 diff --git a/src/editor/f_addresource.pas b/src/editor/f_addresource.pas index d67765e..f738384 100644 --- a/src/editor/f_addresource.pas +++ b/src/editor/f_addresource.pas @@ -87,7 +87,7 @@ procedure TAddResourceForm.bOKClick(Sender: TObject); begin if FResourceName = '' then begin - MessageBox(0, PChar(_lc[I_MSG_CHOOSE_RES]), + Application.MessageBox(PChar(_lc[I_MSG_CHOOSE_RES]), PChar(_lc[I_MSG_ERROR]), MB_OK + MB_ICONERROR); Exit; end;