Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 22-11-2008
foxito foxito is offline
Miembro
 
Registrado: abr 2008
Ubicación: Orizaba, Ver
Posts: 32
Poder: 0
foxito Va por buen camino
Problemas Con El Clientdataset Y Tztable

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
Responder Con Cita
  #2  
Antiguo 22-11-2008
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Poder: 21
enecumene Va por buen camino
Hola, dos cosas:

1) En ningún momento has abierto la tabla TAnaClinicos.
2) Con ClientDataset debes realizar Insert...Post y luego el ApplyUpdates.

Haz esos cambios y luego nos comentas.

Saludos.
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita
  #3  
Antiguo 22-11-2008
foxito foxito is offline
Miembro
 
Registrado: abr 2008
Ubicación: Orizaba, Ver
Posts: 32
Poder: 0
foxito Va por buen camino
Hola ecumene, antes que nada gracas por contestarme mi msg. ya abri la TZTABLE.OPEN; pero aún asi no realiza nada. No se ve el efecto de insercción de registro... por ej. en mi dbgrid no inserta ningún registro solo se posiciona en primer registro del dbgrid.

Gracias
Responder Con Cita
  #4  
Antiguo 23-11-2008
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Poder: 21
enecumene Va por buen camino
¿Luego del Append realizaste el Post?, porque para grabar en el clientdataset debes realizar el post para luego grabar en la base fisica via del Applyupdates.

Saludos.
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita
  #5  
Antiguo 24-11-2008
foxito foxito is offline
Miembro
 
Registrado: abr 2008
Ubicación: Orizaba, Ver
Posts: 32
Poder: 0
foxito Va por buen camino
gracias nuevamente por cotestarme y estarme ayudando econumene... despues del CLIENTDATASET.APPEND; le adicione el CLIENTDATASET.POST;
pero ahora me manda el siguiente error FIELD 'Nombre' MUST HAVE A VALUE

estoy haciendo otra burrada
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Problemas con el MasterSource en un ClientDataset ygkw Conexión con bases de datos 2 05-03-2015 22:59:59
Problemas con clientdataset y limit Edgtho Conexión con bases de datos 11 02-06-2008 08:32:58
ExecSQL en TZTable david_uh Varios 1 20-06-2007 01:22:43
¿ Limit en TZTable de los Zeos ? against Conexión con bases de datos 2 26-09-2006 16:36:24
hola prengunta referedia a Tztable tutuk Conexión con bases de datos 2 10-08-2005 14:35:19


La franja horaria es GMT +2. Ahora son las 11:42:40.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi