• 丰搜首页
• 文档中心
• 视频中心
• 丰搜贴吧
• 问题集锦
• 更多功能

选择显示字体大小

• 最大
• 较大
• 标准

用delphi开发web服务数据库程序

第一步：编写服务器的应用程序

首先在delphi的ide中选择”filenewother…”,然后在webservices页面中选择soapserverapplication图标。

然后在newsoapserverapplication对话框中选择webappdebuggerexecutable。

点击ok按钮之后,delphi会自动生成一个webmodule,在这个module中会包含三个webservices的控件。

然后然后在webservices页面中选择soapserverdatamodule图标,ok后,delphi弹出soapdatamodulewizard对话框。

在classname中输入类名：d6dbdatamodule1.点击ok后,delphi会自动产生一个soap数据模块,在该模块中加入tdatabase,tquery,tdatasetprovider,三个控件。

设置各控件的属性,跟以往的delphi数据库应用程序的设置基本上相同,其中,tdatasetprovider是一个dataaccess控件,提供远程呼叫的支持。

编译执行该应用程序,使之注册.完成服务器端的应用程序设计.

第二步：编写客户端的应用程序

添加一个新的应用程序项目,在form窗体中添加tdbnavigator,tdbgrid控件。

然后添加一个数据模块,在其中加入tsaopconnection,tclientdataset和tdatasource控件。

其中的tsaopconnection控件就是利用soap协议与远程服务器端相联的接口。

http://webserver的地址/webservice的应用程序名称/soap/soapserverdatamodule的名称

然后设置tclientdataset控件的属性,设置remoteserver的属性为tsaopconnection控件的名字,点选providername.

接下来,在窗体所在的单元添加如下代码：

unitunit4;

interface

uses

windows,messages,sysutils,variants,classes,graphics,controls,forms,

dialogs,extctrls,dbctrls,grids,dbgrids;

type

tform4=class(tform)

dbgrid1:tdbgrid;

dbnavigator1:tdbnavigator;

private

{privatedeclarations}

public

{publicdeclarations}

end;

var

form4:tform4;

implementation

usesunit5,db;//引用datamodule所在单元;

{$r*.dfm}

end.

设置tdbnavigator,tdbgri控件的datasource的属性为dmdemo1.dsdemo1,其中,dmdemo1是数据模块的名字,dsdemo1为数据模块中的tdatasource控件的名字。

激活tclientdataset的active属性为true，编译该项目组,把客户端程序复制到网络上的任一台计算机,都可执行.一个webservices的数举库应用程序例子完成。

 

关键字 本文所属关键字

相关 与本文相关文章

分类 所有文章关键字导航

标准 网站致力的规范