Insertar registros en Firebird

[GustavoCruz]

Hola amigos del foro, mi pregunta viene porque he estado intentando insertar unos registros pero no he podido lograr hacerlo.


de antemano mil gracias

[Casimiro Noteví]

¿Y por qué no has podido?

[GustavoCruz]

veras, yo conecto la base de datos y pongo el SQLtransaction. luego pongo el SQLQuery y en la propiedad de InsertSQL pongo la sentencia adecuada.

el problema es que cuando cierro la conección, se pierden los registro.

Al finalizar la inserción yo pongo

Código SQL [-]
SQLTransaction.CommintRetaing

y eso debería ser suficiente pero no...

De antemano mil gracias por vuestro tiempo y aportes

[Casimiro Noteví]

¿No habrás olvidado hacer 'post' después del insert?

[marcoszorrilla]

Haz caso a Casimiro:

Código Delphi [-]
procedure TfrProveedores.BitBtn1Click(Sender: TObject);
begin
 if DmProv.IBDTsProv.State in [dsInsert, dsEdit] then
 DmProv.IBDTsProv.Post;

Código Delphi [-]
procedure TDmProv.IBDTsProvAfterPost(DataSet: TDataSet);
begin
DmConex.IBTransaction.CommitRetaining;
end;

Un Saludo.

[GustavoCruz]

hola amigos, yo en lazarus escribo asì:

Código Delphi [-]
with SQLQuery1 do
begin
  insertSQL.Clear;
  insertSQL.Add('insert into tabla(campos) values(valores)');
  ...
end;

y eso debería ser suficiente para insertar los registros...

pero no funciona