| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

TMainMenu (item прижать к правому краю формы) [D6, D7, Win2k, WinXP]

Vasislisk ©   (2004-08-12 14:57:00) 

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

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

---

ssk   (2004-08-12 16:17:00) [1]

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

---

sdw_syscoder   (2004-08-12 16:10:00) [2]

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

---

Vasislisk   (2004-08-12 15:36:00) [3]

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

---

ssk   (2004-08-12 15:27:00) [4]

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;

---

Наверх