primero que nada, gracias por responder el codigo es:
Código Delphi
[-] Try
with dmConfigs do
begin
If not cnnCoexIni.InTransaction Then
cnnCoexIni.BeginTrans;
tContribuyentes.Append;
end;
pageControl.ActivePage:=Datos;
pCtrl.ActivePage:=tDatos;
dbClave.SetFocus;
Controles(False);
except
On E: Exception do begin
Controles(True);
pageControl.ActivePage:=Consulta;
tContribuyentes.Cancel;
with dmConfigs do begin
If cnnCoexIni.InTransaction Then
cnnCoexIni.RollbackTrans;
end;
raise Exception.create('Cont.New: Error al intentar procesar la transaccion, Error: "'+IntToStr(E.HelpContext)+' : '+E.Message+'"')
end;
end;
este codigo lo tengo dentro de una Accion, a la cual llamo desde cualquier control, en este caso, la estaba llamando desde un boton de una barra de devexpress, lo mas raro de todo es que si la accion se la asigno a un boton normal, este trabaja de forma correcta. aclaro que el boton de la barra a la que se lo asigno es de uno de esos que viene de forma estandar con las barras de navegacion de bd, no se si esto sea un impedimento para que ejecute mi accion en lugar de la que de seguro viene predefinida; esto se me hace bastante raro tambien porque utilizo la misma barra y opciones en otras formas, y no en todas pasa lo mismo