| 发表于:2007-03-28 17:24:17 楼主 |
服务端 public struct clientdata { public string name; public int id; } [webmethod(cacheduration = 30, description = "返回客户记录 ")] public clientdata[] getclientdata(int number) { clientdata[] clients = null; if (number > 0 && number <= 10) { clients = new clientdata[number]; for (int i = 0; i < number; i++) { clients[i].name = "client " + i.tostring(); clients[i].id = i; } } return clients; } 客户端: var call1:servicesoap; callcleint:arrayofclientdata; i:integer; begin call1:=getservicesoap(); callcleint:=call1.getclientdata(3);//运行到这里会出错 for i := low(callcleint) to high(callcleint) do showmessage(format( '%s ; %d ',[callcleint[i].name_, callcleint[i].id])); end; |
|
|
|
|