Einzelnen Beitrag anzeigen

Benutzerbild von pustekuchen
pustekuchen

Registriert seit: 27. Aug 2010
265 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: Auf TPaintBox schreiben / Tasten abfangen

  Alt 14. Mär 2012, 10:02
Versuchs mit dem Parent der TPaintBox. Wenn es TForm ist, besitzt es ein OnKeyDown Event.

Delphi-Quellcode:
if APaintBox.Parent is TForm then
    (APaintBox.Parent as TForm).OnKeyDown := APaintBoxKeyDown;
EDIT: Obwohl das klappt glaub ich auch nicht, da die Form ja kein OnKeyDown Event auslöst :\
Delphi programming is awesome.

Geändert von pustekuchen (14. Mär 2012 um 10:07 Uhr)
  Mit Zitat antworten Zitat