[firebase-br] Commit
Nereu Kock
nfkock em gmail.com
Qua Out 3 10:41:59 -03 2012
Sou principiante em firebird. Estou usando a versão 2.51 e delphi 2010.
Quando dou um insert, delete ou Update em Sql o efeito não é imediato, o
que fazer? Segue o exemplo do que uso.
procedure InsUpDel(Str: String);
var
SQLQuer : TSQLQuery;
begin
SQLQuer:=TSQLQuery.Create(nil);
SQLQuer.SQLConnection:= DMAca.SQLCon;
Trans.TransactionID := 1;
Trans.IsolationLevel := xilREPEATABLEREAD;
DMAca.SQLCon.BeginTransaction;
SQLQuer.Close;
SQLQuer.CommandText:= Str;
try
SQLQuer.ExecSQL;
DMAca.SQLCon.CommitFreeAndNil(Tr);
except
DMAca.SQLCon.RollbackFreeAndNil(Tr);
end;
DMAca.SQLCon.Connected := True;
SQLQuer.Close;
SQLQuer.Free;
end;
//**********************************
A string enviada é por exemplo:
'Delete from Alunos';
[]s
Mais detalhes sobre a lista de discussão lista