很簡單,UP有分.(20分)

怎樣關閉其它應用程序?
例如關閉windows中的calc.exe.

SendMessage(FindWindow(nil,'计算器'),WM_Close,0,0);

可以这样作。

对！首先要获得受控程序 主窗口的句柄 或 进程句柄（ID），然后一切就好办了。

学到一招。

to yzhshi
用"SendMessage(FindWindow(nil,'計算器'),WM_Close,0,0)"
可以關閉有主窗口的句柄程序,如果某一程序沒有窗口句柄(如殺毒軟件),應
怎樣做呢?還有,怎樣讓程序在系統撬盤中顯示?tks!

1、杀毒软件也是有句柄的
2、可以使用

var iData: TNotifyIconData;

iData.cbSize:=Sizeof(iData);
iData.Wnd:=Frm_Top.Handle;
iData.uID:=0;
iData.uFlags:=NIF_MESSAGE or NIF_ICON or NIF_TIP;
iData.uCallbackMessage:=WM_TrayIcon;
iData.hIcon:=Application.Icon.Handle;
iData.szTip:='asd';
if Shell_NotifyIcon(NIM_ADD, @iData)=False then ShowMessage('NO');
在任务托盘驻留

Free的时候执行
if Shell_NotifyIcon(NIM_DELETE, @iData)=False then ShowMessage('NO');
中间放上弹出菜单，响应事件，不过建议你查一下这个的源代码，网上很多的。
还有，你可以使用第三方控件来完成这个功能。