delphi对象参数调用