فهرست منبع

* call mysql_init

fpc 20 سال پیش
والد
کامیت
f8849f9396
1فایلهای تغییر یافته به همراه1 افزوده شده و 0 حذف شده
  1. 1 0
      tests/utils/dbtests.pp

+ 1 - 0
tests/utils/dbtests.pp

@@ -72,6 +72,7 @@ begin
 {$ifdef ver1_0}  
   Result:=mysql_connect(@Connection,PChar(Host),PChar(User),PChar(Password))<>Nil;
 {$else}  
+  mysql_init(@Connection);
   Result:=mysql_real_connect(@Connection,PChar(Host),PChar(User),PChar(Password),Nil,0,Nil,0)<>Nil;
 {$endif}  
   If Not Result then