Forms und OOP

[GuenterS]

Und meinem TEdit Event OnChange weise ich dann die doActiveControlChange zu?

[dataspider]

Zitat von GuenterS:

Und meinem TEdit Event OnChange weise ich dann die doActiveControlChange zu?

Nein,

es reicht irgendwo der Aufruf:
AppEditColorHandler.Active := True; Also z.B. im MainForm under Uses EditColorHandler aufnehmen und o.g. Aufruf z.B. in das onCreate des Forms. Damit funktioniert es automatisch mit allen TEdits.

Cu, Frank

[GuenterS]

und wie erkennt Dein Ding, dass in einem TEdit gerade was eingegeben wird bez. wurde?

[dataspider]

Sorry,

ich hatte zu oberflächlich gelesen. Ich dachte, dass es um das aktive Eigabefeld geht.
Mit meiner Unit könnte man es nur so machen, dass das Feld beim Verlassen gefärbt wird, wenn man Modufied prüft.
Wenn es aber sofort mit der Eingabe erfolgen soll, ist die Ableitung von TEdit wohl doch besser.

Frank

[GuenterS]

Ich hab Deinen Code gerade ausprobiert. Das Aktive wird immer gelb gefärbt, ich such gerade noch wo dieses doActiveControlChange eigentlich herkommt.

Ansonsten, müßte sich mal der Threadersteller dazu äußern, was er jetzt eigentlich wollte.

Delphi-Quellcode:

     Screen.OnActiveControlChange := doActiveControlChange 
    else 
      Screen.OnActiveControlChange := nil;

das habe ich wohl übersehn...