Ver Mensaje Individual
  #3  
Antiguo 12-06-2017
Avatar de oscarac
[oscarac] oscarac is offline
Miembro Premium
 
Registrado: sep 2006
Ubicación: Lima - Perú
Posts: 2.010
Reputación: 20
oscarac Va por buen camino
Lo solucione de esta manera, lo publico porque quizá a alguien le pueda ayudar.

Código Delphi [-]
procedure TfrmIngresoComprobantesVarios.DuplicarRegistro;
Var CdsClone : TClientDataSet;
    i: Integer;
begin
  CdsDetalle.Last;
  CdsClone := TClientDataSet.Create(Application);
  try
    CdsClone.CloneCursor(Self.CdsDetalle, True);
    CdsDetalle.Append;
    for I := 0 to CdsClone.FieldCount - 1 do
      CdsDetalle.Fields[i].Value := CdsClone.Fields[i].Value;
    CdsClone.Close;
  finally
    CdsClone.Close;
  end;
  CdsClone.Destroy;
end;
__________________
Dulce Regalo que Satanas manda para mi.....
Responder Con Cita