右键按下的事件是什么？

[tohell]

是不是包括在ｃｌｉｃｋ中的？那样的话该如何判断？

[Liujc]

在OnMouseDown事件中判断
if Button = mbRight then //右键

[jamsir]

onclick

[王集鹄]

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if Button = mbRight then
ShowMessage('测试1');
end;
//or
procedure TForm1.FormContextPopup(Sender: TObject; MousePos: TPoint;
var Handled: Boolean);
begin
ShowMessage('测试2');
end;

[make11111]

if Button = mbRight then //右键