guardar datos correctamente con un ClientDataSet.

[[Caral]]

Hola

Código Delphi [-]
if ventana = 'Clientes' then
  begin
    if FrmCliente = nil then
    begin
      FrmCliente := TfrmCliente.create(FrmCliente);
      Try
      FrmCliente.Parent := FrmPrincipal.Panel4;
      FrmCliente.Caption := 'Clientes';
      dmacceso.cdsClientes.Active := True;
      dmacceso.cdsClientes.Last;
      dmacceso.cdsClientes.Insert;
      FrmCliente.Show;
      finally
      If FrmCliente.Caption <> ' ' then
      Begin
      FrmPrincipal.TabSet1.Tabs.add(FrmCliente.Caption);
      FrmPrincipal.TabSet1.TabIndex := FrmPrincipal.TabSet1.Tabs.Count - 1;
      end;
      end;
    end
  
  end;

Saludos

[[maeyanes]]

Hola...

¿Y por que llamas al método Edit y luego limpias los campos del registro? ¿Qué finalidad tiene ese código?

La secuencia lógica para agregar registros sería:

Código Delphi [-]
// Creamos y mostramos el formulario

// Se agrega un nuevo registro en el DataSet:
dmAcceso.cdsClientes.Insert;

// Se presiona el botón Guardar o Aceptar
dmAcceso.cdsClientes.Post;

// Se pregunta si se quiere agregar otro, si es si, otra vez hacemos otro insert:
dmAcceso.cdsClientes.Insert;

// Al cerrar el formulario puedes llamar un ApplyUpdates:
dmAcceso.cdsClientes.ApplyUpdates(0);

Saludos...