procedure pointers就是一个指针,只不过它指向一个过程或函数,
而不是指向Int或String等
举个最简单的例子:
设定义了一个指向过程的指针:
Type TProcedure = procedure;
和一个可用的过程 Procedure ShowHello;
begin
ShowMessage('Hello!');
end;
然后写一个根据过程指针来调用过程的 过程
Procedure CallProcbyPointer(p:TProcedure);
begin
p;
end;
可以这样调用: CallProcbyPointer(Showhello);
结果显示一对话框 Hello!