如何在Delphi中使用指针参数-计算机等级二级考试网-优易学网

如何在Delphi中使用指针参数

来源：优易学 2011-11-2 15:51:54 【优易学：中国教育考试门户网】资料下载 IT书店

　　在c语言中用function (int ^par)很方便，查过好多资料没找到Delphi的用法，今晚没事突然想起用Delphi万能指针Pointer（无类型指针）应该可以代替。测试一下通过。
　　procedure xx(a:pchar);
　　var
　　tm:^TAdodataset;
　　begin
　　tm:=Pointer(a);
　　...
　　end;
　　procedure bb;
　　var
　　tm:TAdodataset;
　　begin
　　tm...
　　xx(@tm);
　　end;

责任编辑：小草