浏览代码

* also test for fbembed in old "auto" initialization. Mantis #17664

git-svn-id: trunk@18952 -
marco 14 年之前
父节点
当前提交
499062d815
共有 1 个文件被更改,包括 3 次插入2 次删除
  1. 3 2
      packages/ibase/src/ibase60.inc

+ 3 - 2
packages/ibase/src/ibase60.inc

@@ -2647,9 +2647,10 @@ begin
     end
   else
     begin
-    If (TryInitialiseIBase60(fbclib)=0) and
+    If (TryInitialiseIBase60(fbembedlib)=0) and 
+       (TryInitialiseIBase60(fbclib)=0) and
        (TryInitialiseIBase60(gdslib)=0) then
-        Raise EInOutError.CreateFmt(SErrDefaultsFailed,[gdslib,fbclib]);
+        Raise EInOutError.CreateFmt(SErrDefaultsFailed,[fbembedlib,gdslib,fbclib]);
     end;    
   Result := RefCount;
 end;