Hola
Suponiendo que los datos los saco de una query que llamaremos consulta
Código Delphi
[-]
procedure llenar_array(consulta:tibquery);
var miArreglo : Array of String;
n:integer
begin
n:=0;
while not consulta.eof do begin
SetLength(miArray, n+1);
miArreglo[n] := consulta.fieldbyname('campo').asstring;
inc(n);
consulta.next
end;
end;
No se si eso te sirve pero es como yo las utilizo
Saludos