[marto]

Si consideramos que DataSet es el TDataSet (Query o tabla) en que tines lo datos, para recorrerlo te será suficiente con el siguiente código:

  DataSet.First;
  while not DataSet.Eof do
  begin
    {Aquí puedes acceder a los valores con

      DataSet.FieldByName('nombre').AsString
      DataSet.FieldByName('precio').AsInteger
     
      Y guardarlos donde quieras o asignarles el valor que quieras}

    DataSet.Next;
    //Sin esta línia sería un bucle infinito!!!!!
  end;