Como pasar los datos de un query a un ClientDataSet

[[oscarac]]

buenos dias
estoy tratando de hacer un modulo de ingreso de mercaderia y tengo esta curiosidad

cuando quiero modificar el ingreso de la mercaderia (para agregar o eliminar items), tengo un query que me captura el detalle de los articulos a ingresar y tengo un ClientDataset,el cual quiero llenar con los datos del query, para poder usar el clientdataset para "manipular" los datos, estoy haciendo mas o menos asi

Código Delphi [-]
 
qryDatos.first;
While not qryDatos.eof Do
Begin
  CDSDatos.append;
  CDSDatosCodigo.value := qryDatosCodigo.Value;
  CDSDatosCantidad.value := qryDatosCantidad.value
  ...
  ...
  ...
  CDSDatos.Post;
end;

existe otra forma?

gracias