delphi 连接mysql

如此简单的事，却浪费我大量的时间和精力--------

原因是我的系统是win7_64位,mysql支持的还不是太好,所以无论怎样都是不成功---

悲哀,wamp也是,装64位的不是这错就是那错,

再加上我是开发者，而客户的电脑大多数都是32位的，即使是64位的，我在32位系统上做出来的软件也是完全可以兼容64位的，而反过来则不然，

我如果用64位的做出来的软件，可能在32位上就运行不了了，所以我的电脑系统还是换成32位的 好，

ehlib,fastreport都不支持64位，内存泄露严重，64位的软件做出来一点价值都没有，和32位的几乎没有什么区别，所以，一定不要再碰64位这个东西了

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

由于我用的是64位的系统，于是想装个64位的wamp结果不是这错就是那错，哎，悲哀，最后换成32位的就好了。

同样，我电脑按照网上的教程 装了mysql_odbc驱动，结果却怎么样都是连接不上,失败了 3次浪费了 21天，且精神上受尽了折磨，别人的都能连接上，为什么了

我的就是不行，看了不下于1000多贴，还是无解，为此走了很多次弯路，对我心理上的打击极大，总觉得自己的技术有问题。。。

终于换个思路测试了下 ，装了下32位的mysql_odbc驱动，草妈逼，怎么连接都正常。。日。。。

============================

步骤：

1.下载32位的mysql_odbc驱动

http://www.mysql.com/downloads/

 

---http://www.mysql.com/downloads/connector/odbc/

================================

 

2.写驱动lin文件：

[ODBC]
DRIVER=MySQL ODBC 5.1 Driver
UID=root
PASSWORD=
DATABASE=shopdaxia

=====保存为：.dsn格式，如：shopdaxia.dsn

 

3.设计软件加入adoconnection 数据数据库连接。

 

4.这样就可以打开连接测试了，这样就用ado连接上mysql了。。，运行程序的时候不要忘记，把shopdaxia.dsn放在程序同目录下,这样软件放在任何目录都可以运行

在oncreate事件中写下如下代码，如:

procedure TfrmMain.FormCreate(Sender: TObject);
begin
  Main_adocon.Close;
  Main_adocon.ConnectionString := 'FILE NAME='+ExtractFilePath(ParamStr(0))+'shopdaxia.dsn';
  Main_adocon.Provider := ExtractFilePath(ParamStr(0))+'shopdaxia.dsn';
  Main_adocon.Open;
end;