Как временно скрыть MainMenu?

← →
STANT (2002-11-29 17:52) [0]

Если ответите на subj, буду очень благодарен.

← →
MBo (2002-11-29 17:59) [1]

setmenu(handle,0);

восстановить
setmenu(handle,mainmenu1.handle);

← →
STANT (2002-11-29 18:07) [2]

Это API-функция? При попытке написать это компилятор пишет, что TCustomForm.SetMenu не доступен.

← →
MBo (2002-11-29 18:11) [3]

да, api, из windows.pas. У меня без проблем. Попробуй написать
windows.setmenu

← →
AlexSV (2002-11-29 18:14) [4]

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
if Assigned(Form1.Menu) then
Form1.Menu := nil
else
Form1.Menu := MainMenu1;
end;

← →
STANT (2002-11-29 18:21) [5]

Все работает. Спасибо.