Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Использование NtQuerySystemInformation в Delphi. [D7, Win2k]


fishca ©   (2003-11-03 09:33:00) 

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


fishca   (2003-11-03 11:39:00) [1]

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

День добрый!

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

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:00) [2]

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


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

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


fishca   (2003-11-03 10:22:00) [4]

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


Polevi   (2003-11-03 09:59:00) [5]

вызвать


Наверх

Титульная страница Поиск, карта сайта Написать письмо