Evento Botón derecho del Ratón

[chinchan]

Hola, en un programa c++ Builder necesito pulsar con el botón derecho del ratón en un TPanel y ejecutar cierto código. ¿Qué evento genera sólo la pulasción derecha del ratón?. Gracias

[dec]

Hola,

Puedes usar los eventos "OnMouseUp" y "OnMouseDown", y luego valerte de su parámetro "Button" para averiguar qué botón fue pulsado. En Delphi sería más o menos así:

Código Delphi [-]
procedure TForm1.Panel1MouseDown(Sender: TObject;
 Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  if (Button = mbRight) then begin
    ShowMessage('Pulsaste el botón derecho');
  end;
end;

[[escafandra]]

Probablemente esa sea la mejor manera de hacerlo y la mas sencilla. En Builder sería así:

void __fastcall TForm1::Panel1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
    if (Button == mbRight)
        ShowMessage("Pulsaste el botón derecho");
}

Si lo que quieres es realmente aislar el evento único de pulsar el botón derecho del ratón, entonces revisa este mensaje de Windows: WM_RBUTTONDOWN

Lo interceptas y escribes tu código.

Saludos.

[chinchan]

Ok. Muchísimas Gracias. Me habéis sido como siempre de gran ayuda