Скачать: CL | DM;

Выгружаю процесс, аиконкапроболжает висеть на TaskBar   Найти похожие ветки 

← →
Zheksonz   (2009-07-31 15:46) [0]

Всем привет.
Собственно интересует как выгружать и иконку??? МОжет есть варианты обновления TaskBar_а???

---

← →
Palladin ©   (2009-07-31 15:47) [1]

ты куда его выгружаешь? на свалку?

---

← →
Zheksonz   (2009-07-31 15:49) [2]

function killtask(exefilename: string): integer;
const
process_terminate=$0001;
var
continueloop: bool;
fsnapshothandle: thandle;
fprocessentry32: tprocessentry32;
begin
result := 0;

fsnapshothandle := createtoolhelp32snapshot
(th32cs_snapprocess, 0);
fprocessentry32.dwsize := sizeof(fprocessentry32);
continueloop := process32first(fsnapshothandle,
fprocessentry32);

while integer(continueloop) <> 0 do
begin
if ((uppercase(extractfilename(fprocessentry32.szexefile)) =
uppercase(exefilename))
or (uppercase(fprocessentry32.szexefile) =
uppercase(exefilename))) then
result := integer(terminateprocess(openprocess(
process_terminate, bool(0),
fprocessentry32.th32processid), 0));
continueloop := process32next(fsnapshothandle,
fprocessentry32);
end;
closehandle(fsnapshothandle);
end;

---

← →
clickmaker ©   (2009-07-31 15:51) [3]

если это процесс с окном, то проще послать ему SendMessage(WinHandle, WM_SYSCOMMAND, SC_CLOSE, 0)

---

← →
Zheksonz   (2009-07-31 17:21) [4]

> clickmaker ©   (31.07.09 15:51) [3]


спасибо

---

← →
Dennis I. Komarov ©   (2009-07-31 17:31) [5]

И это называется выгружаю... :)

---

← →
Zheksonz   (2009-07-31 17:50) [6]

> Dennis I. Komarov ©   (31.07.09 17:31) [5]

KillTask))) И это называется убиваю???

---

← →
Dennis I. Komarov ©   (2009-07-31 17:58) [7]

> И это называется убиваю???

ес-но...

---

← →
Zheksonz   (2009-07-31 18:08) [8]

SendMessage(WinHandle, WM_SYSCOMMAND, SC_CLOSE, 0) чувствую, что это то, что нужно... только как мне определить хэндл программы по имени exe файла???

---

← →
Dennis I. Komarov ©   (2009-07-31 18:12) [9]

> Zheksonz   (31.07.09 18:08) [8]

не факт что получив такое сообщение программа закроется...

---

← →
Zheksonz   (2009-07-31 18:18) [10]

> не факт что получив такое сообщение программа закроется.
> ..

тогда не факт вообще, что нужно рассматривать этот вариант... может тогда всё-таки обновлять TaskBar?

---

← →
Dennis I. Komarov ©   (2009-07-31 18:27) [11]

> тогда не факт вообще, что нужно рассматривать этот вариант.
> ..

конечно не факт... я же не знаю чего там за программа, а вот за "KillTask" можно и пяткой в ухо получить...

---

← →
Zheksonz   (2009-07-31 18:35) [12]

Удалено модератором

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.01 c