Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 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
2-1206043591
Alex
2008-03-20 23:06
2008.04.20
Отзовитесь те кто работал с BigFloat.pas и UMathServices.pas


2-1206519877
Andrewtitoff
2008-03-26 11:24
2008.04.20
Как удалить файл из проекта Delphi 2007


2-1206508766
@!!ex
2008-03-26 08:19
2008.04.20
Определить, что текущая раскладка Ru или не Ru


15-1204889416
Шмелъ
2008-03-07 14:30
2008.04.20
С наступающим....


15-1204929909
oxffff
2008-03-08 01:45
2008.04.20
Всех дам с 8 Марта поздравляем





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский