Вопрос по Delphi

Есть функция на С++:

extern "C" DWORD WINAPI XInputSetState(DWORD dwUserIndex, XINPUT_VIBRATION* pVibration)
{
if (!pVibration)
return ERROR_BAD_ARGUMENTS;

}

Каким образом написать тоже самое на Delphi?
if not Assigned(pVibration) не работает, if pVibration<>nil тоже.

Спасибо.