ansiToUtf8不适用于从Delphi 7转换的Delphi XE项目？
有一个带有CL8MSWIN1251代码页设置的Oracle9DB和带有一些编辑字段的DelphiXE 我需要将Delphi7中的项目转换为DelphiXE项目，以便使用并能够查看UTF8数据 所以我用DelphiXE打开了dpr文件，它自动转换为dproj。但当我尝试向db中插入一些数据时，我得到的是问题符号（“？”），而不是一些utf8字符。 我尝试使用ansitoUTF8（edit1.text）转换编辑数据（Tedit）。但它不起作用。 然后我在XE中启动了一个新项目，很快添加了一些编辑来检查ansitoutf8函数，它运行良好，并将数据插入到同一个db和同一个表中 有一条规则：我不能在db中更改代码页设置ansiToUtf8不适用于从Delphi 7转换的Delphi XE项目？,delphi,utf-8,delphi-7,oracle9i,delphi-xe,Delphi,Utf 8,Delphi 7,Oracle9i,Delphi Xe,有一个带有CL8MSWIN1251代码页设置的Oracle9DB和带有一些编辑字段的DelphiXE 我需要将Delphi7中的项目转换为DelphiXE项目，以便使用并能够查看UTF8数据 所以我用DelphiXE打开了dpr文件，它自动转换为dproj。但当我尝试向db中插入一些数据时，我得到的是问题符号（“？”），而不是一些utf8字符。 我尝试使用ansitoUTF8（edit1.text）转换编辑数据（Tedit）。但它不起作用。 然后我在XE中启动了一个新项目，很快添加了一些编辑来检
begin
adoquery1.close;
adoquery1.sql.text:='insert into table (data1,data2) values ('+#39+ansitoUTF8(edit1.text)+#39+','+#39+ansitoUTF8(edit2.text)+#39+')';
adoquery1.execsql;
end;
有什么建议吗？CL8MSWIN1251不是UTF-8代码页，它是Oracle对Windows 1251（西里尔文）代码页的实现。Delphi XE始终使用UTF-16。Oracle数据库和客户端能够执行字符集转换。您应该正确设置客户端/会话的NLS_LANG参数。如果不想更改客户端代码页，可以发出ALTER会话集NLS_LANGUAGE=。。。登录时，仅为该会话更改它。对于带有Oracle 9i数据库的XE Unicode应用程序，您可以在客户端使用AL16UTF16来告知客户端数据为UTF-16格式，并让Oracle执行其转换 PS：代码类似于
#39+ansitoUTF8(edit1.text)+#39+...
是引入SQL注入漏洞的最佳方式。您应该使用绑定变量，或者至少使用像QuotedStr/ansiquettedstr这样的函数，以确保字符串保持字符串状态，并且不会成为错误用户手中的SQL命令。Delphi XE与
AnsiToUTF8（）Utf8Encode（）RawByteStringUTF8StringUTF8String（ansitoUTF8（…）adoquery1.sql.text:='insert into table (data1,data2) values ('+#39+ansitoUTF8(edit1.text)+#39+','+#39+ansitoUTF8(edit2.text)+#39+')';
sql.textUnicodeStringadoquery1.sql.text:='insert into table (data1,data2) values ('+#39+edit1.text+#39+','+#39+edit2.text+#39+')';
它应该在XE下工作，并且应该由VCL从原始
UnicodeString“CL8MSWIN1251不是UTF-8代码页”CL8MSWIN1251UTF-81:1type Ansi1251=type AnsiString（1251）Ansi1251（AnsiToUTF8（…）1251AnsiToUTF81251Ansi1251