在使用DelphiXE3和sqlite3进行程序开发时，如果使用原版的sqliteTable3，当使用UTF8Decode函数之后，可能依然存在乱码问题，一个表现就是，最后一个汉字显示为框，后面跟一个问号，其他的汉字解码正常。

后来跟踪了一下sqliteTable3的源代码，从sqlite获取的字符串数据是正确的，但是因为TsqliteTable的构造函数在读取sqlite返回的UTF8字符串时使用了setstring函数，强行将数据字段进行了转换，引起字符串长度出现错误，所以在UTF8Decode解码时出现了漏解码的问题。

这里给出一种解决方案，修复了该Bug。

1.将TsqliteTable的构造函数Create中的setstring行改为：

Var

strStr: String;
strValue: PWideChar;

//****************************************

strStr := UTF8Decode(AnsiString(ptrValue));

strValue := PWideChar(strStr);
setstring(thisStringValue^,strValue,strlen(strValue));

因为在delphixe3中，setstring函数的第二个参数是PChar，也就是PWideChar类型。

2.在面在调用时，不需要再UTF8Decode解码