csSetCaption wo hinschreiben?

[BAMatze]

Hallo und guten Morgen an alle DP´ler,

Also hab mich heute mit frischem Mut wieder an das Problem gemacht und eine relativ "ungewöhnlich" (zumindest für mich unverständlicher) Lösung gefunden.

Ich habe in meine CreateLabel-Funktion folgende Zeile ergänzt und ab da stand, wie gewohnt "LabEdit1" auch in der Entwicklungszeit in der Komponente. Hier der geänderte Quellcode:

Delphi-Quellcode:

function TLabEdit.CreateLabel(PosX: Integer; PosY: Integer; Textgroesse: Integer;  visible: Boolean): TLabel;
begin
  result := TLabel.Create(nil);
  result.Parent := Self;
  result.Left := PosX;
  result.Top := PosY;
  result.Font.Assign(Font);
  result.Caption := caption;   //<--- diese Zeile hat mir das gewünschte Resultat gebracht
  result.Visible := visible;
end;

Es funktioniert und ich denke mal, dass ich damit auf eine vererbte Variable (so wie Enabled) zugreifen, denn ich selber habe keine Variable deklariert, die Caption heißt.

Vielen Dank an meine Helfer
BAMatze