Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Красоту навожу... [D6, Win2k]

МИФИст © (2002-07-24 21:13:00)
Как поместить MainMenu в ControlBar как это сделано в Delphi"ах или Internet Explore?

МИФИст (2002-07-26 12:02:00) [1]
Спасибо разобрался, вот только появилась другая проблема, помещаю MainMenu в ТoolBar, и на Вкладках появляються подчёркнутые символы, хотя я не вставлял символы &, как их убрать?

Alx2 (2002-07-26 08:05:00) [2]
>ShuraGrp © (25.07.02 10:34)
Блин, и действительно в D6 это уже сделано :)

ShuraGrp (2002-07-25 10:34:00) [3]
ToolBar.Menu = MainMenu. Form.Menu = Nil

Alx2 (2002-07-25 07:49:00) [4]
>Tag := K + 1;
Вот это, пожалуй, лишнее :)
(Выкинуть забыл)

Proton (2002-07-25 05:33:00) [5]
пример тут на форуме был пару месяцов назад был
одна процедура как раз делала то что вам надо
только не забудь showcaptions в true поставить

Alx2 © (29.05.02 08:12)
В какой-то мере спасет компонент ToolBar (вкладка Win32).
На нем можно сымитировать меню. Вот как это делается:

Procedure AssignToolBarMenu(Const ToolBar : TToolBar; Const 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;

То есть, на форму (пусть она называется Form1) кидаешь ControlBar (вкладка Additional). Размещаешь где хочется, на него кида! ешь ToolBar (в этом примере он имеет имя ToolBar1). В методе
OnCreate формы вызываешь

AssignToolBarMenu(ToolBar1, Form1.Menu);
Form1.Menu := Nil;

И все должно получиться :)

Юрий Зотов (2002-07-24 23:32:00) [6]
На форму кладете меню и создаете все его пункты (но НЕ назначаете его форме, как MainMenu). На эту же форму кладете ControlBar, а на него - ToolBar. На тулбаре создаете одну кнопку, выделяете ее и в Инспекторе объектов видите, что у этой кнопки есть интересное свойство - MenuItem. Задумываетесь - что бы это могло значить?

Далее жмете F1 и читаете про TToolButton.MenuItem. И за 10 минут делаете то самое меню, которое "сделано в Delphi"ах или Internet Explore". В хелпе даже и пример есть.

А насчет женщины - так что там о них? Интересно ведь...

МИФИст (2002-07-24 23:10:00) [7]
>ППавел
Буду очень признателен, если по точнее, т.к. я только что порыл и ничего не нашёл...

>RV ©
Что ж бывает...тогда уж надо бэкграундом по всей форме женщину размазать =)

RV (2002-07-24 21:30:00) [8]
женщину, на кнопку ОК, 800х600хТруКалор, с обновлением из интернета, и возможностью слайд-шоу из ранее закачанных

МИФИст©, прошу прощения, настроение такое
очень прошу прощения...

ППавел (2002-07-24 21:23:00) [9]
Есть в MainMenu или ControlBar такая закладка в свойствах где указываешь что использовать под MainMenu покапайся найдешь.

Наверх

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