Contar Columnas de una Tabla.

[[basti]]

Hola

columnas := IBQuery1.Fields.Count;

Pero tienes que ponerlo después de abrir la tabla.

Un saludo

[ramiretor]

Hola:
Para que el while funcione debes tomar en cuenta que el arreglo donde se guardan las columnas, por ejemplo, supongamos que el componente se llama query queda:

[delphi]
with query do
begin
open;
first;
for i:= 0 to FieldCount - 1 do
begin
.....
end;

end;

[nicolasdom]

Muchas Gracias a los dos. Lo pude sacar adelante sin dificultad gracias a que las respuestas fueron puntuales. Uso lo que dijo basti ya que mi select devolvia un solo resultado.