Código Delphi
[-]
while not form5.ADOTable1.eof do
begin
edit3.Text:=form5.ADOTable1ADELANTO.AsString;
form5.ADOTable1.Next;
end;
De momento faltaría ese punto y coma, pero no he seguido analizando algún fallo más que pueda haber, porque creo que lo correcto sería montar una simple consulta SQL.
Un Saludo.