Проблема с DirectX

[k1r1ch]

В общем что случилось: я начал изучать DirectX под Delphi и установил все dll'ки и библиотеки. Все работало нормально. И вот, в один день, перестали запускаться некоторые программы (ни скомпилированные, ни из исходника). Обнаружил, что все проблемные проги имели в коде функцию LoadMesh из библиотеки ddfunc. Там используется X'овская функция D3DXLoadMeshFromX из d3dx9_27.dll. Хотя эта библиотека у меня есть, но раз и .exe-файлы не запускаются, то дело в ней? Вот на всякий случай коды этих функций:

d3dx9MicrosoftDLL = 'd3dx9_27.dll';
d3dx9dll = d3dx9MicrosoftDLL;
d3dx9meshDLL   = d3dx9dll;

function D3DXLoadMeshFromX(
  pFilename: PChar;
  Options: DWord;
  pD3DDevice: IDirect3DDevice9;
  ppAdjacency, ppMaterials, ppEffectInstances: PID3DXBuffer;
  pNumMaterials: PDWORD;
  out ppMesh: ID3DXMesh): HResult; stdcall; external d3dx9meshDLL name 'D3DXLoadMeshFromXA';
{$EXTERNALSYM D3DXLoadMeshFromX}

function LoadMesh(filename:String;
    ppiD3DDevice9:IDirect3DDevice9;
    var ppMesh:ID3DXMesh;
    var pMeshTextures: PAIDirect3DTexture9;
    texturefilename: String;
    var pMeshMaterials: PAD3DMATERIAL9):DWORD;
var
 pD3DXMtrlBuffer: ID3DXBUFFER;
 dwNumMaterials: DWORD;
 d3dxMaterials: PAD3DXMATERIAL;
 i:Integer;
begin
 D3DXLoadMeshFromX(PWChar(filename), D3DXMESH_SYSTEMMEM, ppiD3DDevice9,
       nil, @pD3DXMtrlBuffer, nil, @dwNumMaterials, ppMesh);

 d3dxMaterials := pD3DXMtrlBuffer.GetBufferPointer();

 // Инициализируем материалы и текстуры
 GetMem(pMeshMaterials, SizeOf(TD3DMATERIAL9)*dwNumMaterials);
 GetMem(pMeshTextures, SizeOf(IDIRECT3DTEXTURE9)*dwNumMaterials);

 for i:=0 to dwNumMaterials-1 do
  begin
   // Копируем материал
   pMeshMaterials[i] := d3dxMaterials[i].MatD3D;

  // Создаем текстуру
   if (FAILED(D3DXCreateTextureFromFile(ppiD3DDevice9,
         PWChar(d3dxMaterials[i].pTextureFilename), pMeshTextures[i]))=true) then
    if (FAILED(D3DXCreateTextureFromFile(ppiD3DDevice9,
             PWChar(texturefilename), pMeshTextures[i]))) then
     pMeshTextures[i] := nil;
  end;
 Result:=dwNumMaterials;
end;

Может библиотека как-то не зарегистрирована, или что то другое??
Помогите, а то я только заинтересовался 3D-графикой

[k1r1ch]

Если что, вот скрин с ошибкой, которая возникает при запуске проги:

А вот моя версия dll-файла:
[url=http://dl.getdropbox.com/u/1278190/d3dx9_27.zip]
Помогите!

[Utkin]

Игры ставил?

[k1r1ch]

Нет! Просто вдруг в один день перестали проги запускаться(

[k1r1ch]

Опа! Попробовал ставить точки прерывания, оказалось что ошибка на строке:

var 
 pD3DXMtrlBuffer: ID3DXBUFFER;
 d3dxMaterials: PAD3DXMATERIAL;

 d3dxMaterials := pD3DXMtrlBuffer.GetBufferPointer();

Что тут неправильного? Ведь работало же!

P.S.: Ну раз никто не знает, сам буду разбираться

[k1r1ch]

Все, сам разобрался! Просто надо было использовать D3DXLoadMeshFromXW, которая работает с WideChar!