Man schaut einfach mal nach, wo/wie die Eigenschaft
Name
gesetzt wird und stößt dann auf
TControl.SetName
Delphi-Quellcode:
procedure TControl.SetName(const Value: TComponentName);
var
ChangeText: Boolean;
begin
ChangeText := (csSetCaption in ControlStyle) and
not (csLoading in ComponentState) and (Name = Text) and
((Owner = nil) or not (Owner is TControl) or
not (csLoading in TControl(Owner).ComponentState));
inherited SetName(Value);
if ChangeText then Text := Value;
end;
BTW: Du kannst diese Methode in deiner Klasse auch überschreiben und dann ebenfalls deine Eigenschaft
Beschreibung
damit setzen
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)