解决delphi2007下dbexpress连mysql5时中文显示乱码（文中有可连非默认端口的方法）

 

环境：

 CodeGear ™ Delphi® 2007 for Win32®  Version 11.0.2852.9797 ， mysql 5.0.45 ， dbxmys30.dll （文件版本 11.0.2852.9797 ）， libmysql.dll （ mysql5 自带，大小 1.94 MB (2,035,712 字节 ) ）

数据库 test ，表 user 

CREATE TABLE `user` (

 `id` int(11) default NULL,

 `name` varchar(20) default NULL

)

1 ，字符集问题

myql5 安装默认用的是 latin1 字符集，我们一般都会用 utf-8 、 GBK 、 gb2312 等的字符集，这里只讲 latin1 和 gb2312 。

latin1 ：

很简单，用默认的连法，轻松的实现就可以输入中文，正确显示中文(有些字符可能会有些问题，如：两不同的汉字，在mysql中可能认为是同一个)。按默认配置安装mysql5完后，在MySQL Command Line Client下用show variables like "c%"查看字符集情况，从图中看出客户端，服务端用的都是latin1字符集。 如图：

运行演示程序，插入两条记录，并提交。如图：

回到MySQL Command Line Client下，执行select * from user。如图：

一切正常。

gb2312：

用mysql5的MySQL Server Instance Config Wizard工具把mysql的字符集指定为gb2312。再次在MySQL Command Line Client下用show variables like "c%" 查看字符集情况，从图中看出客户端，服务端用的都是gb2312字符集。如图：

 

查看以前的数据select * from user;，返回的数据中汉字显示为乱码。接下来看一下是否能正常插入，执行插入语句insert into user value (3,"看到乱马了吗？");   执行报错，无法插入。这是怎么回事，为了深入了解，我们查看表user状态show table status;。如图：

  从图中看出表user的Create_options 为latin1_swdish_ci。用EMS.SQL.Manager.2005(下面都用简称EMS)一看表的结构：

CREATE TABLE `user` (

 `id` int(11) default NULL,

 `name` varchar(20) default NULL

) ENGINE=MyISAM DEFAULT CHARSET=latin1;

表user的字符集还是latin1，

运行演示程序，从程序上面的gride看得出链接mysql时dbexpress客户端的字符集为latin1，服务端的为gb2312，跟 MySQL Command Line Client 上返回的数据不一样，但是 汉字显示正常，插入一条数据看看，没问题。如图：

 

回到 MySQL Command Line Client ，执行 select * from user; ，结果新加的数据中汉字还是为一些乱码。如图：

  这里由于演示程序客户端用的字符集跟user表的字符集相同，所以数据能够顺利插入。

但是，我们现在期望的是用一个真正使用gb2312字符集的表。下面我们改变一下user表的结构

执行alter table user charset =gb2312; 用EMS再看表的结构：

CREATE TABLE `user` (

 `id` int(11) default NULL,

 `name` varchar(20) character set latin1 default NULL

) ENGINE=MyISAM DEFAULT CHARSET=gb2312;

name这个字段的字符集还是为latin1。继续改变，执行alter table change name name varchar(20) character set gb2312 default NULL; 执行时报错，如图：

  对于已经存在数据的表，转换字段的字符集，还是有些麻烦的。(建议：1按特殊的方法导出数据，2把表清空，3改变字段的字符集，4导入数据到表中)。在这里为了方便，我们直接清空数据delete from user; ，接着 alter table user change name name varchar(20) character set gb2312 default NULL; 执行成功。插入一条数据看看insert into user value (3,"看到乱马了吗？"); 查询结果select * from user;如图：

  这回cmd下显示正常了。

回到演示程序，我们期待的“乱马”来了。如图：

 

插入一条数据看看，噢， delphi2007 报了一个意外错误。如图：

 

当然这个错误不会返回给用户的，就好像成功插入了一样，如图：

 

我们点刷新按钮看看，用户得到了一个警告。如图：

为了确定数据是否被插入，我们回到MySQL Command Line Client，执行select * from user;  如图：

 

数据记录没有增加。怎么办？统一客户端和服务端的字符集。

服务端已经设好了 gb2312 的字符集。现在就剩 delphi 这块了。

在 TSQLConnection 的属性 params 增加一行参数 ServerCharset=gb2312

 

点开params属性

 

点击Code Editor，

多个端口属性？？其实我装的时候把端口改为3307，呵呵，为的就是顺便讲访问非默认端口

添加ServerCharset=gb2312

端口可以在这里设。

 

运行演示程序，添加一条记录，成功。如图：

这次跟MySQL Command Line Client上返回的数据一样了，如图：

 

2 ，端口问题

在 TSQLConnection 的属性 params 增加一行参数 Port=xxxx (xxxx 为端口数字 ) 。

上面已经提到，不再贴图。这个方法不适用于delphi7。。已经测试过。

 

 

相关连接：

我是在csdn社区C++ Buider版块的“茶馆”找到这个帖子的： 《放弃DBExpress ，真烂！还是用ADO 成熟点！》

http://topic.csdn.net/u/20070810/14/1963df50-0e5d-46b6-9f3a-f137c735a7d0.html

此帖有borland版块重要人物出场

李维（不知是真的不？），僵哥等.

扩展信息：

D2007 用dbexpress 连接mysql 发布程式后发生"灾难性故障"---(万恶的xp   防火墙)

http://topic.csdn.net/u/20071031/15/ca6baa0f-f983-483d-a3f0-9a9b2f2cc64f.html