> причиной накопления версий является "неработа" сборки мусора.
> в твоем случае причина скорее всего в длительности работы транзакций.
> Сделай их короче, тогда версии будут становиться мусором, и будут
> собираться автоматически.
Как проверить, насколько у меня длинная транзакция? Судя по коду (в конце
поста), то она сразу завершается. Может ли влиять то, что подключение идёт
через ADO и ODBC-драйвера (EasySoft ODBC driver)?
Кусок кода:
s := Format(
'select * from sp_add_point(''%s'',%d,%0.4f,%0.4f,%d,%d,%d,%d)',
[
<skipped>
]);
frmMain.aqAddPoint.Close;
frmMain.aqAddPoint.SQL.Text := s;
frmMain.aqAddPoint.Open;
frmMain.aqAddPoint.Close;
frmMain.aqAddPoint.SQL.Text := 'commit';
frmMain.aqAddPoint.ExecSQL;
--~--~---------~--~----~------------~-------~--~----~
-~----------~----~----~----~------~----~------~--~---