在3层结构中,如何在服务端上做个方法,当在客户端调用的时候,能得到个TStringList的结果(45分)

  • 主题发起人 主题发起人 verypoor1
  • 开始时间 开始时间
V

verypoor1

Unregistered / Unconfirmed
GUEST, unregistred user!
如题,主要要解决的是参数要如何定义,在客户端要做怎样的转换,
谢谢
 
你应该用OleVariant来封装你的数据。
 
服务端我这样写
function TTestServer.Test: OleVariant;
var
V:OLEVariant;
begin
V:=VarArrayCreate([0, 1], varVariant);
V[0]:='111';
V[1]:='2222';
Result:=V;
end;

那在客户端,
V:=AppServer.Test;
然后我想
if VarType(V)= .. then
begin
....
end;
这的VarType(V) 应该是什么的? 我有可能会有时候返回数组,有时候返回个别的东西
 
后退
顶部