怎么将事件和函数定义成变量

ffeitian 2009-11-10 09:22:56
程序中自定义了几十个procedure及function,但具体要执行哪个要判断,所以我想将procedure及function定义成一个变量,请问要怎么定义,procedure跟function分开定义也行。
...全文
60 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
虎滴小猪猪 2009-11-10
  • 打赏
  • 举报
回复
哦。又学习了。哈哈
iceagebirdxq 2009-11-10
  • 打赏
  • 举报
回复
支持1楼
haitao 2009-11-10
  • 打赏
  • 举报
回复
var
myfun:Tfun;
mypro:Tpro;
haitao 2009-11-10
  • 打赏
  • 举报
回复
type
Tfun=function (a1:integer;var a2:string):boolean;
Tpro=procedure (a1:integer;var a2:string);

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