Was überschreiben beim TEdit?

[guidobrose]

Hallo,

ich habe mal wieder etwas ganz banales für euch...

Ich schreibe mir eine kleine Erweiterung für TEdit (Angehängtes Label mit ein paar optischen Verschönerungen). Um das Ganze jetzt perfekt zu machen, hätte ich gerne noch das erstens abhängig von Edit.Enabled das Label die Farbe ändert und zweitens wenn Edit.Focused die Farbe des Editfeldes geändert wird. Im Prinzip recht einfach, wenn man weiß, welche Methoden man überschreiben muss. Aber welche?

Delphi-Quellcode:

  TXTEdit = class(TEdit)
  private
    FLabeled: Boolean;
    FCaption: TCaption;
    FLabel: TXTEditLabel;
    procedure SetLabeled(Value: Boolean);
    procedure SetCaption(Value: TCaption);
  public
    constructor Create(AOwner: TComponent; AParent: TWinControl);
    property Labeled: Boolean read FLabeled write SetLabeled;
    property Caption: TCaption read FCaption write SetCaption;

  end;

[SirThornberry]

Welche Delphiversion hast du? Hast du schon den Quelltext von TCustomEdit angeschaut?

[guidobrose]

Ich verwende Turbo Delphi Explorer, die Komponente wird also nicht visuell...

Ich habe mir die Deklarationen schon mal angeschaut. Wäre DoEnter und DoExit von TWinControl evtl. die richtige Stelle für die Farbänderung solbald das Edit den Focus bekommt?

[SirThornberry]

ich könnte jetzt ja oder nein sagen aber das würde dir nur in dem Fall helfen.
1.) Hier eine Herangehensweise an das ganze. Schalte in den Projektoptionen DebugDCUs an.
2.) weise einem Edit ein OnEnter zu und setze darin einen Haltepunkt.
3.) Starte das Programm, entere das Edit und das Programm sollte am Haltepunkt stehen bleiben
4.) Schau dir den Call-Stack an (View->Debug Windows->Call Stack). Prüfe welche von den dortigen Methoden virtuell/dynamic sind und überschrieben werden können.

Resultat für deinen Fall: DoEnter sollte die Methode sein welche du gesucht hast.

[guidobrose]

Danke für die dezenten Hinweise (ehrlich)!

Ich habe es mit DoEnter versucht, hat aber leider nicht hingehauen. Jetzt habe ich es mit CMEnter versucht und es klappt. CMEnabledChanged habe ich dabei auch gleich entdeckt und damit alle meine Probleme erschlagen.

Guido