Ver Mensaje Individual
  #2  
Antiguo 04-04-2005
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Reputación: 28
jachguate Va por buen camino
Cool

Hola lasweb, veo que es tu primer mensaje, asi que bienvenido al cub delphi.

Si lo que queres es "voltear" todos los registros de un dataset a otro, entre otras formas, podes hacer un "ciclo" que pase los registros uno por uno de un lado a otro... algo como:

Código Delphi [-]
Procedure TForm1.CopiarRegistros;

Begin
  Tabla1.Open;
  while not Tabla1.eof do
  Begin
    Tabla2.Insert;
    Tabla2Campo1.Value := Tabla1Campo1.Value;
    Tabla2Campo2.Value := Tabla1Campo2.Value;
    Tabla2.Post;
    Tabla1.Next; 
  end;
end;

Hay también otras formas de lograr el mismo resultado, quizas mas rápidas o eficientes, pero depende de si las tablas están en la misma base de datos, de que motor uses y algunas otras variables.

Hasta luego.

pd. ¿Notas la diferencia entre el código de delphi que yo he publicado y el tuyo?. Te recomiendo buscar al principio de cada foro el tema que habla sobre las etiquetas [ code ], [ delphi ] y [ sql ] especiales para publicar código.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita