Вот тебе маленький пример - закрываю окно "Мой компьютер":
На форме две кнопки и Edit:
PHP код:
var
i: HWND; // Переменная для хранения хэндла
procedure TForm1.Button1Click(Sender: TObject);
begin
i:= FindWindow(nil, 'Мой компьютер'); // Нахожу хэндл окна
Edit1.Text:=inttostr(i); // Вывожу в Edit
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
PostMessage(i, WM_CLOSE, 0, 0); // Закрваю окно с указаным хэндлом
end;
Тебе осталось организовать это все как подсказал товарищ выше.
Подскажу: если окно не будет найдено переменная i будет равна 0.