三层结构中,怎样在应用服务器上写方法,和调用这个方法!在线等!! 帮忙! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 如果你要涉及数据库管理,用remotedatamodule如果不用,可以用com+调用createremote(..) 建一个工程加入远程数据模块EDIT->ADD TO INTEFACEfunction getstr:widestring;begin result:='hello world';end;在客户端showmessage(SocketConnection1.appserver.getstr); 写方法可以在RemoteDataModul里加可以通过View菜单的Type Libary来定义接口,然后就可以实现它了.现在我也有个问题,我想在RemoteDataModul单元中对其中的TQuery控件进行一些处理操作,比较给它的DataBaseName属性赋值,现在还不知怎么弄。正在找资料,想办法,哪位大哥知道请告一声,多谢了! 在客户端使用 服务器名称.appserver.方法,即可以调用服务器中的方法 打开View菜单的Type Libary,在其中加入方法,如getstr客户端调用:服务器名称.appserver.getstr, 因为要做个项目,我也是刚作的你可以参考一下,应该可行的1. 打开RemoteDataModul单元文件, 我的远程数据模块的文件名是SrvDM2. 选择View菜单,打开菜单项Type Libary,然后就会出现定义接口的窗体文件名为XXX.tlb, 我的文件名为Server.tlb3. 选中你定义的接口,如我的远程数据模块名为SrvDM,则我的接口名就为ISrvDM,点右键则弹出菜单,此时可以选择New-->Method,就可以定义方法了.4. 定义好了接口方法的参数之后,远程数据模块单元的代码窗口就会出现该方法的定义,然后你就可以在其中添加自己的代码。a.我定义的方法为ExecuteSQL,就是执行客户端SQL语句的,在客户端就可以调用它了,如:ClientDataSet1.Close;strSQL := 'select * from stocks';SocketConntion1.AppServer.ExecuteSQL(strSQL);ClientDataSet1.Open;这样就调用了应用服务器的方法了. 条条小路通厕所,散分贴 源码如何杀毒? 按回车到下一控件 请问如何在BHO插件中使用TWebBrowser? 怎样获取directorylistbox中最底层的路径! 有了解Delphi的编译原理的高手请进 一个数据库问题~~~,高手请进~~~(在线等回答,高分相送) 编程如何实现Text文本文件转化为 HTML文件? 请问如何得到MainMenu在窗口上方出现的菜单条的高度? 如何的把一个文本和图片数据(jpg)混合的文件中的图片数据取出来并保存成一个图片文件 indy中用TIdSMTP和TIdMessage发送邮件,如何发送HTML格式的邮件。 請大家試試我分布的新軟件!
如果不用,可以用com+调用createremote(..)
EDIT->ADD TO INTEFACE
function getstr:widestring;
begin
result:='hello world';
end;在客户端
showmessage(SocketConnection1.appserver.getstr);
可以通过View菜单的Type Libary来定义接口,然后就可以实现它了.现在我也有个问题,我想在RemoteDataModul单元中对其中的TQuery控件进行一些处理操作,比较给它的DataBaseName属性赋值,现在还不知怎么弄。
正在找资料,想办法,哪位大哥知道请告一声,多谢了!
客户端调用:服务器名称.appserver.getstr,
你可以参考一下,应该可行的
1. 打开RemoteDataModul单元文件, 我的远程数据模块的文件名是SrvDM
2. 选择View菜单,打开菜单项Type Libary,然后就会出现定义接口的窗体文件名为XXX.tlb, 我的文件名为Server.tlb
3. 选中你定义的接口,如我的远程数据模块名为SrvDM,则我的接口名就为ISrvDM,点右键则弹出菜单,此时可以选择New-->Method,就可以定义方法了.
4. 定义好了接口方法的参数之后,远程数据模块单元的代码窗口就会出现该方法的定义,然后你就可以在其中添加自己的代码。a.我定义的方法为ExecuteSQL,就是执行客户端SQL语句的,在客户端就可以调用它了,如:
ClientDataSet1.Close;
strSQL := 'select * from stocks';
SocketConntion1.AppServer.ExecuteSQL(strSQL);
ClientDataSet1.Open;
这样就调用了应用服务器的方法了.