一、服务器远程数据模块中接口方法的定义:
procedure Y_Add(const J_ID, J_NAME, J_BUMEN, J_ZHIWU, J_SEX, J_XUELI,
J_ZHENGJIAN, J_TSQZU, J_LXFS, J_ADDRESS, J_BEIZHU, J_AGE,J_JCRQ,J_TSRQ,J_JBGZ: WideString;
J_GPFF, J_CFFF, J_GJFF: Integer); safecall; 客户端返回的数据:
DMRS.DCOMCRS.AppServer.Y_Add(EDITID.Text,EDITNAME.Text,EDITBUMEN.Text,
EDITZHIWU.Text,EDITSEX.Text,EDITXUELI.Text,
EDITZHENGJIAN.Text,EDITTSQZU.Text,MEMOLXFS.Text,
MEMOADDRESS.Text,MEMOBEIZHU.Text,EDITAGE.Text,
JCRQ,ZZRQ,EDITJBGZ.Text,GPFF,CFFF,GJFF);
其中:JCRQ,ZZRQ:string;
GPFF,CFFF,GJFF:integer;
错误提示是:........类型不匹配..........; 请问,客户端的数据应该是什么类型,如何转换;
1、EDITID.TEXT
2、GPFF
3、如果接口定义有procedure AAA(DATE:TDATETIME);safecall;
则客户端应为:DCOMClientconnection1.AppServer.AAA(???);
-------------------------------------------------------------------------
-------------------------------------------------------------------------
二、服务器远程数据模块:
function Get_Y_Login(const ID, PASS: WideString): WideString; safecall;
请问客户端如何调用:
DCOMClientConnection1.???????.Get_Y_Login(?????,?????);
(我是用 var power:string;
power:=DCOMClientConnection1.AppServer.Get_Y_Login(edit1.text,edit2.text);)申明:是使用type library editor定义,并注册的。
procedure Y_Add(const J_ID, J_NAME, J_BUMEN, J_ZHIWU, J_SEX, J_XUELI,
J_ZHENGJIAN, J_TSQZU, J_LXFS, J_ADDRESS, J_BEIZHU, J_AGE,J_JCRQ,J_TSRQ,J_JBGZ: WideString;
J_GPFF, J_CFFF, J_GJFF: Integer); safecall; 客户端返回的数据:
DMRS.DCOMCRS.AppServer.Y_Add(EDITID.Text,EDITNAME.Text,EDITBUMEN.Text,
EDITZHIWU.Text,EDITSEX.Text,EDITXUELI.Text,
EDITZHENGJIAN.Text,EDITTSQZU.Text,MEMOLXFS.Text,
MEMOADDRESS.Text,MEMOBEIZHU.Text,EDITAGE.Text,
JCRQ,ZZRQ,EDITJBGZ.Text,GPFF,CFFF,GJFF);
其中:JCRQ,ZZRQ:string;
GPFF,CFFF,GJFF:integer;
错误提示是:........类型不匹配..........; 请问,客户端的数据应该是什么类型,如何转换;
1、EDITID.TEXT
2、GPFF
3、如果接口定义有procedure AAA(DATE:TDATETIME);safecall;
则客户端应为:DCOMClientconnection1.AppServer.AAA(???);
-------------------------------------------------------------------------
-------------------------------------------------------------------------
二、服务器远程数据模块:
function Get_Y_Login(const ID, PASS: WideString): WideString; safecall;
请问客户端如何调用:
DCOMClientConnection1.???????.Get_Y_Login(?????,?????);
(我是用 var power:string;
power:=DCOMClientConnection1.AppServer.Get_Y_Login(edit1.text,edit2.text);)申明:是使用type library editor定义,并注册的。
解决方案 »
- delphi socket 通讯问题 高手来吧
- 请教,用Delphi开发WebService数据库系统
- 在拖动SPLITTER时触发了哪些事件?
- Delphi 6 下的TAB键为何不能缩进代码,在哪里设啊?(大虾)
- 在delphi中可以用堆栈吗?
- 如何获得等宽字体,急急急
- delphi的ProgressBar能否在查询的存储过程中运用?
- windows 2000 下如何自定义纸张?
- 一个DELPHI新手,水平有限,但信心暴棚,希望高手指点,因为我真的好爱这行!QQ:13999865
- 谁试过用midas传递大量的文本数据,高分求教
- 如何创建数据库文件
- 请问怎样让edit中只能输入形如2001-01-30这样的日期格式???
好象问题有点长呀,看得我头痛,哈哈.
看看.
谁答出了(详细的),
连 http://expert.csdn.net/Expert/topic/1881/1881529.xml?temp=.6056177
中的40分也给他!!!
第二个过程你的函数返回是WideString,程序中调用是String;
function Get_Y_Login(const ID, PASS: WideString): WideString; safecall;将 safecall 改为 stdcall 试试返回值好象不可以是 string 吧?