Cita:
Empezado por Casimiro Notevi
El query lo recorres y vas añadiendo los valores al array, ¿es eso lo que quieres hacer?, ¿es una cantidad fija o variable?
|
Ahí te va el ejemplo
Código Delphi
[-]
var
qryDatos : TADOQuery;
ArrayOfDateTime : array of TDateTime;
...
...
...
qryDatos:= TADOQuery.Create(nil)
qryDatos.Connection:= connADOConnection;
with qryDatos do
begin
SQL.Text:= 'SELECT CampoFecha FROM TABLA ORDER BY CampoFecha';
Open;
while not Eof do
begin
SetLength(ArrayOfDateTime, Length(ArrayOfDateTime) + 1);
ArrayOfDateTime[Length(ArrayOfDateTime) - 1]:= FieldByName('CampoFecha').AsDateTime;
Next;
end;
Close;
end;
Así al vuelo es el ejemplo que te doy... ojalá te sirva amigo