Hola sancarlos, como te dice Eduardo, debes utilizar el componente ScrollBox de la paleta Additional, para obtener la lista de campos de tu tabla puedes utilizar el procedimiento GetFieldNames, el codigo quedaría asi, estoy creando botones por cada campo.
Código Delphi
[-]
var
i, aLeft, aTop : Integer;
Boton : TButton;
slCampos : TStringList;
begin
slCampos := TStringList.Create;
Table1.GetFieldNames(slCampos);
aLeft := 10;
aTop := 10;
for i:=0 to slCampos.Count-1 do
begin
Boton := TButton.Create(Self);
Boton.Parent := ScrollBox1; Boton.Left := aLeft;
Boton.Top := aTop;
Boton.Width := 50;
Boton.Name := slCampos[i];
Boton.Caption := slCampos[i];
inc(aTop,Boton.Height+10);
end;
end;
Saluditos