[foxito]

Hola Delphineros, vengo con un problema, resulta que estoy desarrollando una alta de medicos en una tabla de MySQL vs DELPHI 7 y utilizó las librerias de ZEOS los Componentes TZTABLE, DATASETPROVIDER1, CLIENTDATASET1 Y DATASOURCE y estan enlazados de la siguiente manera:

TZTABLE : CONNECTION = CON MI DATAMODULE
DATASETPROVIDER1 : DATASET = TZTABLE
CLIENTDATASET1 : PROVIDERNME = DATASETPRIVDER1
DATASOURCE : DATASET = CLIENTDATASET1

Al darle un click e insertar un nuevo registro no lo realiza y mi codigo es este:

Código Delphi [-]
procedure TFAna_Clinicos.FormCreate(Sender: TObject);
begin
  ClientDataSet1.Open;
  TAnaClinicos.Close;
end;
 
procedure TFAna_Clinicos.TBNewClick(Sender: TObject);
begin
  If TNew then  //Nuevo
    Begin
//      TAnaClinicos.Append;
      ClientDataSet1.Append;
//      Init_Field();
      DBEdit2.SetFocus;
      TBNew.ImageIndex := 1;
      TBNew.Caption := 'F4:  Salvar';
      TBNew.Hint := 'Grabar los cambios';
      TNew  := False;
    End
  Else
    Begin
//      TAnaClinicos.Post;
      ClientDataSet1.ApplyUpdates(0);
      Init_Field();
      EdReg.Text  := IntToStr(TAnaClinicos.RecordCount);
      TBNew.ImageIndex := 0;
      TBNew.Caption := 'F3:  Nuevo';
      TBNew.Hint := 'Nuevo registro';
      TNew  := True;
    End;
end;

Ayudeme porque no se realiza la inserción, ademas de que en mi FORM no se queda en blanco como si omitiera la inserción