当前位置 : 主页>程序设计>delphi>列表

Delphi 6 Update 2 的意义

来源：互联网 作者：西部数码 时间：2008-04-09

西部数码-全国虚拟主机10强！40余项虚拟主机管理功能,全国领先!双线多线虚拟主机南北访问畅通无阻!免费赠送企业邮局,.CN域名,自助建站480元起,免费试用7天,满意再付款! P4主机租用799元/月.月付免压金!

DELPHI 6.02 抢先研究 -- BizSnap/SOAP/WebService 之四

-- 补丁2#的意义

Borland发布了C Builder 6以及Delphi 6的第二个补丁。这是一个对Delphi 6来说，非常重要的一个补丁，不但修正了Delphi 6中一些问题，还在很大程度上增强了Delphi 6的功能，特别是在SOAP/Web Service开发方面。

上图为新的新建Web Service页，与打补丁之前相比（见《DELPHI 6 抢先研究 -- BizSnap/SOAP/WebService 之一 -- 一个 Hello world! 的例子》等），除了将图标全部换掉（现在与C Builder 6相同）以外，还增加了一项： SOAP Server Interface向导，这是一个新建SOAP服务端接口的向导，在前面的介绍中，新建一个SOAP服务端接口需要写不少代码，有了这个向导就可以省很多事。

因为有了SOAP Server Interface向导，在新建一个Web Service应用时会自动询问是否产生一个服务端接口，如上图。除了是要用SOAP进行多层应用开发以外，都是要新建接口的。新建服务端接口的向导对话框如下图。

仿照《DELPHI 6 抢先研究 -- BizSnap/SOAP/WebService 之一 -- 一个 Hello world! 的例子》的例子，新建一个SoapHello接口，在Service Name中输入SoapHello，确定后即可产生两个单元：SoapHelloIntf.pas和SoapHelloImpl.pas，分别为此接口的接口定义和接口实现单元。
以下为SoapHelloIntf.pas单元的内容：

{ Invokable interface ISoapHello }

unit SoapHelloIntf;

interface

uses InvokeRegistry, Types, XSBuiltIns;

type

  { Invokable interfaces must derive from IInvokable }
  ISoapHello = interface(IInvokable)
  [''''{3A9E6BD6-F128-40AD-B9F1-FB254C463CCC}'''']

    { Methods of Invokable interface must not use the default }
    { calling convention; stdcall is recommended }
  end;

implementation

initialization
  { Invokable interfaces must be registered }
  InvRegistry.RegisterInterface(TypeInfo(ISoapHello));

end.

以下为SoapHelloImpl.pas单元的内容：

{ Invokable implementation File for TSoapHello which implements ISoapHello }

unit SoapHelloImpl;

interface

uses InvokeRegistry, Types, XSBuiltIns, SoapHelloIntf;

type

  { TSoapHello }
  TSoapHello = class(TInvokableClass, ISoapHello)
  public
  end;

implementation

initialization
  { Invokable classes must be registered }
  InvRegistry.RegisterInvokableClass(TSoapHello);

end.

然后，只需要在这两个单元中加入所需的接口方法的定义和实现，即可完成一个服务端接口，较原来方便很多。这还只是表面的变化，在本章第一个例子中，如果输入 http://localhost/soap/soaptest.dll 是看不到什么东西的，必须输入 http://localhost/soap/soaptest.dll/wsdl 才能看到所有接口的WSDL列表。但是在打了Delphi 6补丁2后重新编译此例子程序，可以看到 http://localhost/soap/soaptest.dll 显示一个漂亮的页面，与用Visual Studio.net进行SOAP开发类似。而 http://localhost/soap/soaptest.dll/wsdl 页面也与原来的不同。然而这还不是最主要的改变，看看 http://localhost/soap/soaptest.dll/wsdl/IsoapHello 页面，与前面的WSDL相比之下有了一些小小的改变，而这才是最重要的，这一改进终于让用Delphi 6开发的Web Service应用程序可以被Visual Studio.net开发的客户端程序调用了！下面就是新的WSDL文件：

<?xml version="1.0"?>
<definitions xmlns="http://schemas.xmlsoap.org/wsdl/"
xmlns:xs="http://www.w3.org/2001/XMLSchema" name="IHelloservice"
targetNamespace="http://tempuri.org/" xmlns:tns="http://tempuri.org/"
xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/"
xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/">
  <message name="GetHelloRequest">
    <part name="aID" type="xs:int"/>
  </message>
  <message name="GetHelloResponse">
    <part name="return" type="xs:string"/>
  </message>
  <portType name="ISoapHello">
    <operation name="GetHello">
      <input message="tns:GetHelloRequest"/>
      <output message="tns:GetHelloResponse"/>
    </operation>
  </portType>
  <binding name="IHellobinding" type="tns:IHello">
    <soap:binding style="rpc" transport="http://schemas.xmlsoap.org/soap/http"/>
    <operation name="GetHello">
      <soap:operation soapAction="urn:HelloIntf-IHello#GetHello" style="rpc"/>
      <input>
        <soap:body use="encoded"
encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
namespace="urn:HelloIntf-IHello"/>
      </input>
      <output>
        <soap:body use="encoded"
encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
namespace="urn:HelloIntf-IHello"/>
      </output>
    </operation>
  </binding>
  <service name="IHelloservice">


文章整理：西部数码--专业提供域名注册、虚拟主机服务

http://www.west263.com

以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!

[打印] [关闭]

相关文章

GraphicEx v9.9 (图像读取转换)

圣诞节蜂蜜 (陈经韬2001年DELPHI

COM程序编写入门(一)

DeskTopClean 桌面清理专家

Jazmine NavPane v1.01 for D567

ODAC 使用技巧（四）使用VARRAY

DBGridEh实现单击标题栏排序方法

DevExpress ExpressOrgChart V1.

Deiphi编译优化导致的死循环

Delphi的两个实用技巧(1)播放Fla

上一篇：李维的 Demo 中可以改进的地方
下一篇：什么是Web Service

热点关注

IDC资讯虚拟主机域名注册托管租用 vps主机智能建站
网站运营建站经验策划盈利搜索优化网站推广免费资源
网站联盟联盟新闻联盟介绍联盟点评网赚技巧
行业资讯业界动态搜索引擎网络游戏门户动态电子商务广告传媒
网络编程 Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术 Web服务器 Ftp服务器 Mail服务器 Dns服务器安全防护
软件技巧其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷 Internet Explorer
网页制作 FrontPages Dreamweaver Javascript css photoshop fireworks Flash
程序设计 Java技术 C/C++ VB delphi
网络知识网络协议网络安全网络管理组网方案 Cisco技术
操作系统 Win2000 WinXP Win2003 Mac OS Linux FreeBSD

版权所有西部数码(www.west263.com)
CopyRight (c) 2002~2007 west263.com all right reserved.
公司地址：四川成都市万和路90号天象大厦4楼　邮编：610031
电话总机：028-86263408 86263960 86264018 86267838 86262244 86263408
售前咨询：总机转201 202 203 204 205 206 207 208
售后服务：总机转211 212 213 214 217 218 晚上0点以后拔分机225