怎么样给类型中的过程赋值
Type
TOnAudit = Procedure(Sender: TObject)

TTest = Packed Record
OnAudit: TOnAudit;
end


Procedure Button1OnClick(Sender: TObject);
var
Test: TTest;
begin
Test.OnAudit := ??????//怎样对过程进行赋值.
end;

[解决办法]
是不是那个DLL函数支持回调你指定的一个函数的?