Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
11. Aug 2014
Laut dem http://stackoverflow.com/questions/3330932/creating-a-delphi-app-shortcut-with-no-corresponding-menu-item brauchst du nur eine TApplicationEvents-Instanz in deine Komponente reinmachem und dort das OnShortCut implementieren.
Bzw. besser nur eine globale Instanz (Singleton für alle deine Popups), welche in Screen.ActiveControl nach einem Popup sucht (also ob da Eines dran hängt) und dann...
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
11. Aug 2014
Und wenn das Popup mal "richtig" aufgerufen wird, also mit den "richtigen" Koordinaten des Mauszeigers Popuppunktes, an welchem das Popup aufgemacht wird?
Im Beispielcode des manuellen Aufrufs hatte ich nicht umsonst das PopupComponent gesetzt, welches Delphi ebenfalls setzt, wenn ein Popup automatisch aufgerufen wird.
(PopupMenu.PopupComponent as TMemo).CaretPos
Wobei ich mir gewünscht...
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
11. Aug 2014
Entweder hängt sich dein Popup in die Messagebehandlung der Komponente(n) rein, wo es angehängt wurde,
oder es gängt sich ins KeyPreview der Form, oder in TApplicationtEvents.OnMessage und schaut dort nach der Tastenkombi,
oder es registriert sich einen globalen Shortcut.
Gibt TMemo.CaretPos (GetCaretPos) nicht die Position in Zeile:Spalte zurück?
Ich dachte das Popup benötigt allerding...