Пытаюсь сделать приложение на двух транзакция. Одна для чтения, другая для записи
Код: Выделить всё
DataForm.Transaction.TRParams.Clear;
DataForm.Transaction.TRParams.Add('isc_tpb_read');
DataForm.Transaction.TRParams.Add('isc_tpb_nowait');
DataForm.Transaction.TRParams.Add('isc_tpb_read_committed');
DataForm.Transaction.TRParams.Add('isc_tpb_rec_version');
DataForm.WriteTransaction.TRParams.Clear;
DataForm.WriteTransaction.TRParams.Add('isc_tpb_write');
DataForm.WriteTransaction.TRParams.Add('isc_tpb_wait');
DataForm.WriteTransaction.TRParams.Add('isc_tpb_read_committed');
DataForm.WriteTransaction.TRParams.Add('isc_tpb_rec_version');
DataForm.Database.Open;
DataForm.Transaction.Active:=True;
select * mon$transaction
Почему READ_ONLY=No ?ISOLATION_MODE: read committed record version
LOCK_TIMEOUT: No wait
READ_ONLY: No
AUTO_COMMIT: No
AUTO_UNDO: Yes
Проблема решена:
Надо вручную задать параметры Transaction.TPBMode=tpbDefault