olevariant和strings的相互转换问题(100分)

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

Unregistered / Unconfirmed
GUEST, unregistred user!
服务器:定义了以olevarriant变量,传递Tstrings
客户端:获取olevariant的内容。
 
服务器传递tstrings:
p1:olevariant;
begin
.....
p1:=varArraycreate([0,strs.Count],varolestr);
for i:=0 to strs.Count-1do
begin
p1:=strs.Strings;
end;
end;
 
p1:olevariant;
begin
.....
p1:=varArraycreate([0,strs.Count],varolestr);
for i:=0 to strs.Count-1do
begin
p1:=String(strs.Strings);
end;
end;
 
to yanghai0437:
请问客户端怎样取得这些数据呢?
 
定义一个TStringList ;
aList : TStringList;
aList := TStringList.create;
aList.CommaText := varolestr;
Ok!

 
多人接受答案了。
 

Similar threads

后退
顶部