Тема: Как "блокировать" popupmenu?
Показать сообщение отдельно
  #2  
Старый 09.07.2008, 01:14
lmikle lmikle вне форума
Модератор
  
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию
Код:
procedure TForm1.Memo1ContextPopup(Sender: TObject; MousePos: TPoint;
  var Handled: Boolean);
begin
  Handled := True;
end;