Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2009.10.04;
Скачать: [xml.tar.bz2];

Вниз

Выгружаю процесс, аиконкапроболжает висеть на 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 вся ветка

Форум: "Начинающим";
Текущий архив: 2009.10.04;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.008 c
15-1249158604
Юрий
2009-08-02 00:30
2009.10.04
С днем рождения ! 2 августа 2009 воскресенье


1-1218649384
Tack
2008-08-13 21:43
2009.10.04
Можно ли переименовать класс окна?


2-1248680807
ford
2009-07-27 11:46
2009.10.04
TWordApplication выдает ошибку - "вызов был отклонен"


2-1248952921
xyz
2009-07-30 15:22
2009.10.04
вопрос по поводу пути до БД в ADOConnection


1-1218618200
dmitry_12_08_74
2008-08-13 13:03
2009.10.04
Подскажите, как определить, над каким окном находится мышь





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский