Estoy usando un TADOQUERY para hacer una consulta a una DB en SQL Server...
Código Delphi
[-]
Query1.SQL.Text := 'Select IdDepartamento,Departamento from Departamentos';
Query1.Active := True;
recs := Query1.MaxRecords;
WHile not Query1.Eof Do
Begin
Combo.Items.Add(Query1.Fields[0].asstring);
if not Query1.Eof then
Query1.FindNext;
end;
Resulta que siempre he usado el Query1.FindNext, pero ahora me da un error, cuando llega al final de los registros. Por eso utilizo el Query1.EOF, pero aun asi me da el error.
Alguna idea?
Gracias de antemano...