Revision: 691
Author: jcmoraisjr
Date: 2006-07-30 07:25:35 -0700 (Sun, 30 Jul 2006)
ViewCVS: http://svn.sourceforge.net/instantobjects?rev=691&view=rev
Log Message:
-----------
- Fixed [1473942] Boolean attributes cause error
Modified Paths:
--------------
trunk/Source/Brokers/ZeosDBO/InstantZeosDBO.pas
trunk/Source/Brokers/ZeosDBO/InstantZeosDBOCatalog.pas
Modified: trunk/Source/Brokers/ZeosDBO/InstantZeosDBO.pas
===================================================================
--- trunk/Source/Brokers/ZeosDBO/InstantZeosDBO.pas 2006-07-22 22:43:16 UTC (rev 690)
+++ trunk/Source/Brokers/ZeosDBO/InstantZeosDBO.pas 2006-07-30 14:25:35 UTC (rev 691)
@@ -1122,7 +1122,7 @@
function TInstantZeosDBOMySQLBroker.UseBooleanFields: Boolean;
begin
- Result := True;
+ Result := False;
end;
{$ENDIF}
Modified: trunk/Source/Brokers/ZeosDBO/InstantZeosDBOCatalog.pas
===================================================================
--- trunk/Source/Brokers/ZeosDBO/InstantZeosDBOCatalog.pas 2006-07-22 22:43:16 UTC (rev 690)
+++ trunk/Source/Brokers/ZeosDBO/InstantZeosDBOCatalog.pas 2006-07-30 14:25:35 UTC (rev 691)
@@ -24,6 +24,7 @@
* the Initial Developer. All Rights Reserved.
*
* Contributor(s):
+ * Joao Morais
*
* ***** END LICENSE BLOCK ***** *)
@@ -219,13 +220,12 @@
stString,
stUnicodeString: DataType := dtString;
stBoolean: DataType := dtBoolean;
- stShort:
+ stShort, stByte:
begin
DataType := dtBoolean;
Include(AlternateDataTypes, dtInteger);
end;
- stByte,
- stInteger,
+ stInteger,
stLong: DataType := dtInteger;
stFloat,
stDouble:
|
