* Support ftMemo parameters

git-svn-id: trunk@7901 -

packages/fcl-db/src/sqldb/interbase/ibconnection.pp

@@ -759,7 +759,7 @@ begin
           end;
         ftFloat:
           SetFloat(in_sqlda^.SQLvar[SQLVarNr].SQLData, AParams[ParNr].AsFloat, in_SQLDA^.SQLVar[SQLVarNr].SQLLen);
-        ftBlob:
+        ftBlob, ftMemo:
           begin
           SetBlobParam;
           end;