Ошибка при вызове функции Access violation

[Hottabych]

Здравствуйте, есть код:

...
var
hardwareDeviceInfo: HDEVINFO;
deviceInterfaceData: SP_DEVICE_INTERFACE_DATA;
begin
DEF_GUID(@Guid_BUS_INT,$D35F7840, $6A0C, $11d2, $B8, $41, $00, $C0, $4F, $AD, $51, $71);
//
    // Open a handle to the device interface information set of all
    // present toaster bus enumerator interfaces.
    //
    hardwareDeviceInfo := SetupDiGetClassDevs(
                       @Guid_BUS_INT,
                       nil, // Define no enumerator (global)
                       0, // Define no
                       (DIGCF_PRESENT or // Only Devices present
                       DIGCF_DEVICEINTERFACE)); // Function class devices.

...

При вызове функции SetupDiGetClassDevs выскакивает ошибка 'Access violation at address 00000000. Read of address 00000000'.

Я думаю, что дело в некорректной настройке JEDI API, хотя точно не уверен. Такая же ошибка и при вызове других функций этой библиотеки.
Жду вашего совета.

[Hottabych]

Вопрос закрыт.
Про LoadSetupApi я даже не подумал....