So evtl?
if (Parent.Components[i] is TBird) then
Und zugreifen mit:
Delphi-Quellcode:
with (Parent.Components[i] as TBird) do
begin
// mache was mit den Eigenschaften
end;
oder du legst dir einen temporären Bird an *g*
Delphi-Quellcode:
var
tmp: TBird;
{...}
tmp := (Parent.Components[i] as TBird);
tmp.SomeProperty := irgendwas;
tmp.SomeMethod(SomeArgument);