[Instantobjects-cvscommit] Source/Brokers/DBX InstantDBX.pas,1.10,1.11

[Carlo B. <car...@us...>]

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)