Hi
Looking at Interbase unit (fcl/db/interbase/interbase.pp), I see that TIBTransaction was probably meant to publish properties AccessMode, IsolationLevel, LockResolution and TableReservation. This would be definitely useful to users of this class. I'm attaching simple patch that does this.
Michalis.
Index: interbase.pp
===================================================================
RCS file: /FPC/CVS/fpc/fcl/db/interbase/interbase.pp,v
retrieving revision 1.15
diff -u -r1.15 interbase.pp
--- interbase.pp 14 Feb 2005 17:13:12 -0000 1.15
+++ interbase.pp 16 Mar 2005 11:30:30 -0000
@@ -175,6 +175,16 @@
{ Transaction must be assigned to some database session, for which purpose
you must use this property}
property Database : TIBDatabase read FDatabase write FDatabase;
+
+ { These four properties will be used in next StartTransaction calls }
+ property AccessMode: TAccessMode
+ read FAccessMode write FAccessMode default amReadWrite;
+ property IsolationLevel: TIsolationLevel
+ read FIsolationLevel write FIsolationLevel default ilReadCommitted;
+ property LockResolution: TLockResolution
+ read FLockResolution write FLockResolution default lrWait;
+ property TableReservation: TTableReservation
+ read FTableReservation write FTableReservation default trNone;
end;
{ TIBQuery }
_______________________________________________ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-devel
