Delphi从XE4起支持Objective-c的Block类型的api调用了