Stwarzanie komponentow inaczej

var
Shape : TShape;
begin
Shape := TShape.Create(Self);
Shape.SetBounds(costamm nie istotne);
&ltdlephi&gt

Ta metoda tworzenia komponentow nie dziala. zadnych bledow, nic, ale zaden komponent nie chce sie stworzyc w ten sposob. znacie moze jakas inna metode tworzenia komponentow? albo moze wiecie co robie zle?--Vroc
&ltDelphi Knight&gt

var
Shape : TShape;
begin
Shape := TShape.Create(Self);
Shape.Parent := Self; //tego zapomniales
Shape.SetBouns();
end;

a teraz?

--
-=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-

jeszcze nie sprawdzilem, ale powiedz co robi ten kawalek co ty dodales?--Vroc
&ltDelphi Knight&gt

umieszcza Shape na formie :)---=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-

hje hje... {wstyd} --Vroc
&ltDelphi Knight&gt