[问]SetVal(const applyid: TXSDecimal);有关XML Service调用

Question

此函数参数如何传递啊？？？

Answer 1

TO: yjs_lh(长风浪子)
   这个问题我真的很头痛，
 不知兄可有解决办法？？

Answer 2

把你的Web Service的WSDL贴出来看。或者把有 TXSDecimal 定义的代码贴出来看。

Answer 3

uses XSBuiltIns
var
  sUS:svcExamUSonicSoap;
  apply_id:TXSDecimal;
  ret:String;
begin
   ret:='2222';
   apply_id.DecimalString := ret;end;

Answer 4

有点问题：
去掉sUS:svcExamUSonicSoap;这一行

Answer 5

老兄，你这个不是TXSDecimal的定义呀，
应该查找这个定义： TXSDecimal = class(TXX...)不过这样看来，这个参数应该可以这样写：
  
var
  aa: TXSDecimal;
begin
  aa := TXSDecimal.Create;
  try 
    aa.DecimalString := '12456';
    ...
    SetVal(aa);
    ...
  finally  
    aa.Free;
  end;end;