Hola todos:
Estoy pasando registros de una tabla a otra.
lo estoy haciendo con este procedimiento:
Código Delphi
[-]
Data.First;
while not Data.Eof do
begin
ADOTable.Append;
for i := 0 to Data.FieldCount - 1 do
begin
ADOTable.Fields[i].Value:= data.Fields[i].Value;
end;
Data.Next;
end;
pero me encontre con esto:
Código Delphi
[-]
ADOTable.AppendRecord(datos)
Ya probe
AppendRecord y en verdad funciona, lo que no se es como pasar el registro de
Data que es mi dataset para que quede almacenado en la variable
Datos .
De lograrlo me ahorraria el ciclo
FOR.
gracias.