Запилил оригинал с zetblog.ru, набросал форму с memo1 и button1, button2.
Вот тут:
Код:
if not EnumProcesses(@prcs, sizeof(prcs), cP) then
....
EnumProcessModules(hP, @hM, 4, cM);
.....
Выдает предупреждения
[Warning] Unit1.pas(63): Unsafe code '@ operator'
[Warning] Unit1.pas(76): Unsafe code '@ operator'
Запускается, но не работает(