|
Aquí tienes un pequeño ejemplo:
with Query1 do
begin
Database1.StartTransaction;
try
ApplyUpdates;
Database1.Commit; {inicias la transacción};
except
Database1.Rollback; {en caso de error se deshacen los cambios hasta el último commit realizado}
raise;
end;
CommitUpdates; {se actualizan los datos y se borran de la caché si todo va bien}
end;
end;
Aunque yo sé de que va la cosa, pero este ejemplo lo he sacado de la ayuda de delphi, te aconsejo que busques en ella, yo no domino muy bien el ingles, pero con algunas palabras sueltas se sacan buenas conclusiones, saludos.
__________________
No hay vientos favorables para quién no conoce su rumbo.
|