Para muestra un botón, el siguiente código corresponde a la propiedad tablename del componente tztable de los componentes zeoslib:
Código Delphi
[-]
procedure TZAbstractTable.SetTableName(const Value: string);
begin
if FTableName <> Value then
begin
FTableName := Value;
if Value <> '' then
SQL.Text := Format('SELECT * FROM %s', [FTableName])
else SQL.Text := '';
end;
end;