Forum: Object-Pascal / Delphi-Language
Delphi
by Redeemer,
16. Aug 2017
TForm.OnMouseDown (Standardname der Ereignisbehandlungsmethode ist eben FormMouseDown) reagiert auf alle Mausevents auf die TForm selbst. Um das zu nutzen, packe alle Komponenten auf ein Panel. Wenn Hilfemodus gestartet, setze Panel.Enabled := False. Dann kannst du mit Form.OnMouseDown, Mouse.CursorPos, Form.Components und TControl.ClientToScreen/ScreenToClient und von mir aus noch Math.InRange...
Forum: Object-Pascal / Delphi-Language
Delphi
by Redeemer,
16. Aug 2017
Warum ein Tastaturevent? Ich dachte, es geht um die Maus?