Hi Kollegen,
nachdem ihr nun alle gut erholt seid habt ihr sicher eine gute Lösung mein kleines Problem.
Ich möchte gerne eine Komponente wie folgt ableiten:
TDBEdit_Norm = class(TDBEdit)
Wenn ein User nun eine Änderung macht, möchte ich z.B. eine globale Variable setzen (bzw. ein property eines abstrakten Objektes). Dafür wollte ich eigentlich folgende Procedure nutzen:
Delphi-Quellcode:
public
procedure Change; override;
...
procedure TDBEdit_Norm.Change;
begin
oApp.Changed := True;
end;
Aber zu meinem Entsetzen wird Change schon beim Erstellen der Maske ausgeführt. Was mache ich falsch?
Für die Hilfe besten Dank im Voraus!