Now it works =)
My error was to put directx headers in the "uses" part like in Delphi without using the inclusion of DirectX.inc... ops:

Now with {$I DirectX.inc} directive it works pretty fine! Good job, Clootie