Einzelnen Beitrag anzeigen

Michael II

Registriert seit: 1. Dez 2012
Ort: CH BE Eriswil
760 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: MouseUp Event mit gedrückter rechter Maustaste

  Alt 4. Nov 2022, 12:12
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;
Michael Gasser
  Mit Zitat antworten Zitat