VPF::Переключение появления всплывающего меню

gordmiand

Дата 14.8.2009, 13:09 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 772
Регистрация: 15.4.2007

Репутация: нет
Всего: 0

Мне надо сделать появление (visible=1) всплывающего меню одним из двух способов:
1.по щелчку на левую кнопку мыши
2.по щелчку на правую кнопку мыши при зажатой клавише (например shift)

по п.1 делаю так: свойство TrackButton у PopupMenu устанавливаю равным tbLeftButton, но это ничего не дает (все равно меню появляется по правой кнопке мыши)…почему так происходит?
+ подскажите как по п.2 можно сделать попроще…

volvo877

Дата 14.8.2009, 18:46 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2073
Регистрация: 15.11.2004

Репутация: 13
Всего: 116

В OnMouseDown формы вызвать меню самостоятельно - нельзя? Ну например:

Код

void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,
                TShiftState Shift, int X, int Y)
{
    if((Button == mbLeft) ||                            // нажата левая кнопка
       (Button == mbRight && Shift.Contains(ssShift)))    // или правая с Шифтом
    {
        PopupMenu1->Popup(Mouse->CursorPos.x, Mouse->CursorPos.y);
    }
}

Form.PopupMenu устанавливать не надо.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »