diff --git a/FIBQuery.pas b/FIBQuery.pas
index f124cbf..503e35b 100644
--- a/FIBQuery.pas
+++ b/FIBQuery.pas
@@ -2054,8 +2054,6 @@ procedure TFIBXSQLVAR.InternalSetAsString(aValue:Pointer; IsWide:boolean; Adjust
     else
      vValue:=PAnsiString(aValue)^;
    end;
-   if vNeedUTFEncode then
-     FXSQLVAR^.sqlsubtype:=chUnicodeFSS;
    if Length(vValue)>32767 then
     sSQLType:=SQL_BLOB;
     if (sSQLType = SQL_BLOB) then