ComponentCount

[omata]

Oder du sammelst dir die Elemente selber zusammen...

Delphi-Quellcode:

type
  TResult = array of TObject;

:
:

function TForm1.GetScrollboxElemente(Scrollbox: TScrollbox): TResult;
var i:integer;
    Component:TComponent;
begin
  setlength(Result, 0);
  for i:=1 to Self.ComponentCount do begin
    Component:=Self.Components[i-1];
    if Component is TWinControl then
      if (Component as TWinControl).Parent = Scrollbox then begin
        setlength(Result, length(Result)+1);
        Result[high(Result)]:=Component;
      end;
  end;
end;