Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.29;
Скачать: CL | DM;

Вниз

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]

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


 
ssk ©   (2004-08-12 16:17) [4]

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



Страницы: 1 вся ветка

Текущий архив: 2004.08.29;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.025 c
6-1088429389
DelphiN!
2004-06-28 17:29
2004.08.29
Ф-ия Закачки файлов с докачкой


14-1091636339
Fay
2004-08-04 20:18
2004.08.29
Полный RULEZZ!


3-1091679459
ydv
2004-08-05 08:17
2004.08.29
Клиент-сервер. Правильная работа с отложенными изменениями.


1-1092216167
Tex
2004-08-11 13:22
2004.08.29
Работа с динамическим массивом


11-1079974942
Delphi5.01
2004-03-22 20:02
2004.08.29
_NewControl (Aparent, MyControl ,?????,true,?????)