谁能给个结束过程的完整实例？
我在看语言手册时对这部分不了解
var
ExitSave: Pointer;
procedure MyExit;
begin
ExitProc := ExitSave; //总是首先恢复旧的向量（退出过程的指针）
...
end;
begin
ExitSave := ExitProc;
ExitProc := @MyExit;
...
end.
这是书商的例子，只有一个框架，但是怎么真正取试用呢？麻烦会的人给个实例
2007-03-29 10:14
2007-03-29 10:58
2007-03-29 14:33
，但是还不是完全了解，如有达者，请详细指教啊