obj := new classTest();
  //设置成员变量name的值为"张三"
  invoke(obj,"name",1,"张三");
  //设置成员变量age的值为18
  invoke(obj,"age",1,18);
  //设置成员变量sid的值为"ts001"
  invoke(obj,"sid",1,"ts001");
  //执行单参数重载成员方法fun
  a:=invoke(obj,"fun",0,"name");
  //执行双参数重载成员方法fun
  b:=invoke(obj,"fun",0,"name","age");
  //执行三参数重载成员方法fun
  c:=invoke(obj,"fun",0,"name","age","studentID");
return array(a,b,c);
type classTest = class
  name;
  age;
  sID;
  function fun(a);overload;
  begin
    s:= "\r\n"+a+":"+name;
    echo s;
    return s;
  end
  function fun(a,b);overload;
  begin
    s:="\r\n"+a+":"+name+" "+b+":"+floattostr(age);
    echo s;
    return s;
  end
  function fun(a,b,c);overload;
  begin
    s:="\r\n"+a+":"+name+" "+b+":"+floattostr(age)+" "+c+":"+sID;
    echo s;
    return s;
  end
end