delphi连接mysql数据库问题

建议使用三方组件，连接MYSQL专用的。。delphi盒子就有下载!连接方法如下:

MyConnection1.Connected:=false

MyConnection1.Database:=‘数据库’

MyConnection1.Username:=‘账号’

MyConnection1.Password:=密码

MyConnection1.Port:=3306//MYSQL端口

MyConnection1.Server:=‘IP’

MyConnection1.LoginPrompt:=false

MyConnection1.Connected:=true

解决方法:

1)设置ODBC中, Advanced-->Flag 3-->Read Options From my.cnf

2)将以下内容保存为%windir%\my.cnf(注意:是WINDOWS系统目录)

你可以将下面的内容复制保存成文件即可.

[client]

default-character-set=gbk(gb2312)

以上是利用一个配置文件进行的处理.在发布程序的时候比较难处理.

---------------------------------------------------------------------------------------

下面这个方法不用利用配置文件,可以在创建完数据连接之后执行.

//"SET NAMES GB2312"的作用相当于

//SET character_set_client = GB2312

//SET character_set_results = GB2312

//SET character_set_connection = GB2312

ADOQuery1.Close()

ADOQuery1.SQL.Text := 'SET NAMES GB2312'

ADOQuery1.ExecSQL()

//当将此句注释掉的话,存入数据库的内容变为乱码

ADOQuery1.Close()

ADOQuery1.SQL.Text := 'SET character_set_client = GB2312'

ADOQuery1.ExecSQL()

//当将此句注释掉得话,从数据库中读取的内容为乱码

ADOQuery1.Close()

ADOQuery1.SQL.Text := 'SET character_set_results = GB2312'

ADOQuery1.ExecSQL()

//当将此句注释掉的话,存入数据库的内容变为乱码

ADOQuery1.Close()

ADOQuery1.SQL.Text := 'SET character_set_connection = GB2312'

ADOQuery1.ExecSQL()

---