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

Вниз

aProcessEntry32 Глюченный???   Найти похожие ветки 

 
Yury_FK   (2007-11-30 14:24) [0]

procedure TfrmMain.BtnRefreshClick(Sender: TObject);
var
  i: Integer;
  bContinue: BOOL;
  NewItem: TListItem;
  aSnapshotHandle: THandle;
  aProcessEntry32: TProcessEntry32;
begin
  ListView1.Items.Clear;
  aSnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
  aProcessEntry32.dwSize := SizeOf(aProcessEntry32);
  bContinue := Process32First(aSnapshotHandle, aProcessEntry32);
  while Integer(bContinue) <> 0 do
  begin
    NewItem := ListView1.Items.Add;
    NewItem.Caption := ExtractFileName(aProcessEntry32.szExeFile);
    NewItem.subItems.Add(IntToHex(aProcessEntry32.th32ProcessID, 4));
    NewItem.subItems.Add(aProcessEntry32.szExeFile);
    NewItem.SubItems.Add(IntToStr(aProcessEntry32.cntUsage) // тут глюк
    bContinue := Process32Next(aSnapshotHandle, aProcessEntry32);
  end;
  CloseHandle(aSnapshotHandle);
end;


почему не показывается свойство cntUsage??? =((((


 
Сергей М. ©   (2007-11-30 14:35) [1]


> // тут глюк


Сам ты глюк)

Заведи себе привычку сначала ходить в msdn, прежде чем шуметь о глюках)

cntUsage
   This member is no longer used and is always set to zero.



 bContinue := Process32First(aSnapshotHandle, aProcessEntry32);
 while Integer(bContinue) <> 0 do
 begin
   ..
   bContinue := Process32Next(aSnapshotHandle, aProcessEntry32);
 end;


К чему все эти приседания с преобразованиями типов ?


 if Process32First(aSnapshotHandle, aProcessEntry32) then
 repeat
   ..
 until not Process32Next(aSnapshotHandle, aProcessEntry32);  


 
Yury_FK   (2007-11-30 15:23) [2]

Все равно в столбце с cntUsage выводиться 0


 
Сергей М. ©   (2007-11-30 15:27) [3]


> Все равно в столбце с cntUsage выводиться 0


Ты буквы занешь ?)
Читать умеешь ?)

cntUsage
  This member is no longer used and is always set to zero.

Это для кого написано, для Пушкина ?)


 
Yury_FK   (2007-11-30 15:41) [4]

А подскажите, как же тогда определить, сколько %CPU использует процесс


 
Сергей М. ©   (2007-11-30 15:49) [5]

http://delphikingdom.ru/asp/answer.asp?IDAnswer=28257


 
Yury_FK   (2007-11-30 16:05) [6]

ничего не дало, WMI пользовался - бестолку


 
Сергей М. ©   (2007-11-30 16:06) [7]

Что значит "бестолку" ?


 
Yury_FK   (2007-11-30 16:09) [8]

Сергей будьте любезны, подскажите на уровне примера, как определить % использования процессора процессом, либо % использования RAM


 
Rouse_ ©   (2007-11-30 16:17) [9]

Изучай: http://rouse.drkb.ru/winapi.php#taskmon



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

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

Наверх




Память: 0.48 MB
Время: 0.016 c
8-1171800032
Snakecatcher
2007-02-18 15:00
2007.12.30
Красивая форма


2-1196943214
DelphiN!
2007-12-06 15:13
2007.12.30
SQL по выбору одновременной работы с приложениями


15-1193772243
Marser
2007-10-30 22:24
2007.12.30
ADSL-модем. "шо это было?!"(с)


15-1196498342
Valeo
2007-12-01 11:39
2007.12.30
Нужна Помощь


2-1196959438
Dib@zol
2007-12-06 19:43
2007.12.30
Работа с делфяными строками на билт-ин асме