好得很程序员自学网

<tfoot draggable='sEl'></tfoot>

delphi 7 连接 MySql

MySQL ODBC 5.1 Driver } ; Server= 127.0 . 0.1 ; Database=world; User=root; Password=a123; Option= 3 ;

在TADOQuery写查询语句,设置Active为True,数据都显示在表格上,如下图所示:

2.ZeosLib方式
    ZeosLib是一个用于Borland开发工具的数据库中间件,包括Delphi、C++ Builder和Kylix。从http://sourceforge.net/projects/zeoslib/files/下载"ZEOSDBO-6.6.6-stable"版本,解压到文件夹。打开Delphi 7,加载工程项目包"...\ZEOSDBO\packages\delphi7\ZeosDbo.bpg",按顺序编译,或者右键选择"Compile All From Here",如下图所示:

    编译完成后,再选择"ZComponentDesign.bpl",右键选择"Install",安装组件成功,弹出如下对话框:

    再添加所编译完成的目录,即"...\ZEOSDBO\packages\delphi7\build",菜单"Tools"→"Environment Options"→"Library"→"Library path",添加此目录。另外,若需要在编写代码时,能进入ZeosLib源代码的话,需要添加源代码文件夹目录,包括:"...\ZEOSDBO\src\core"、"...\ZEOSDBO\src\parsesql"、"...\ZEOSDBO\src\plain"、"...\ZEOSDBO\src\dbc"和"...\ZEOSDBO\src\component"(注意:会在这些目录下再次编译单元文件)。
    新建一个应用程序,在窗体上放置TZConnection、TZQuery、TDataSource和TDBGrid,在窗体创建函数里,写入以下代码:

 procedure   TForm1.FormCreate(Sender: TObject); 
  begin  
   //  ---------------互相关联------------------------  
  zqry1.Connection :=  zcon1; 
  ds1.DataSet : =  zqry1; 
  dbgrd1.DataSource : =  ds1; 
    //  ---------------设置参数------------------------  
  zcon1.Protocol :=  ‘  mysql  ‘  ; 
  zcon1.Port : =  3306  ; 
  zcon1.HostName : =  ‘  127.0.0.1  ‘  ; 
  zcon1.User : =  ‘  root  ‘  ; 
  zcon1.Password : =  ‘  a123  ‘  ; 
  zcon1.Database : =  ‘  world  ‘  ; 
  zcon1.Connected : =  True; 
    //  ---------------查询显示------------------------  
   zqry1.Close; 
  zqry1.SQL.Text : =  ‘  SELECT * FROM City  ‘  ; 
  zqry1.Active : =  True; 
  end ;

当然手动在设计器上进行设置也可以。因为这里连接的是MySql数据库,需要拷贝MySql数据库客户端所需的DLL(即:libmysql.dll,这里我安装的是在"...\MySQL\MySQL Server 5.5\lib"里面)复制到Windows系统目录(通常是"C:\WINDOWS\system32")或者工程目录下。程序如下图所示:

    当程序发给别人使用时,需要连同"libmysql.dll"一起发送。若是显示的数据有乱码,这是因为MySQl数据库默认使用UTF-8字符集,则先在查询之前,设置字符集,如下代码所示:

 begin   
  zqry1.Close; 
  zqry1.SQL.Text : =  ‘  set names gbk  ‘  ; 
  zqry1.ExecSQL; 
  zqry1.SQL.Text : =  ‘  select * from city  ‘  ; 
  zqry1.Active : =  True; 
  end ;

 

  或者在TZConnection的Properties属性添加"codepage=gbk"。

3.其他方式

    另外,还有其他的第三方控件可以连接MySql等其他数据库,如:AnyDAC、MyDAC 、DAC for MySQL等等。

扩展资料:
1.MySQL with Delphi  http://delphi.about.com/od/mysql/MySQL_with_Delphi.htm
2.Zeoslib Portal :: Home http://zeos.firmos.at/
3.使用ZeosDbo元件與MySQL連線及建立Master/Detail資料表 http://cdwalkman.my-php.net/_tech/mysql_ZeosLib_delphi.htm

delphi 7 连接 MySql

标签:

查看更多关于delphi 7 连接 MySql的详细内容...

  阅读:35次