Delphi+MySQL:TADOQuery使用插入中文乱码解决方法

with adoquery do

begin

close;

sql.clear;

sql.text:=' insert into test (FieldName) values (:FieldName) ';

Parameters.ParamByName('FiledName').Value := UTF8Encode('中文(简体/繁體)');

ExecSQL;

end;

with adoquery do

begin

close;

sql.clear;

sql.text:=' insert into test (FieldName) values (:FieldName) ';

Parameters.ParamByName('FiledName').Value := UTF8Encode('中文(简体/繁體)');

ExecSQL;

end;