Código Delphi [-]while not NombreSQL.Eof do begin vNombCol.Add(NombreSQL.FieldByName('NOMBRE').AsString); NombreSQL.Next; end;
while not NombreSQL.Eof do begin vNombCol.Add(NombreSQL.FieldByName('NOMBRE').AsString); NombreSQL.Next; end;