![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Кнопка, похожая на
DVM © (2002-11-20 17:07:00)Не подскажите, как можно сделать чтобы обычная кнопка вела себя так как кнопка "ПУСК":
При щелчке вдавливалась и открывала меню, а при щелчке повторном на ней или где либо еще возвращалась в нормальное положение.
Что то я никак не могу добиться этого манипулируя свойствами у
BitBtn, SpeedButton.
Romkin (2002-11-20 18:31:00) [1]TToolBar - там кнопки те, что надо
DVM (2002-11-20 18:12:00) [2]Пробовал - плохо получается.
Во первых, если при нажатии должно открываться PopupMenu, то кнопка по первому щелчку открывает PopupMenu, и только по второму залипает. Вызов PopupMenu я поставил в OnMousedown, а не в OnClick, так как надо чтобы меню разворачивалось уже тогда когда мышь нажали, но еще не отпустили (как у "Пуск").
И как ее вернуть в нормальное положение программно, не щелкая по ней второй раз, когда например скрывается PopupMenu.
Может есть какое то решение со стандартными компонентами, чтобы свою кнопку не писать.
Андрей Прокофьев (2002-11-20 17:49:00) [3]SpeedButton.GroupIndex := 1; ( > 0)
SpeedButton.AllowAllUp := true;
Тогда при щелчке будет "залипать"
DVM (2002-11-20 17:40:00) [4]Для Snap:
Если не знаешь что сказать не лезь!
Snap (2002-11-20 17:09:00) [5]попробуй
button1.type:=пуск;
button1.paint;