知识大全用Delphi开发Web服务数据库程序

Posted 2022-07-14 知

篇首语：勤勉而顽强地钻研，永远可以使你百尺竿头更进一步。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全用Delphi开发Web服务数据库程序相关的知识，希望对你有一定的参考价值。

用Delphi开发Web服务数据库程序 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

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

　　首先在Delphi的IDE中选择 File|New|Other… 然后在WebServices页面中选择SoapServerApplication图标

　　然后在NewSoapServerApplication对话框中选择WebAppDebuggerexecutable

　　点击OK按钮之后 Delphi会自动生成一个WebModule 在这个Module中会包含三个WebServices的控件

　　然后在WebServices页面中选择SoapServerDataModule图标 OK后 Delphi弹出SoapDataModuleWizard对话框

　　在ClassName中输入类名 D DBDataModule 点击OK后 Delphi会自动产生一个SOAP数据模块在该模块中加入TdataBase Tquery TdataSetProvider 三个控件

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

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

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

　　添加一个新的应用程序项目在Form窗体中添加TDBNavigator TDBGrid控件

　　然后添加一个数据模块在其中加入TSaopConnection TclientDataSet和TdataSource控件

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

　　//WebServer的地址/WebService的应用程序名称/soap/SoapServerDataModule的名称

　　然后设置TclientDataSet控件的属性设置RemoteServer的属性为TsaopConnection控件的名字点选ProviderName

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

unitUnit ;

interface

uses

Windows Messages SysUtils Variants Classes Graphics Controls Forms

Dialogs ExtCtrls DBCtrls Grids DBGrids;

type

TForm =class(TForm)

DBGrid :TDBGrid;

DBNavigator :TDBNavigator;

private

Privatedeclarations

public

Publicdeclarations

end;

var

Form :TForm ;

implementation

usesUnit DB;//引用DataModule所在单元;

$R* dfm

end

　　设置TDBNavigator TDBGri控件的DataSource的属性为dmDemo dsDemo 其中dmDemo 是数据模块的名字 dsDemo 为数据模块中的TdataSource控件的名字

cha138/Article/program/Delphi/201311/8525

知识大全 用Delphi开发Web服务数据库程序