我在用Lazarus向mysql提交数据库记录时中文显示乱码

landkim

我在用Lazarus向mysql提交数据库记录时中文显示乱码，全是（？？？）。但在mysql里通过insert into 命令输入数据则一切正常。MySQL55Connection1的charset属性已经设置成utf8，请帮忙，谢谢

​mysql>  show create table currcate;
+----------+-----------------------------------------------------------------------------------------------------------------------+
| Table    | Create Table                                                                                                          |
+----------+-----------------------------------------------------------------------------------------------------------------------+
| currcate | CREATE TABLE `currcate` (
  `id` int(10) NOT NULL,
  `name` varchar(20) NOT NULL
) ENGINE=InnoDB DEFAULT CHARSET=utf8 |

lazarus代码：

with mainform.Form1.SQLQuery1 do
    begin
      Close;
      SQL.Clear;
      SQL.Add(' insert into current values (:date,:category,:expense,:balance,:saving,:amount,:account,:memo)') ;
      ParamByName('date').Value:=DateEdit1.Text;
      ParamByName('category').Value:=Combobox1.Text;
      ParamByName('expense').Value:=CalcEdit1.Text;
      ParamByName('balance').Value:=CalcEdit2.Text;
      ParamByName('saving').Value:=CalcEdit3.Text;
      ParamByName('amount').Value:=floattostr(strtofloat(CalcEdit2.Text)+strtofloat(CalcEdit3.Text));
      ParamByName('account').Value:=Combobox2.Text;
      ParamByName('memo').Value:=Memo1.Text;
      ExecSQL;
    end;

hzlazarus

添加单元LConvEncoding，试一下
   .Value := ConvertEncoding(hanzi, 'cp936', 'utf8');

hzlazarus

转回去是
  ConvertEncoding(字段,'utf8','cp936')

试着看一看