Tem como impedir o clique com o botão direito em um campo ?

No evento onMouseDown do componente eu consegui fazer isso. Mas o ideal seria simplesmente não mostrar o pop-up, só que isso não consegui fazer.

if Button = mbRight then
ShowMessage(´Tecla bloqueada´);

tenta o seguinte:
eu coloco um componente [i:102548a251]TPopupMenu[/i:102548a251] não incluo nenhum item pra ele e na propriedade [i:102548a251]PopupMenu[/i:102548a251] do componente de entrada de texto,por exemplo [b:102548a251]TEdit[/b:102548a251] daí quando o cara clicar com o botão direito sobre a caixa de texto ele vai carregar o seu PopupMenu, ou seja, não vai mostar nada :wink:

Eu pensei nisso também, mas fica estranho né.
Talvez criando um pop-up menu sem itens em runtime fica um pouco melhor.

sei la.

ok muito obrigado.

É meio difícil acontecer isso...
Mas sempre é bom evitar erros.

valeu

Isto parece funcionar

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