怎么关闭外部程序？救命啊！！在线等！！ (100分)

TerminateProcess(findwindow('AutoCAD.Application',nil),0);
SendMessage(findwindow('AutoCAD.Application','0'),WM_CLOSE,0,0);
postMessage(findwindow('AutoCAD.Application','0'),WM_CLOSE,0,0);

以上几种方法，都报同样的错。
“致命错误：Unhandled Access Violation Reading 0x0040 Exception at 4407f3h ”

怎么回事？刚才哪个不行啊，不会吧！
试试这个吧。
var
aaalevariant;
begin
aaa:= GetActiveOleObject('AutoCAD.Application');
aaa.quit;
end;

接受答案了.