Kontextmenü bei Rechtsklick verhindern

Iehova · Hält's aus hier Beiträge: 5

Hi,

ich bin Delphi-Noob, aber das Prog ist ja leicht zugänglich. Allerdings hab ich keine Möglichkeit hierfür gefunden:

Ich hab ein Memofeld. Wenn man darin rechtsklickt, soll eine Funktion aufgerufen werden. Das Erkennen des Rechtsklicks (Button=mbRight) und der Aufruf der Funktion klappt, aber es geht zusätzlich das Windows-typische Kontextmenü auf. Kann man das irgendwie unterbinden? Also Rechtsklick und NUR die Funktion, kein Kontextmenü.

Danke schonmal

Sprint · Beiträge: 849

Iehova hat folgendes geschrieben:

es geht zusätzlich das Windows-typische Kontextmenü auf. Kann man das irgendwie unterbinden?

TMemo hat das Ereignis OnContextPopup. Dort setzt du Handled auf True. Und schon geht kein ContexMenü mehr auf.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

procedure TForm1.Memo1ContextPopup(Sender: TObject; MousePos: TPoint;
  var Handled: Boolean);
begin
  Handled := True;
end;

_________________
Ciao, Sprint.

Iehova · Hält's aus hier Beiträge: 5

Klappt einwandfrei, vielen Dank!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme