Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 18.04.2008, 22:19
Кодер Кодер вне форума
Активный
 
Регистрация: 25.02.2008
Сообщения: 395
Репутация: -599
По умолчанию Диспетчер задач

Уважаемые,

как мне узнать как программы запущенны в диспетчере задач?

Тоисть я хочу в таймере постоянно проверять какие проги на данный момент используюся..или окна..
Ответить с цитированием
  #2  
Старый 19.04.2008, 03:01
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,094
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Цитата:
Сообщение от Неподарок
Уважаемые,

как мне узнать как программы запущенны в диспетчере задач?

Тоисть я хочу в таймере постоянно проверять какие проги на данный момент используюся..или окна..

Читай сюда:
CreateToolhelp32Snapshot
Process32First
Process32Next

Это функции WinAPI, которые позволяют проучить инфу о процессах.
Ответить с цитированием
  #3  
Старый 19.04.2008, 12:36
Кодер Кодер вне форума
Активный
 
Регистрация: 25.02.2008
Сообщения: 395
Репутация: -599
По умолчанию

А конкретнее можно? Пример кодинга..
Ответить с цитированием
  #4  
Старый 19.04.2008, 16:41
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,094
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Цитата:
Сообщение от Неподарок
А конкретнее можно? Пример кодинга..

Сам не делал, но на вскидку выглядит примерно так - делаешь снапшот, потом перебираешь потоки через XXXFirst XXXNext, аналогично поиску файлов. функции перебора заполняют чтруктуру с информацией о процессе.

А вообще, учись думать сам. Этот вопрос выходит за рамки уровня "новичек", так что тут придется думать самому. Хотя и инфу об этих функциях мог бы и сам найти - в Win32 Help набираешь "Process", даоее в списке "Process walking" и там читаешь.
Ответить с цитированием
  #5  
Старый 19.04.2008, 20:32
Аватар для moo2k
moo2k moo2k вне форума
Активный
 
Регистрация: 05.12.2006
Адрес: где-то там...
Сообщения: 321
Репутация: 35
По умолчанию

Цитата:
Сообщение от lmikle
А вообще, учись думать сам. Этот вопрос выходит за рамки уровня "новичек", так что тут придется думать самому.
И что? Разве нельзя было нормально сказать человеку?
to Неподарок:
Код:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Uses Tlhelp32; 
... 
function GetProcess:TStringList; 
const 
PROCESS_TERMINATE=$0001
var 
Co:BOOL; 
FS:THandle; 
FP:TProcessEntry32; 
begin 
result:=TStringList.Create; 
FS:=CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0); 
FP.dwSize:=Sizeof(FP); 
Co:=Process32First(FS,FP); 
while integer(Co) <> 0 do 
begin 
result.Add(FP.szExeFile); 
Co:=Process32Next(FS,FP); 
end
CloseHandle(FS); 
end;
Использование: memo1.Lines:=GetProcess;
__________________
Программирование - это искусство и наш смысл жизни.
Ответить с цитированием
  #6  
Старый 19.04.2008, 23:46
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,094
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Цитата:
Сообщение от moo2k
И что? Разве нельзя было нормально сказать человеку?

В принципе, конечно, можно.
Но лично я считаю, что если человек дорос до проблем такого уровня, то он должен уже сам смочь раскопать нужную информацию после того, как ему подсказали направление поиска. Это, конечно, мое ИМХО.
Ответить с цитированием
  #7  
Старый 20.04.2008, 11:24
Кодер Кодер вне форума
Активный
 
Регистрация: 25.02.2008
Сообщения: 395
Репутация: -599
По умолчанию

Цитата:
И что? Разве нельзя было нормально сказать человеку?
Приятно слышать

2 lmikle - А ты не смотришь на такие ситуации что человечик то шарит в этом всём но на изучение нового у него нету времени, а срочняк надо?
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 16:08.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025