Hola foro:
He realizado con éxito una migración de base de datos de InterBase a Firebird.
Ahora estoy tratando de no utilizar más BDE para la conexión,
Para conectarme decidí utilizar TIBDatabase (lo nombré "DBConexion").
y un TIBTransaction enlazado (lo nombré "Administracion").
A continuación transcribo el código que utilizo "hasta ahora" para modificar datos utilizando transacciones.
Código Delphi
[-]begin
D_Datos.Administracion.StartTransaction;
Try
qUpdate.ParamByName('P_ID_Operador').Value:=1;
qUpdate.ExecSQL;
D_Datos.Administracion.Commit;
Except
D_Datos.Administracion.Rollback;
MessageDlg('Error');
raise;
end;
end;
en la línea D_Datos.Administracion.StartTransaction, da el error "Transaction is active"
Les recuerdo que "Administracion" es el componente TIBTransaction.
Bueno. Desde ya gracias por su atención.