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

Вниз

Как поместить главное меню в ToolBar?   Найти похожие ветки 

 
Mir ©   (2003-05-08 06:43) [0]

Как поместить главное меню в ToolBar? (Если не понятен вопрос - посмотрите на главное меню в делфи - его можно перетаскивать куда угодно. Как это реализовать?)


 
andrey_pst ©   (2003-05-08 06:55) [1]

Выкладываешь на форму TMainMenu и TToolbar
У Toolbar в свойство Menu устанавливаешь в MainMenu1
У Form1 в свойстве Menu удаляешь MainMenu1
все


 
Mir ©   (2003-05-08 07:38) [2]

>andrey_pst Спасибо


 
Radionov Alexey ©   (2003-05-08 08:35) [3]


procedure AssignToolBarMenu(ToolBar: TToolBar; MENU: TMainMenu; AutoSize: Boolean = True);
var K, CW: Integer;
begin
CW := 0;
for K := MENU.Items.Count - 1 downto 0 do
with TToolButton.Create(ToolBar) do
begin
Parent := ToolBar;
Grouped := True;
MenuItem := MENU.Items[K];
AutoSize := True;
Tag := K + 1;
inc(CW, Width);
end;
if AutoSize then
ToolBar.Width := CW;
end;


 
Radionov Alexey ©   (2003-05-08 08:38) [4]

>Radionov Alexey © (08.05.03 08:35)
Забыл добавить, что это для D5.
В старших версиях все просто (andrey_pst ©).



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

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

Наверх




Память: 0.47 MB
Время: 0.016 c
14-70478
Barlok
2003-05-01 12:44
2003.05.22
Вопрос по методу Гауса?


1-70330
Yuraz
2003-05-08 19:31
2003.05.22
Как раскрасить опр. ячейку StringGrid?


1-70252
Litvin
2003-05-12 10:54
2003.05.22
округление значения аргумента


6-70421
@ndronix
2003-03-16 21:10
2003.05.22
Установка связи через модем...


14-70447
Rammst
2003-04-29 11:53
2003.05.22
CD-ROM