Ver Mensaje Individual
  #1  
Antiguo 11-05-2007
OscarBravo OscarBravo is offline
Miembro
 
Registrado: feb 2007
Posts: 23
Reputación: 0
OscarBravo Va por buen camino
Ayuda, No puedo nsertar registros en tablas DBase IV Desde Delphi

Cómo trabajo con tablas Dbase IV en delphi ??

Saludos a todos.

Básicamente tengo estos dos inconvenientes:
  1. ¿Cómo me conecto a tablas Dbase IV En forma nativa sin odbc? (Desde Delphi)
  2. ¿Como inserto registros en tablas Dbase IV (desde Delphi)
Tengo una aplicacion hecha en Clipper la cual no desarrollé yo.
Esta aplicacion maneja tablas dbf (xBase).
Desarrllé un pequeño aplicativo en Delphi 7.0 con el que me conecto a dichas tablas a traves de un ODBC
En delphi utilizo ADOConnection para la conexion con las tablas, me ha funcionado bien en cuanto a consultas, he podido obtener cualquier información de las tablas. (Leí algo en el foro respecto a que me puedo conectar en forma nativa, pero no se como es ¿Alguein sabe algo al respecto?.)

Lo que no he podido hacer es GRABAR REGISTROS en las tablas.
Que debo hacer para lograr GRABAR REGISTROS

Para conectarme a las tablas (Directorio donde estan las tablas), utilizo un ODBC.

La conexion que utilizo es ADOConnection.

Esta es el código con el que intento grabar los registros.

NumRec := Format('%.8d',[(Dm.TableLbcMafcc.RecordCount + 1)]);
Dm.TableLbcMafcc.Append;
Dm.TableLbcMafcccodfac.Value := Numrec;
Dm.TableLbcMafcccodemp.Value := Dm.QrFacturacionident.Value;
Dm.TableLbcMafcccodrec.Value := Dm.QrFacturacionexamen.Value;
Dm.TableLbcMafccfecini.Value := Dm.QrFacturacionfecha.Value;
Dm.TableLbcMafccfecFin.Value := Dm.QrFacturacionfecha.Value;
Dm.TableLbcMafcctotal.Value := Total;
Dm.TableLbcMafccabono.Value := 0;
Dm.TableLbcMafcccontabil.Value := False;
Dm.TableLbcMafcc.Post;

Respecto a los componentes que utilizo:

ADOConnection Para la conexion (Paleta ADO)
TADOTable Para anlazar con la tabla (Paleta ADO)
TdataSetProvider Para los DbGrid (Paleta data Acces)

Agradezco la colaboración que puedan brindarme.
Responder Con Cita