Witam
Dziś jak zawsze nietypowy kłopot mianowicie tworze dynamicznie kontrolki jedna na drugiej różnych typów i mam kłopot z odwołaniem się do nazwy kontrolki poprzedniej ponieważ przy uruchamianiu programu kompilator zwraca mi błąd związany z brakiem kontrolki niższej ponieważ wówczas ona jeszcze nie istnieje.
with TPanel.Create(self) do begin
Width:=50;
Height:=50;
Left:=50;
top:=50;
Parent:=self;
Visible:=True;
Name:='Panel1';
Caption:=' ';
end;
with TLabel.Create(self.FindComponent('Panel1')) do begin
Left:=65;
top:=65;
Visible:=True;
Parent:=self.Panel1;
Name:='nazwa_labela';
Caption:='napis';
end;
Kombinowałem i wpadłem na pomysł, żeby zamiast Parent:=self.Panel1 wpisać Parent:=self.FindComponent('Panel1').name; jednak dostaję komunikat o niezgodności typów. Zna ktoś sposób na rozwiązanie tego problemu?