Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.25;
Скачать: CL | DM;

Вниз

Кто сколько CPU времени ест.   Найти похожие ветки 

 
Seldon   (2004-02-26 16:11) [0]

Здрасьте.
Как узнать, сколько процессорного времени занимает конкретный процесс? (Тот же Explorer.exe)


 
VMcL ©   (2004-02-26 16:15) [1]

GetProcessTimes()


 
Seldon   (2004-02-26 17:15) [2]

А как интерпретировать её результаты? Мне кажется, нужно использовать lpKernelTime или lpUserTime. Но они вроде как обозначают секунды, а мне нужны проценты.

Возможно я неправильно выразился: мне нужно узнать, на сколько % конкретный процесс загружает CPU.


 
Burmistroff   (2004-02-27 00:16) [3]

%=(разница usertime/кол-во секунд между опросами)*100%


 
VMcL ©   (2004-02-27 11:18) [4]

2 [2]

Кстати, если мне не изменяет склероз, [1] работает в Win2K+.


 
Игорь Шевченко ©   (2004-02-27 11:45) [5]

VMcL ©   (27.02.04 11:18)

Во всех NT-системах.
Included in Windows XP, Windows 2000 Professional, and Windows NT Workstation 3.5 and later.


 
VMcL ©   (2004-02-27 14:43) [6]

Roger that ))


 
Seldon   (2004-02-27 15:47) [7]

А способ узнать в 9x есть?


 
Seldon   (2004-02-29 20:01) [8]

Может я чего неправильно делаю?


var
 Last:Int64;

procedure TForm1.Timer1Timer(Sender: TObject);
var
 H:THandle;
 ID,hP:Cardinal;
 tmp,PT:_FILETIME;
begin
 H:=FindWindow("TForm1","Form1");
 GetWindowThreadProcessId(H,ID);
 hp:=OpenProcess(PROCESS_ALL_ACCESS,false,ID);
 GetProcessTimes(hp,tmp,tmp,tmp,PT);
 Label1.Caption:=FloatToStr((Int64(PT)-Last)/1*100);
 Last:=Int64(PT)
end;


Для теста создал программку с бесконечным циклом. Она загружает на 100%.
Вышеприведённый код для неё даёт 0%. Где ошибка?


 
jack128 ©   (2004-02-29 23:26) [9]


> procedure TForm1.Timer1Timer(Sender: TObject);


> H:=FindWindow("TForm1","Form1");
Что то мне подсказывает, что ты ловишь не окно тестового приложение, а окно текущего(того, которое измеряет загрузку) приложения ;-)



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

Текущий архив: 2004.04.25;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.036 c
14-1081071413
ChengrMan
2004-04-04 13:36
2004.04.25
За что :(


1-1081229750
alik-os
2004-04-06 09:35
2004.04.25
Запись Record в файл


6-1077527376
Ron
2004-02-23 12:09
2004.04.25
Сканер сети


6-1077771103
Vovanx
2004-02-26 07:51
2004.04.25
Поиск сервера в сети


14-1080792433
Паниковский
2004-04-01 08:07
2004.04.25
Набираю команду декодеров!