[patch_done] program crash for Lazarus and MySql on query

Code patches written by our users to solve certain "problems" that were not solved, yet.

Moderators: gto, cipto_kh, EgonHugeist, mdaems

ism
Zeos Test Team
Zeos Test Team
Posts: 202
Joined: 02.10.2010, 20:48

[patch_done] program crash for Lazarus and MySql on query

Postby ism » 07.05.2011, 15:03

for testing branch

Discussion

http://zeos.firmos.at/viewtopic.php?t=3151

Code: Select all

Index: src/dbc/ZDbcMySqlUtils.pas
===================================================================
--- src/dbc/ZDbcMySqlUtils.pas   (revision 888)
+++ src/dbc/ZDbcMySqlUtils.pas   (working copy)
@@ -370,14 +370,23 @@
     Result := stDouble
   else if TypeName = 'CHAR' then begin
     if IsUnicodeField then
-       Result := stUnicodeString
+    {$IFDEF FPC}
+      Result := stString
+    {$ELSE}
+      Result := stUnicodeString
+    {$ENDIF}
     else
      Result := stString;
   end else if TypeName = 'VARCHAR' then begin
     if IsUnicodeField then
-       Result := stUnicodeString
+    {$IFDEF FPC}
+      Result := stString
+    {$ELSE}
+      Result := stUnicodeString
+    {$ENDIF}
     else
      Result := stString;
+
   end
   else if TypeName = 'VARBINARY' then
     Result := stBytes

ism
Zeos Test Team
Zeos Test Team
Posts: 202
Joined: 02.10.2010, 20:48

Postby ism » 07.05.2011, 19:20

sorry , i updated first post
Lazarus 1.0.8 fpc 2.6.0

User avatar
mdaems
Zeos Project Manager
Zeos Project Manager
Posts: 2766
Joined: 20.09.2005, 15:28
Location: Brussels, Belgium
Contact:

Postby mdaems » 19.05.2011, 21:39

SVN rev. 903.
Image


Return to “User Patches”

Who is online

Users browsing this forum: No registered users and 1 guest