IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

> Popup Menu
#$# PaVeL #$#
сообщение 1.05.2008 9:43
Сообщение #1


Пионер
**

Группа: Пользователи
Сообщений: 91
Пол: Мужской
Реальное имя: Павел

Репутация: -  0  +


Popup Menu
Можно ли заставить не исчезать по событию выбора элемента, а допустим поставить галку и предоставить право отмечать другие элементы? Если ДА - то как?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
volvo
сообщение 1.05.2008 11:07
Сообщение #2


Гость






Можно еще проще, без отслеживания кликов правой кнопкой:

procedure TForm1.first1Click(Sender: TObject);
var pnt: TPoint;
begin
(Sender as TMenuItem).Checked := not (Sender as TMenuItem).Checked;
pnt := PopupMenu1.PopupPoint;
PopupMenu1.Popup(pnt.X, pnt.Y);
end;
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 10.07.2025 9:26
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"