Transferring you to WDirectX...

WDirectX is free DirectX components for Delphi.
Developed by Robert Warnestam.