[MartinS]

Hola: y esto?

Código Delphi [-]
Procedure TPAlta.SeleccionTabla(Tabla:String);
Begin
   IBQuery1.Close;
   IBQuery1.SQL.Add('Select * From '+Tabla);
   //...
   //...
End;


// Ejemplo de llamada
procedure TPalta.Button1Click(Sender: TObject);
begin
   SeleccionTabla('Clientes');
end;

Con componentes para interbase/firebird pero la metodologia es la misma. Ojo solo para que pruebes ya que me parece medio innecesario hacer todo un procedimiento para evitar escribir una sentencia SQL.-

Saludos