MouseUp Event mit gedrückter rechter Maustaste

[Michael II]

Ja du kannst WM_RBUTTONUP abfangen. Dann klappt es wie du es wünschst; also entweder durch einen eigenen Handler oder via TApplicationEvents:

Delphi-Quellcode:

procedure TForm17.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
    if Msg.message = WM_RBUTTONUP then
        showmessage( 'hallo' );
end;

Tipp: Wenn du alle Mausmeldungen abfangen willst, wenn zum Beispiel wieder mal was mit der Maus nicht so funktioniert wie du es gern hast und du mal sehen willst, was alles an WM_Maus ankommt:

Delphi-Quellcode:

procedure TForm17.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
      if ( Msg.message >= WM_MOUSEFIRST ) and  ( Msg.message <= WM_MOUSELAST ) then
      begin
...
      end;
end;