OK. I download new header from CVS but it require d3dx9xofab.dll file.
Where download this file?

------------------------------------------------------------------------------
To be sure you compiling to correct code, just edit your existent DirectInput.pas so it will look like this: Pascal Code:
DIEFFECT = packed record
dwSize: DWORD; (* sizeof(DIEFFECT) *)
dwFlags: DWORD; (* DIEFF_* *)
dwDuration: DWORD; (* Microseconds *)
dwSamplePeriod: DWORD; (* Microseconds *)
dwGain: DWORD;
dwTriggerButton: DWORD; (* or DIEB_NOTRIGGER *)
dwTriggerRepeatInterval: DWORD; (* Microseconds *)
cAxes: DWORD; (* Number of axes *)
rgdwAxes: PDWORD; (* Array of axes *)
rglDirection: PLongint; (* Array of directions *)
lpEnvelope: PDIEnvelope; (* Optional *)
cbTypeSpecificParams: DWORD; (* Size of params *)
lpvTypeSpecificParams: Pointer; (* Pointer to params *)
//{$IFDEF DIRECTINPUT_VERSION_6}
dwStartDelay: DWORD; (* Microseconds *)
//{$ENDIF} (* DIRECTINPUT_VERSION >= 0x0600 *)
end;

Sure. My compiling to correct code.