* Support ftMemo parameters

git-svn-id: trunk@7901 -
This commit is contained in:
joost 2007-07-01 11:32:13 +00:00
parent d96e4d1f60
commit b2d59b9599

View File

@ -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;