ComponentCount (Components[i])... Как формируется?

← →
Cosinus © (2004-09-22 18:22) [0]

Т.е. очень интересно от чего зависит в каком порядке они перебираются?

← →
basken (2004-09-22 18:48) [1]

От того в каком порядке они туда попадают.

← →
Cosinus © (2004-09-22 18:57) [2]

Куда попадают?
Как список индексов формируется формируется?

← →
basken (2004-09-22 19:15) [3]

При создании обькта (наследника TComponent) создаваемый объект добавляется в контейнер Ownera.

constructor TComponent.Create(AOwner: TComponent); begin FComponentStyle := [csInheritable]; if AOwner <> nil then AOwner.InsertComponent(Self); end;

И таким образом контейнер наполняется...

На то нам дадены исходники VCL

procedure TComponent.Insert(AComponent: TComponent);
begin
if FComponents = nil then FComponents := TList.Create;
FComponents.Add(AComponent);
AComponent.FOwner := Self;
end;

function TComponent.GetComponentCount: Integer;
begin
if FComponents <> nil then
Result := FComponents.Count else
Result := 0;
end;

Ок, спасибо.
Сам что то не додумался вчера посмотреть.

ComponentCount (Components[i])... Как формируется? Найти похожие ветки