塔姆塔拉墓园怎么去:delphi中的函数指针如何定义和使用 急
来源:百度文库 编辑:神马品牌网 时间:2024/04/28 23:56:24
var
p:Pointer;
begin
p:=@函数名称
end;
调用时
p(参数表);
就行了
type
Puser=~user
user = record
id:integer;
name:string[10];
end;
然后用puser
data:pusr;
new(data);
data.id:=0001;
data.name:='张三';