Update of /cvsroot/instantobjects/Source/Brokers/DBX
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22111/Source/Brokers/DBX
Modified Files:
InstantDBX.pas
Log Message:
DbExpress broker compatible with Oracle Corelab driver
Index: InstantDBX.pas
===================================================================
RCS file: /cvsroot/instantobjects/Source/Brokers/DBX/InstantDBX.pas,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -d -r1.10 -r1.11
*** InstantDBX.pas 17 Oct 2005 10:21:18 -0000 1.10
--- InstantDBX.pas 9 Dec 2005 15:12:33 -0000 1.11
***************
*** 235,242 ****
else if SameText(Connection.DriverName, 'MSSQL') then
Result := TInstantDBXMSSQLBroker.Create(Self)
! else if SameText(Connection.DriverName, 'SQLServer') then //For CoreLab DbExpress driver
Result := TInstantDBXMSSQLBroker.Create(Self)
else if SameText(Connection.DriverName, 'Oracle') then
Result := TInstantDBXOracleBroker.Create(Self)
else if SameText(Connection.DriverName, 'DB2') then
Result := TInstantDBXDB2Broker.Create(Self)
--- 235,244 ----
else if SameText(Connection.DriverName, 'MSSQL') then
Result := TInstantDBXMSSQLBroker.Create(Self)
! else if SameText(Connection.DriverName, 'SQLServer') then //For CoreLab driver
Result := TInstantDBXMSSQLBroker.Create(Self)
else if SameText(Connection.DriverName, 'Oracle') then
Result := TInstantDBXOracleBroker.Create(Self)
+ else if SameText(Connection.DriverName, 'Oracle (Core Lab)') then //For CoreLab driver
+ Result := TInstantDBXOracleBroker.Create(Self)
else if SameText(Connection.DriverName, 'DB2') then
Result := TInstantDBXDB2Broker.Create(Self)
|
