原文:Delphi 回调函数及property的使用