Copiar el contenido de un DataSet a otro DataSet

[Javi2]

Hola,

¿Hay alguna manera rápida de copiar el contenido de un TDataSet a otro TDataSet?Por si sirve de algo, los datos los obtengo a través de una TQuery

Muchas gracias

[ContraVeneno]

¿y si utilizas el mismo query para los dos datasets?

[Javi2]

Es un poco complejo de explicar pero no me sirve. Realmente necesito copiar el contenido de un TDataSet en otro.

Muchas gracias por tu ayuda

[Javi2]

He encontrado el siguiente procedimiento que creo que me servirá (tiene buena pinta):

procedure MoverDatosTabla(prmDSOrigen, prmDSDestino :TDataSet);
var Campo :string;
i :integer;
begin
prmDSDestino.EmptyTable;
prmDSDestino.Open;

with prmDSOrigen do begin
Open;
while not EOF do begin
prmDSDestino.Append;
for i := 0 to FieldCount-1 do begin
Campo := prmDSOrigen.Fields[i].FieldName;
prmDSDestino[Campo] := prmDSOrigen[Campo];
end;
prmDSDestino.Post;
Next;
end;
Close;
end;
prmDSDestino.Close;
end;

Os lo dejo aquí por si a alguien le interesa.

Muchas gracias a todos por vuestra colaboración.

[Enan0]

y con un

Dataset1:=datasetorigen;

en este caso tendrias los datos en dos datasets distintos

[[maeyanes]]

No, así lo único que estaría haciendo es solo apuntar al mismo dataset de origen desde otra variable.



Saludos...

[Neftali [Germán.Estévez]]

Empezado por Javi2

¿Hay alguna manera rápida de copiar el contenido de un TDataSet a otro TDataSet? Por si sirve de algo, los datos los obtengo a través de una TQuery

Eso no tiene mucho sentido; Los datos que están viendo en el DataSet son el resultado de una consulta;
(a) Si lo que quieres es otro DataSet con los mismos datos, vuelve a ejecutar la misma consulta en el segundo DataSet.
(b) Si el segundo DataSet es una tabla, yo te recomiendo que revises la cláusula SQl INSERT..INTO; Una vez insertados abre el segundo DataSet sobre la tabla destino.
(c) Si el segundo DataSet es una tabla y no puedes utilizar INSERT..INTO; Haz un recorrido por el primer DataSet y ves insertando en el segundo (Post o INSERT-SQL-);
(d) Si el segundo DataSet es una tabla y usas BDE, revisa en la ayuda de Delphi sobre el componente TBachMove.

[Rayku]

usa la funcion clone,

Código Delphi [-]
ado.clone(cventa.listarseries(dmconeccion.adoconection,error));

la funcion listar series es otro dataset

//Lo Edite para poner todo en minusculas

[Rayku]

Código Delphi [-]
ADODATASET2.Clone(ADODATASET1);

ok espero este mejor explicado aqui

//Lo edite por la misma razon del anterior

[[maeyanes]]

Hola...

Ya te fijaste de la fecha del mensaje original? Es de hace más o menos un año...

Otra cosa, te recomiendo que leas la Guía de Estilo de los foros.

Saludos...

[Neftali [Germán.Estévez]]

Empezado por maeyanes

...Es de hace más o menos un año...

Espero que no esté esperando la respuesta...

[[jesusomarsanche]]

si los dos dataset tienen la misma estructura

Código Delphi [-]
 
insert into tabladestino select * from tabla origen [where ....][order by ...]

si no tienen la misma estructura

Código Delphi [-]
insert into tabladestino select campo1,campo2,... from tabla origen [where.... ][order by ...]

o

Código Delphi [-]
insert into tabladestino(campo1,campo2,..) select campo1,campo2,... from tabla origen [where.... ][order by....]

espero les sirva, logico a los que andemos buscasdo un caso similar, ya que la pregunta tiene bastante tiempo

[jhonny]

Este Hilo podría ser bautizado como el Ave Fénix

[[maeyanes]]

jaja...

Reviviendo hilos viejos...

Que cosas...

[ContraVeneno]

Y habiendo renacido de las cenizas, con el poder que se me confiere, les digo hoy mis hermanos, que el día 21/11/2007 este hilo volverá a renacer como lo ha estado haciendo por los últimos dos años....

[jhonny]

Empezado por ContraVeneno

Y habiendo renacido de las cenizas, con el poder que se me confiere, les digo hoy mis hermanos, que el día 21/11/2007 este hilo volverá a renacer como lo ha estado haciendo por los últimos dos años....

Estaré allí para recordarlo

[ContraVeneno]

Pues aquí estoy, reviviendo el hilo que renace cada año.

No se me olvidó, pero creo que a Jhonny sí



Saludos

[[eduarcol]]

que clase de alarma extraña tenias programada por ahi

[jhonny]

Empezado por ContraVeneno

Pues aquí estoy, reviviendo el hilo que renace cada año.

No se me olvidó, pero creo que a Jhonny sí

Bueno, parece que tuve un problema con el calendario de google pues no quizó decirme nada , aunque la verdad es que siempre me acuerdo de estas cosas pero esta se me paso por completo.

[jhonny]

Definitivamente no tenia bien configurado ese recordatorio ...

http://img512.imageshack.us/img512/2...revivirza8.jpg