delphi回调函数高级应用
用法一
Type TProc=procedure() of object;
procedure Callback(proc:TProc);
begin
...
end;
procedure myproc()
begin
...
end;
Callback(myproc);
用法二
type TProc= reference to Procedure();
procedure Callback(proc:TProc);
begin
....
end;
Callback(
procedure()begin
end;
);
https://www.cnblogs.com/onexyz/p/12090649.html
推荐分享
图文皆来源于网络，内容仅做公益性分享，版权归原作者所有，如有侵权请告知删除！
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.04276704788208 seconds