CreateD3DTextureFromImage

function CreateD3DTextureFromImage(

  const Image: TImageData;

  Device: IDirect3DDevice9;

  var Texture: IDirect3DTexture9;

  Width: LongInt = 0;

  Height: LongInt = 0;

  MipLevels: LongInt = 0;

  Usage: LongWord = 0;

  Format: TD3DFormat = D3DFMT_UNKNOWN;

  Pool: TD3DPool = D3DPOOL_MANAGED;

  CreatedWidth: PLongInt = Nil;

  CreatedHeight: PLongInt = Nil

):Boolean;