Елена Совин
12 сообщений
#14 лет назад
Вопрос наверное слишком простой, а я просто туплю.
На форме объект StringGrid в котором разрешено внесение данных. К нему привязано контекстное меню через PopupActionBar. При запуске меню которое подвешано через PopupActionBar активное, только при нажатии правой клавиши на ячейке, которая сейчас не редактируется. При нажатии правой клавиши на редактируемой ячейке выскакивает системное меню.

Как сделать так чтобы во всех случаях выскакивало только меню заданное через PopupActionBar?

Инфа: CodeGear Delphi 2009, Win 7
Николай М.
1895 сообщений
#14 лет назад
Onmouseup + popmenu.popup(mouse.x, mouse.y)
Елена Совин
12 сообщений
#14 лет назад
Спасибо за совет, но єто не совсем то. Нужно убрать стандартное меню, которое характерно для полей ввода тип Edit.
Для Edit это меню можно убрать при помощи следующей процедури:

procedure TForm1.Edit1ContextPopup(Sender: TObject; MousePos: TPoint;
var Handled: Boolean);
begin
Handled:=true;
end;

Для StringGrid такая процедура не работает. То есть она возможна, но получить при этом желаемый результат - нет.
Николай М.
1895 сообщений
#14 лет назад
А ну это конечно немного трабл, но не смертельно:



я лично никогда не работал с этим компонентом, да и стандартными уже давно не пользуюсь)
Елена Совин
12 сообщений
#14 лет назад
Спасибо за попытку помочь. проблема разрешилась перенесением ПО на Делфи 7. Но огромное спасибо за помощь