Форум: "Начинающим";
Текущий архив: 2008.04.20;
Скачать: [xml.tar.bz2];
ВнизКнопка Найти похожие ветки
← →
TCrash (2008-03-25 12:14) [0]Подскажите плиз компонент, реализующий функцию кнопки совмещенной с выпадающим меню, Пример такой кнопки - кнопка открытия файла в делфи на панели инструментов.
Нажимаешь на кнопку - открывается диалог, жмешь рядом - на маленькую кнопку - выпадает меню.
← →
Kolan © (2008-03-25 12:16) [1]У кнопок тул бара есть свойство DropDownMenu и соотв. стиль.
← →
TCrash (2008-03-25 13:09) [2]Глянул, спасибо.
Меня просто интересует кнопка не на панели инструментов.
Может пример неудачный привел.
Вот другой. MS Word, диалог открітия файла, кнопка ОК
← →
Kolan © (2008-03-25 13:23) [3]TPoupUpMenu можно и к обычной кнопке приладить. И по клику делать PoupUp
← →
{RASkov} © (2008-03-25 13:24) [4]> [2] TCrash (25.03.08 13:09)
Две кнопки и попапменю. Нажатие на правую приводит к выподанию меню. Нажатие на левую - обработчик действия по умолчанию в меню. Выбор в меню - смена умалчиваемого пункта меню.... Примерно так можно, а в чем собсно трабла?
← →
b z (2008-03-25 14:14) [5]Что мешает положить тулбар с одной кнопкой и соотв. её настроить?
← →
TCrash (2008-03-25 15:10) [6]Kolan © (25.03.08 13:23) [3]
{RASkov} © (25.03.08 13:24) [4]
Пробовал и то и то. Хочется, чтобы меню всплывало возле кнопки.
Кнопка находится в МДИчилд окне. Столкнулся с неправильным пересчетом координат функцией ClientToScreen. В результате меню всплівает у черта на куличках а не там где нужно. Брать координаті курсора не хочется.
← →
clickmaker © (2008-03-25 15:14) [7]
> Столкнулся с неправильным пересчетом координат функцией
> ClientToScreen
хочешь сказать, что функция неверно считает?
← →
{RASkov} © (2008-03-25 15:15) [8]> [6] TCrash (25.03.08 15:10)
procedure TForm1.Button1Click(Sender: TObject);
begin
PopupMenu1.Popup(Button1.ClientOrigin.X, Button1.ClientOrigin.Y+Button1.Height);
end;
← →
{RASkov} © (2008-03-25 15:24) [9]Еще как вариант, есть в RxLib такая кнопка TRxSpeedButton, у нее есть свойство - DropDownMenu, как раз самое то...
← →
TCrash (2008-03-25 15:55) [10]Button1.ClientOrigin.X
За ClientOrigin спасибо большое. Все получилось
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2008.04.20;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.043 c