TMainMenu (item прижать к правому краю формы)

← →
Vasislisk (2004-08-12 14:57) [0]

Народ, знает ли кто нибудь как прижать Item MainMenu к левому краю экрана? Например, как "справка" в TotalCommander?

Заранее спасибо.

← →
ssk © (2004-08-12 15:27) [1]

procedure MenuHelpRight(MainMenu:TMainMenu; NameMenuItem:TMenuItem); begin ModifyMenu(MainMenu.Handle, NameMenuItem.MenuIndex, mf_ByPosition or mf_Popup or mf_Help, NameMenuItem.Handle, PChar(NameMenuItem.Caption)) end;

← →
Vasislisk (2004-08-12 15:36) [2]

to ssk: Всё ок. Ещё раз спасибо!

← →
sdw_syscoder (2004-08-12 16:10) [3]

А куда прилепить эту процедуру, чтобы она заработала, а то я не догоняю.

можно в Form.OnCreate. пример: http://www.ucad.pisem.net/menu_help_right.zip

TMainMenu (item прижать к правому краю формы) Найти похожие ветки