Вверх ↑
Этот топик читают: Гость
Гость
Ответов: 17029
Рейтинг: 0
#376: 2011-05-23 01:35:28 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2021-05-22 07:36:07
карма: 0

0
Ответов: 245
Рейтинг: 3
#377: 2011-05-23 01:36:59 ЛС | профиль | цитата
http://social.msdn.microsoft.com/Forums/ru-RU/programminglanguageru/thread/fe58575c-7409-400a-83f0-47bce1d5866c

смотри че ответили
карма: 0

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#378: 2011-05-23 02:01:43 ЛС | профиль | цитата
77.35.132.193 писал(а):
смотри че ответили

Отвечаем:

1. ЯВУ -- Delphi совместно с WinAPI
2. Устанавливаем привелегию отладчика -- 'SeDebugPrivilege'
3. Перечисляем процессы и получаем их ID, используя виртуальную ветку реестра -- HKEY_PERFORMANCE_DATA, при помощи функции RegQueryValueEx
4. Открываем процесс по ID функцией OpenProcess и получаем его дескриптор
5. По дескриптору процесса получаем путь к файлу процесса при помощи функции GetModuleFilenameEx для dwMajorVersion < 6, для dwMajorVersion >= 6 используем QueryFullProcessImageName
карма: 22

1
Голосовали:Roma
Ответов: 245
Рейтинг: 3
#379: 2011-05-23 12:09:38 ЛС | профиль | цитата
http://social.msdn.microsoft.com/Forums/ru-RU/programminglanguageru/thread/fe58575c-7409-400a-83f0-47bce1d5866c
карма: 0

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#380: 2011-05-23 12:18:54 ЛС | профиль | цитата
goluzov, ну так определи код ошибки, я что ли за тебя это делать буду -- нет у меня XP x64 и не будет
карма: 22

0
Ответов: 245
Рейтинг: 3
#381: 2011-05-23 12:24:34 ЛС | профиль | цитата
объесни как и я сделаю
------------ Дoбавленo в 12.24:
нада сделать как там и все... и проверить будет работать или нет
карма: 0

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#382: 2011-05-23 12:27:12 ЛС | профиль | цитата
goluzov, короче, думай и додделай сам, надоело мне уже ковырять компонент и наращивать его код, ради несчатной XP x64, для тебя не знаю, но для нас это ненужный груз -- непозволительная роскошь. Кроме тебя, похоже, эту систему никто не юзает, и сомневаюсь, что кто-то будет.
------------ Дoбавленo в 12.27:
goluzov писал(а):
нада сделать как там и все... и проверить будет работать или нет

Вот и делай, надоело мне уже. К тому же, мы уже пробовали GetProcessImageFileName, он так же точно не прокатил
карма: 22

0
Ответов: 245
Рейтинг: 3
#383: 2011-05-23 12:30:24 ЛС | профиль | цитата
а commandLine реально сделать?
------------ Дoбавленo в 12.30:
xp 64 может оперативки более 3гб ипользевать
карма: 0

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#384: 2011-05-23 12:33:48 ЛС | профиль | цитата
goluzov писал(а):
а commandLine реально сделать?

Не знаю, не пробовал
goluzov писал(а):
xp 64 может оперативки более 3гб ипользевать

Любая система x64 может использовать оперативку болье 3 Гб
карма: 22

0
Ответов: 245
Рейтинг: 3
#385: 2011-05-23 12:38:03 ЛС | профиль | цитата
nesco писал(а):
К тому же, мы уже пробовали GetProcessImageFileName, он так же точно не прокатил


там еще PEB какойто есть
карма: 0

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#386: 2011-05-23 12:49:01 ЛС | профиль | цитата
goluzov писал(а):
там еще PEB какойто есть

Ты вот лучше расскажи как ты вот это предлагаешь декодировать -- DeviceHarddisk0Partition1, в таком формате выдет функция GetProcessImageFileName имя диска, это называется NativePath
карма: 22

0
Ответов: 245
Рейтинг: 3
#387: 2011-05-23 12:54:27 ЛС | профиль | цитата
так она всетаки выдает
карма: 0

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#388: 2011-05-23 13:00:43 ЛС | профиль | цитата
goluzov писал(а):
так она всетаки выдает

Так в описании к функции написано, но попробовал прикрутить, на, юзай, поняти не имею, на чем будет работать, но на Win2000 точно работать не будет -- enumprocess_028.zip


карма: 22

0
файлы: 1enumprocess_028.zip [8KB] [197]
Ответов: 245
Рейтинг: 3
#389: 2011-05-23 13:15:34 ЛС | профиль | цитата
xp 64

на вин 2000 даже не запускается
карма: 0

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#390: 2011-05-23 14:05:48 ЛС | профиль | цитата
goluzov писал(а):
на вин 2000 даже не запускается

И не запустится -- http://msdn.microsoft.com/en-us/library/ms683217(VS.85).aspx
------------ Дoбавленo в 14.05:
Вот, проверь на всех, вклчая 2000 -- enumprocess_029.zip
карма: 22

0
файлы: 1enumprocess_029.zip [9.2KB] [237]
Сообщение
...
Прикрепленные файлы
(файлы не залиты)