分享好友 编程语言首页 频道列表

Delphi XE中使用dbExpress连接MySQL数据库疑难问题解决(对三层的例子配置有帮助)

delphi文章/教程  2023-02-09 08:560

Delphi IDE中包含一个Data Explorer的组件,如下图所示:

 

Delphi XE中使用dbExpress连接MySQL数据库疑难问题解决(对三层的例子配置有帮助)

 

该组件基于dbExpress(包含TSQLConnection、TSQLDataSet、TSQLQuery、TSQLStoredProc、TSQLTable、TsqlServerMethod、TSQLMonitor、TSimpleDataSet)。但是因为该组件只提供了各种数据库的抽象驱动,没有提供底层的与数据库直接交互的驱动库,因此,要想使用具体某种数据库,还需要搭配提供商驱动。本文以Delphi XE在Windows 7 Ultimate版系统下连接MySQL Community Server 5.5.10数据库为例,介绍了本人在实现过程中遇到的问题,希望对遇到同样问题的朋友有所帮助。

 

第一,作者走了一个最大的弯路,为了图省事,在Windows 7系统中使用的是msi版本的MySQL数据库(为什么说是最大的弯路且看下文)。安装好后启动服务什么的折腾了一大圈,关键是服务启动不起来。如果你使用的是图形化的MySQL Server Instance Configuration Wizard,一定要注意,当选择数据库用处为Multifunctional Database 或 Transactional Database Only 时,向导会让你指定 InnoDB Tablespace。你的机器如果以前安装过MySQL,这个目录不可以是之前安装实例所使用的InnoDB Tablespace,最好是新建的一个目录,否则容易引发MySQL服务不能启动的故障。

 

第二,为了做测试,没有在MySQL服务器中添加额外的用户账户,因为默认策略中,MySQL对root账户是禁止远程访问的,难怪我尝试本地连接一点问题都没有,换了另一台在同一个局域网的机器上登录该服务器就出错呢。解决的办法如下:

 

进入MySQL的控制台。在cmd中定位到MySQL安装目录的bin子目录,输入mysql -u root -p,回车后会要求你输入root账户的密码,如果没有密码直接回车,否则输入root密码,回车。如果看到mysql>表示成功登录。

 

切换到使用系统数据库mysql状态,输入:use mysql;回车。

 

如果你已经设置了root密码,请忽略此步,否则请输入 UPDATE user SET Password=PASSWORD('your root password') WHERE User='root';回车。其中括号中引号内输入的是你指定的root账户密码。语句的最后别忘了以英文分号结尾,回车。这样就设置了root账户的密码。

 

输入:GRANT ALL PRIVILEGES ON *.* TO root@"%" IDENTIFIED BY "root";回车,这样就设置了root账户可以被远程的任何一台计算机登陆,当然,这只是为了实验,真正应用环境中不推荐这样使用,会有很大的安全隐患。

 

重要的来了,别忘了应用刚才的设置。输入:FLUSH PRIVILEGES;只有这样才能让上一步的权限设置生效。

 

以上这两点只是为了确保MySQL能够在Windows 7系统中跑起来,并且能够被远程访问,如果你已经做到了以上的两点,请直接无视(哈哈,说晚了)

 

这里之所以使用Data Explorer,是因为在不建立工程的基础上可以通过它来测试dbExpress是否能连接上MySQL数据库。展开MySQL节点,修改列出的对应连接,如下图所示:

 

Delphi XE中使用dbExpress连接MySQL数据库疑难问题解决(对三层的例子配置有帮助)

 

参数都配置完成后点击左下角的“Test Connection”按钮来测试连接,如果你得到了如下图所示的提示(Driver could not be properly initialized.  Client library may be missing, not installed properly, of the wrong version, or the driver may be missing from the system path.):

 

Delphi XE中使用dbExpress连接MySQL数据库疑难问题解决(对三层的例子配置有帮助)

 

那么就跟着下面的方法走:

 

将MySQL安装目录下lib子目录中的libmysql.dll文件拷贝至c:/windows/system32(系统不在c盘的请转至对应目录),重新启动Delphi XE,按照上面的步骤测试连接,你会发现还是出现无法正确初始化数据库驱动的问题。我被这个问题困扰了三天,最后解决的办法非常之荒谬,还记得我一开始说的“最大的弯路”么?最大的弯路就是使用的是安装版的MySQL。你只要使用解压版的MySQL数据库就没有问题。其实这里面真正作祟的还是libmysql.dll。只要从解压版的MySQL中提取出该版本的libmysql.dll复制到c:/windows/system32目录下就不会发生无法正确初始化数据库驱动的问题。

 

 

 Delphi XE中使用dbExpress连接MySQL数据库疑难问题解决(对三层的例子配置有帮助)

 

 

 

 

 

程序开发完毕之后需要对其进行部署。部署的时候不要忘了将dbExpress对应MySQL数据库的抽象驱动dbxmys.dll和MySQL底层驱动libmysql.dll都与主程序放置在同一个目录中。

 

附:文中提到的可用的MySQL数据库驱动:http://download.csdn.net/source/3114666

http://blog.csdn.net/chaijunkun/article/details/6266641

查看更多关于【delphi文章/教程】的文章

展开全文
相关推荐
反对 0
举报 0
评论 0
图文资讯
热门推荐
优选好物
更多热点专题
更多推荐文章
Delphi中的消息处理机制 delphi 方法
每一个VCL都有一内在的消息处理机制,其基本点就是构件类接收到某些消息并把它们发送给适当的处理方法,如果没有特定的处理方法,则调用缺省的消息处理句柄。    其中mainwndproc是定义在Twincontrol类中的一个静态方法,不能被重载(Override)。它不直接处

