background Texture, DelphiX, DirectX6

Hello !

Ive a Problem with DelphiX and Direct3DRM (DirectX 6 ! ,Delphi 3) using a
Surface as a Textur for the Bachground Image in a D3DScene !

My isolated Code looks like that :

procedure TBaseFormX.DXDrawInitialize(Sender: TObject);

var
   empty_Image   : D3DRMIMAGE;
   bkg_texture   : IDirect3DRMTexture;
   EmptySurface  : TDirectDrawSurface;

...

     EmptySurface := TDirectDrawSurface.Create(DXDraw.DDraw);
     EmptySurface.LoadFromFile('bkgtextur.bmp');

DXDraw.D3DRM.CreateTextureFromSurface(EmptySurface.ISurface,bkg_texture);
     bkg_texture.SetColors(256);
     bkg_texture.SetShades(1);
     bkg_texture.SetDecalScale(0);
     bkg_texture.SetDecalOrigin(512,512);
     bkg_texture.SetDecalTransparency(false);
     DXDraw.Scene.SetSceneBackgroundImage(bkg_texture);

...

but theres is nothing shown !

Using :

     DXDraw.D3DRM.CreateTexture(empty_Image,bkg_texture);
     DXDraw.D3DRM.LoadTexture(PChar('bkgtextur.bmp'),bkg_texture);

works, but didnt solve my Problem !

I hope you can help me ...

Dominik F.

P.S. If you answer per e-mail please remark "to Dominik F." in 'Remarks' !)