TMS Async实例,有delphi和c的。留存自用,方便下载。