Højreklik

Du skal bruge onMouseDown og aflæse parametren
  Button: TMouseButton

Eller onMouseUp

Okai - hvordan vil en typisk parameter lyde?

Se dog selv efter i Delphis hjælp

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
while HiWord(GetAsyncKeyState(VK_LBUTTON))<>0 do
    showmessage(\'Venstre musetast\');

  while HiWord(GetAsyncKeyState(VK_RBUTTON))<>0 do
    showmessage(\'Højre musetast\');


end;


Stoney