После этого
Не должно.
Как мне кажется нужно переписать элемент.
------------ Дoбавленo в 16.26:

Перебирает все процессы, и у процесса у которого id = искомому id выдает его родителя.

Ivann, я не про это спрашивал, а про то, как он работает на Win 7 64 bit

code_23854.txt
Так лучше
------------ Дoбавленo в 16.28:
Я забыл! Я ведь на х64 комп поставил х32 Windows 7
Чего я там тестирую

Если будут проблемы (а они должны быть, по идее), то есть идея добавить в hiProcessInfo.pas кое-какую обработку дополнительного поля. Начинаю думать с конца, то есть с выдачи:

procedure THiProcessInfo._var_ParentProcessID;begin dtInteger *(_Data,ParentProcessID);end;

---

(*сам WMI выдаёт String, вроде, не знаю, есть ли в среде конверсия )

Сам запрос формировать легко, он в текстовом поле свойства Query лежит, добавить ",ParentProcessID" только.

Осталась "самая малость" - расковырять половину кода начиная с правки procedure THiProcessInfo._work_doInfo

Ну и декларации обновить.

1nd1g0, Держите
Простите ошибся исправил

Ivann, к сожалению, в ini я как раз лучше разбираюсь, чем в pas

1nd1g0, обнови

Ivann, уже!

Вот и пример под новый компонент:

code_23858.txt
------------ Дoбавленo в 16.52:
Кто-нибудь, проверьте на Windows 7 64 bit
------------ Дoбавленo в 16.54:
nesco, Как минимум одна работа Ivann заслуживает увековечивания в SVN. Можете и пример присовокупить, в принципе...

Если пройдет испытания то просим nesco загрузить на svn

goluzov, т.к. больше всех это интересовало Вас, стоит хотя бы выразить признательность Ivann, да и nesco. Я тут просто мимо проходил, из любопытства занимался.

1nd1g0, win 7 x64

hiProcessInfo.pas(126,14) Error: Incompatible types: got "IDispatch" expected "OleVariant"
hiProcessInfo.pas(140,18) Error: Incompatible types: got "OleVariant" expected "Variant"
hiProcessInfo.pas(141,7) Error: Identifier not found "VarIsEmpty"
hiProcessInfo.pas(145,29) Fatal: Syntax error, ";" expected but "identifier EXECQUERY" found
Error: C:UsersgoluzovDownloadshiasmcompilerfpcppc386.exe returned an error exitcode (normal if you did not specifiy a source file to be compiled)

Да погодите вы, надо закончить с EnumProcess
------------ Дoбавленo в 16.58:
goluzov, этот компонент не работает под FPC

1nd1g0,

Ivann,

win 7 x64

hiInlineCode_2BE0B10.pas(28,18) Warning: Mixing signed expressions and longwords gives a 64bit result
hiInlineCode_2BE0B10.pas(33,29) Warning: Mixing signed expressions and longwords gives a 64bit result
hiInlineCode_2BE0B10.pas(33,46) Error: Can't determine which overloaded function to call
hiInlineCode_2BE0B10.pas(41) Fatal: There were 1 errors compiling module, stopping
Error: C:\Users\goluzov\Downloads\hiasm\compiler\fpc\ppc386.exe returned an error exitcode (normal if you did not specifiy a source file to be compiled)
------------ Дoбавленo в 17.06:
1nd1g0, я делаю прогу, буду продавать. если все ок, то всем кто помогал закину на webmoney

goluzov, а так?
code_23860.txt