Einzelnen Beitrag anzeigen

Geronimo

Registriert seit: 18. Dez 2006
Ort: Hamburg
38 Beiträge
 
#1

TWinControl und OnEnter-Event

  Alt 27. Apr 2007, 13:20
Hallo alle zusammen,

ich hätte da gern mal ein Problem und zwar:

Ich möchte einer Reihe von Komponenten unterschiedlicher Typen
(TEdit, TButton, ...) per Code ein OnEnter Event zuweisen.
Laut Hilfe so das alles TWinControls. TWinControl hat laut Hilfe
auch ein OnEnter-Event.

Folgender Code
Delphi-Quellcode:
for i := 0 to self.ControlCount-1 do
   if (self.Controls[i] is TWinControl) then
     (Controls[i] as TWinControl).OnEnter := AdaptMenuOnEnter;
funktioniert nicht:

Fehler: Undeclared identifier

Wer kann mir helfen. Wenn das nicht so geht müsste ich alle
durchprüfen, ob TEdit oder TButton etc.

Geronimo
Die Welt ist rechteckig, linear und Gauss-verteilt!
  Mit Zitat antworten Zitat