Dafür würde ich dir zu OnMouseDown / OnMouseUp raten.
In der Procedure wird dir der Status einiger Standard-Tasten geliefert.
Die rechte Maustaste heißt SSRight.
Insgesamt sieht es dann also folgendermaßen aus:
Delphi-Quellcode:
procedure TForm1.PnlRightMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer); // Shift = Tastenstatus
begin
if SSRight in Shift then MacheEtwas;
end;