//同步的
function STPCall(ServicesName:String;IParam:String;var ReturnMessage:String):Integer;
第一个是服务名
IParam没有传入参数
返回值ReturnMessage:String是0;OK!
//异步的（多了一个参数）
function STPACall(ServicesName:String;IParam:String;TimeProc:TTimeProcedure;var ReturnMessage:String):Integer;
