ich hab´s jetzt so gelöst:
Delphi-Quellcode:
procedure TLabeledMaskEdit.SetVisiblePreLabel(Value: Boolean);
begin
//Wird aufgerufen, wenn sich die Variable "FVisiblePreLabel" ändert
FVisiblePreLabel := Value;
//FPreEditLabel beschreiben
FPreEditLabel.Visible := FVisiblePreLabel;
If csDesigning in ComponentState then
If FVisiblePreLabel then
FPreEditLabel.Parent := FLabel_Parent
else
FPreEditLabel.Parent := nil;
end;
Ich merk mir in der SetParent-Procedure den Parent und bei Visible wird der Parent gesetzt, ansonsten Nil
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<