Hola
El asunto es asi:
Código Delphi
[-]
begin
DataModule1.AC1.BeginTrans;
try
end;
DataModule1.AC1.CommitTrans;
except
on E:Exception do DataModule1.AC1.RollbackTrans;
end;
Esto usando un datamodule.
AC1, es el conector a la base de datos en este caso.
Saludos