Joystick buttons don't work?

[nzo2]

This is in the timer:

for i := 0 to DXInput1.Joystick.ButtonCount do
begin
     if DXInput1.Joystick.Buttons[i] = True then
     begin
          str(i,StrVal);
          MessageDlg(StrVal,mtInformation,[mbOK] ,0);
     end;
end;

DXInput1.Joystick.Buttons[i] doesn't work, and just use DXInput1.States?
OK.. I`ll try now...

OK, dxinput1.update is there of course.
Even Hori example doesn't work (button1). Movement works (wrong directions, but can be fixed)
Maybe I have a bad DXInput.pas file?