//同步的
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;