0评论2023-02-09482

Delphi CompilerVersion Constant / Compiler Conditional Defines
http://delphi.wikia.com/wiki/CompilerVersion_Constant The CompilerVersion constant identifies the internal version number of the Delphi compiler.It is defined in the System unit and may be referenced either in code just as any other consta

0评论2023-02-09888

Delphi revelations #1 – kbmMW Smart client on NextGen (Android) – Scope problems kbmmw中向服务器端传递
Delphi 启示 #1 – kbmMW Smart client on NextGen (Android) – 作用域问题以更高级的方式使用kbmMW smart client,在Android设备上,我遇到了问题。通过继承TInvokeableVariantType,kbmMW smart client可以使用Delphi支持的特殊类型的自定义Variant,从而可

0评论2023-02-09360

Delphi 调用DLL外部函数时的指针参数
某项目需要调用设备厂家提供的DLL的函数,厂家给了一个VB的例子,有个参数是ByRef pBuffer As Single。于是在Delphi中用buffer:array of single代替:function func(buffer:array of single;count:integer):integer;far;stdcall;external 'func.dll';调用后bu

0评论2023-02-09964

《zw版·Halcon-delphi系列原创教程》 Halcon分类函数012,polygon,多边形
《zw版·Halcon-delphi系列原创教程》 Halcon分类函数012,polygon,多边形为方便阅读,在不影响说明的前提下,笔者对函数进行了简化::: 用符号“**”,替换:“procedure”:: 用大写字母“X”,替换:“IHUntypedObjectX”:: 省略了字符:“const”、“OleVa

0评论2023-02-09662

最简单的delphi启动画面(转)
首先做一窗体,然后将BorderStyle的属性设为bsnone,放image控件,align设为alclient 然后将主程序的修改为 uses Windows, Forms, Unit1 in 'Unit1.pas' {Form1}, Unit2 in 'Unit2.pas' {Form2}; {$ R *.res} begin Application.Initialize; Form2:=TForm2.Cre

0评论2023-02-09349

Delphi备忘三:TCollection的使用,用Stream保存
 代码unit ufrmGetFunctionDefine;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,TypInfo,  Dialogs,ufrmStockBaseCalc, StdCtrls, ComCtrls,uQEFuncManager,uWnDataSet,uDataService;type  T

0评论2023-02-09409

Delphi Dcp 和BPL的解释
dcp = delphi compiled package,是 package 编译时跟 bpl 一起产生出来的,记录着 package 中公开的 class、procedure、function、variable、const.... 等等的名称和相对位址。package英文翻译过来就是“包”。如果 某个控件包 A 引用了 控件包 B,当 控件包

0评论2023-02-09393

Delphi面向对象学习随笔六:接口 delphi基础
作者:巴哈姆特(转载请注明出处并保持完整) 在对象化中,类的继承是一个非常强大的机制;而更加强大的继承机制应该是来自从一个接口的继承。    本篇我们将讨论接口的特点。    首先,接口的定义方式与类相似。不同的是:类代表了一种实体,而接口代

0评论2023-02-09803

Delphi 的字符及字符串[2] - Char、AnsiChar、WideChar、PChar、PAnsiChar、PWideChar
//单字符 Char、AnsiChar (在目前版本(2007)中, 它们是一回事, 只有 1 字节大小)var  c: Char; {Char 类型的取值范围是: #0..#255, 用十六进制表示是: #$0..#$FF}begin  {用十进制方式赋值:}  c := #65;  ShowMessage(c); {A}  {用十六进制方式赋值:} 

0评论2023-02-09353

Delphi XE2读取内存偏移数据代码
刚学习的时候直接读取基值是很简单的,但是类型[[[00a41ff0+1c]+34]+490]这样的偏移数值应该如何读取呢?下面给大家分享下Delphi 的代码:varGameH:HWND; {定义窗口句柄}GamePid:DWORD;{定义窗口进程ID}ReadByte:SIZE_T;{实际读取字节}Gamehprocess: THandle;

0评论2023-02-09681

《zw版·Halcon-delphi系列原创教程》 Halcon分类函数007, match,图像匹配
《zw版·Halcon-delphi系列原创教程》 Halcon分类函数007, match,图像匹配为方便阅读,在不影响说明的前提下,笔者对函数进行了简化::: 用符号“**”,替换:“procedure”:: 用大写字母“X”,替换:“IHUntypedObjectX”:: 省略了字符:“const”、“OleV

0评论2023-02-09495

Delphi TStream 详细介绍
Delphi TStream 详细介绍Stream对象,又称流式对象,是TStream、THandleStream、TFileStream、TMemoryStream、TResourceStream和TBlobStream等的统称。它们分别代表了在各种媒介上存储数据的能力,它们将各种数据类型(包括对象和部件) 在内存、外存和数据库字

0评论2023-02-09728

Delphi 数据类型的说明
简单类型包括实数类型(Real) 和有序类型(Ordinal),有序类型又包括整数类型,字符类型,布尔类型,枚举类型和子界类型等。数据类型                       范围                                 

0评论2023-02-09615

问题-[Delphi]MainFrame.pas(4340): E2036 Variable required
问题现象:写了一个TObjectList的Sort方法,但是写成ObjectList.Sort(@SortBridgeEDOReportQtys); 再F9时提示“E2036 Variable required”。 问题原因:[DCC错误] MainFrame.pas(4340):要求E2036变解决方法:ObjectList.Sort(@SortBridgeEDOReportQtys);

0评论2023-02-09927

更多推荐