Über String auf Komponente zugreife

[nahpets]

Meinst Du sowas?

Delphi-Quellcode:

var
          myKomp : TComponent;
begin
  myKomp := Application.FindComponent(tab1.FieldByName('Komponentenname').AsString);
  if Assigned(myKomp) and (myKomp is TWinControl) then begin
    TWinControl(myKomp).Visible := tab1.FieldByName('Visible').AsBoolean;
  end;
end;