Delphi- 连接MySQL数据库BDE

时间:2022-01-12 14:43:43

  Delphi使用ADO可以连接MSSQL和ACCESS,但似乎不能连接MYSQL和ORACEL,如果要连接MYSQL和ORACLE得使用BDE。

  一、连接方法

  首先得先安装mysql驱动程序_mysql-connector-odbc-5.1.6-win32,然后点控件面板->管理工具->数据源 (ODBC)

Delphi- 连接MySQL数据库BDE

  点系统DNS,然后选择MySQL ODBC Driver,点完成。出现如下界面,填写相关的信息,选择数据库点完成,完成MYSQL的ODBC数据源的创建

  Delphi- 连接MySQL数据库BDE

  接下来在Delphi里测试一下是否能连接成功。

  首先在Delphi的BDE选项中拉一个Table数据库控件,点击该控件,在右边的属性面板中,在DataBaseName中选择刚才的创建的MYSQL-ODBC数据源名称,Active设为True,TableName选中需要的表。

  Delphi- 连接MySQL数据库BDE

  最后拉一个DataSource和DBGrid,进行相关连接配置,就完成了,很方便。

  二、使用ODBC中的Query组件

  在ODBC中拉一个Query,其他配置与上面的一样,只是Query属性板中的SQL中要编写要查数据库的SQL语句

  Delphi- 连接MySQL数据库BDE

   三、踪合一点点的例子

  Delphi- 连接MySQL数据库BDE

  数据源的其他配置一样,在DBGrid1CellClick放如下代码。

  procedure TForm1.DBGrid1CellClick(Column: TColumn);
  begin
    LabelName.Caption := Table1['Name'];
    LabelAge.Caption := Table1['Age'];
  end;

  如果需要一整行选中,在Option的dgRowSelect设为True

  Delphi- 连接MySQL数据库BDE

  上一条记录,下一条记录,第一条记录,最后一条记录。

  Table1.Prior;
    Table1.Next;
    Table1.First;
    Table1.Last;

  查找按扭,第一个参数是'name'是要查找的字段名,第二个参数是要查找的内容,最后一个参数是否忽略大小写。

  Table1.Location('name',edit1.Text,[Lopartialkey,Locaseinsensitive]);