易截截图软件、单文件、免安装、纯绿色、仅160KB

求 delphi webserivice 调用例子

求  delphi webserivice 调用例子
服务端编写:新建"WebServices-->SOAP Server Application-->ISAPI/NSAPI Dynamic Link Library","Service name"填写你要的服务名,如"SendSmsServices",然后在SendSmsServiceIntf.pas中添加接口函数:
Delphi(Pascal) code:
{ Invokable interface ISendSmsService }

unit SendSmsServiceIntf;

interface

uses InvokeRegistry, Types, XSBuiltIns;

type

{ Invokable interfaces must derive from IInvokable }
ISendSmsService = interface(IInvokable)
['{2DE80373-26E4-49B6-86E1-DC67D456FB90}']

{ Methods of Invokable interface must not use the default }
{ calling convention; stdcall is recommended }
function sendSms(const sendSms1: widestring): widestring; stdcall;
end;

implementation

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

end.


在SendSmsServiceImpl.pas中写具体的处理过程

Delphi(Pascal) code:
{ Invokable implementation File for TSendSmsService which implements ISendSmsService }

unit SendSmsServiceImpl;

interface

uses InvokeRegistry, Types, XSBuiltIns, SendSmsServiceIntf;

type
{ TSendSmsService }
TSendSmsService = c


相关问答:

加急:php 类似delphi的字符串转字节数组

求高手帮我转换一下函数,是要得到字节数组:

Delphi版:
InBuf: array[0..2] of byte; //3字节数组
Move(S[1], InBuf, 3)  //拷贝S[1]开始的3个到inbuf里

别的语言1:
CString szTmep= ......

ACCESS的自定义函数在delphi里怎么用呢...

我在模块里自定义了一个函数:stradd()

可是在adoquery1.sql.add('select stradd(author) from book');
时提示stradd未定义...

这个问题有什么办法可以解决的吗? 非常感激!


(在A ......

delphi+access 图片显示、替换问题

问问各位高手,1.ACCESS数据库能够存储图片格式的内容吗(JPEG BMP),如果可以应该用什么格式
              2.为了正确显示数据库中的图片delphi中应用到那些控件
  ......

Delphi 像亡国的南宋,试问这语言还有前途吗?

Delphi 像亡国的南宋,试问这语言还有前途吗?
Win32开发不如C#;
面像对像开发不如JAVA;
系统开发不如VC++6.0;
能用性不如VB6.0;
不支持Web开发。。。
出个Delphi 2010免费一年会有人用吗? ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号