Помогите...
Есть код:
procedure TForm1.FormCreate(Sender: TObject);
begin
ModifyMenu(MainMenu1.Handle, 3, mf_ByPosition or mf_Popup or mf_Help,
Help1.Handle, PChar(Help1.Caption));
end;
что делает: менюшка с правой стороны в главном меню.
проблема:окошко - MDIForm, при загрузке формы все происходит верно, но при выводе любого MDIChild-менюшка летит на свое место (крайнее правое, следом за последним пунктом меню) и никаким образом не возвращается куда надо.
Вопрос: ЧТО ДЕЛАТЬ?
|