TControl hat zwar die Eigenschaft Caption, nur ist sie protected. Aus diesem Grund kann auch die
RTTI nicht genutzt werden, weil diese nur für published Eigenschaften funktioniert (bei entsprechendem Compilerschalter).
Delphi-Quellcode:
type
TControlHack = class(TControl);
...
var
i: integer;
begin
for i := 0 to Form1.ComponentCount - 1 do
if (Form1.Components[i] is TControl) then
Memo1.Lines.Add(TControlHack(Form1.Components[i]).Caption);
end;