uses ShellApi;procedure TForm1.Button1Click(Sender: TObject);begin ShellExecute (HWND(nil), 'open', 'taskmgr', '', '', SW_SHOWNORMAL);end;