Использование NtQuerySystemInformation в Delphi.

← →
fishca (2003-11-03 09:33) [0]

Интересует как использовать данную функцию в своих программах?
Что для этого нужно сделать?

← →
Polevi © (2003-11-03 09:59) [1]

вызвать

← →
fishca (2003-11-03 10:22) [2]

Это понятно что вызвать, но как ведь нужен прототип правильный :)

← →
Игорь Шевченко © (2003-11-03 10:42) [3]

function NtQuerySystemInformation (SystemInformationClass : LongInt; SystemInformation : Pointer; SystemInformationLength : ULONG; ReturnLength : PDWORD) : Integer; stdcall;

← →
fishca (2003-11-03 11:39) [4]

Скорее вот так...

День добрый!

А так сделать:

type
TNtQuerySys = function (blah-blah) : тип ейного результата;

var
Fn : TNTQuerySys;

@Fn := GetProcAddress(GetModuleHandle("ntdll.dll"),"NtQuerySystemInformation");
if Assigned(Fn) then
Fn(blah-blah)

далее по вашему коду.

С уважением, Игорь Шевченко

← →
fishca (2003-11-03 11:39) [5]

Спасибо большое всем кто помог.

Использование NtQuerySystemInformation в Delphi. Найти похожие ветки