1、打开你的中间层程序
2、执行View|Type library
3、在出现的窗口中,选择左边的Interface图标,按“New Method”按钮(在上面)。然后选择你新增的Method,将名字改为GetMaxString,在Parameters页填写你的参数,注意不要改动上面的Return type。你的返回值也要设置为一个参数,该参数名字任意,type为BSTR *,Modifier为out,retval。
4、然后在Remote datamodule(如果用MIDAS)对应的单元会看到增加了一个名字为GetMaxString的函数,将你的代码拷贝到该函数中。客户端:
如果你用SocketConnection连接,用这样的代码调用:
SocketConnection.Connected:=true;
v_orderNo:=SocketConnection.Appserver.GetMaxString;
2、执行View|Type library
3、在出现的窗口中,选择左边的Interface图标,按“New Method”按钮(在上面)。然后选择你新增的Method,将名字改为GetMaxString,在Parameters页填写你的参数,注意不要改动上面的Return type。你的返回值也要设置为一个参数,该参数名字任意,type为BSTR *,Modifier为out,retval。
4、然后在Remote datamodule(如果用MIDAS)对应的单元会看到增加了一个名字为GetMaxString的函数,将你的代码拷贝到该函数中。客户端:
如果你用SocketConnection连接,用这样的代码调用:
SocketConnection.Connected:=true;
v_orderNo:=SocketConnection.Appserver.GetMaxString;
另:string,char对应的参数类型是什么(我暂时用的IStrings *和unsigned char)?