Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.03.2010, 14:12   #1
пауэрлифтинг
Заблокирован
 
Регистрация: 11.12.2009
Сообщений: 133
Вопрос

как сделать чтобы меню появлялась не только при нажатии правой кнопки мыши и при нажатии левой

в других программах видел что нажимаешь левую кнопку мыши на кнопке и появляется меню

Последний раз редактировалось mihali4; 03.03.2010 в 18:18.
пауэрлифтинг вне форума Ответить с цитированием
Старый 03.03.2010, 14:26   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Переопредели оконную процедуру для кнопки, в коткорой отлавливай сообщение нажатия левой клавиши мышки, и в ней методом PopUp компонента меню показывай в координатах (Mouse.CursorPos) само меню.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 03.03.2010, 14:52   #3
пауэрлифтинг
Заблокирован
 
Регистрация: 11.12.2009
Сообщений: 133
По умолчанию

написал так
Код:
procedure TForm2.Button2Click(Sender: TObject);
begin
   PopupMenu.Popup(Mouse.CursorPos.X,Mouse.CursorPos.y);
end;
ошибку выводит при нажатии

спасибо работает просто PopupMenu написал а надо PopupMenu1

Последний раз редактировалось mihali4; 03.03.2010 в 18:17.
пауэрлифтинг вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
PopupMenu Патрон Общие вопросы Delphi 7 15.06.2008 14:04
PopupMenu TaTT DoGG Компоненты Delphi 13 23.05.2008 13:19
PopupMenu Михаил Юрьевич Общие вопросы Delphi 6 03.05.2008 18:46
PopupMenu Teen4jump Общие вопросы Delphi 10 12.03.2008 13:42