Текстуринг в Direct3D9

[alexprey]

Разбираюсь с текстурированнием в Direct3d9. Хочу расскрасить 2 объекта разными текстурами, но получается что оба красятся в одну и ту же, которая была применена последней. Что делать?
Это выполняеться при запуске проги

Device.SetMaterial( CreateMaterial(cl_white,cl_black,cl_black,cl_black,5));
 D3DXCreateTextureFromFile(Device,'grass.jpg',tex);
 //Ñîçäàíèå òðàâû
 Device.SetTexture(0,tex);
 grass[0]:= CreateVertex(-5,0,-5, 0,5);
 grass[1]:= CreateVertex(-5,0,5,  0,0);
 grass[2]:= CreateVertex(5,0,5,   5,0);
 grass[3]:= CreateVertex(5,0,-5,  5,5);
 CreateFace(grass,true);
 //Ñîçäàíèå ÿùèêà
 box:= T3DBox.Create;
 box.width:= 2;
 box.height:= 2;
 box.len:= 2;
 box.AddToStream;
 D3DXCreateTextureFromFile(Device,'box.jpg',tex);
 Device.SetTexture(0,tex);
...
function CreateVertex(x,y,z, u,v: single): T3DVertex;
begin
 ZeroMemory(@Result,SizeOf(T3Dvertex));
 Result.pos.x:= x;
 Result.pos.y:= y;
 Result.pos.z:= z;
 Result.u:= u;
 Result.v:= v;
end;
...
function CreateFace(ver: T3DFace; isnormal: boolean): boolean;
begin
 CreatePolygone(ver[0],ver[1],ver[2],isnormal);
 CreatePolygone(ver[2],ver[3],ver[0],isnormal);
end;
...
function CreatePolygone(ver: T3DPolygone; isnormal: boolean): boolean;
 var pver: pointer;
     normal: TD3DXVector3;
begin
 if isnormal then
 begin
  normal:= GetNormal(ver[0].pos,ver[1].pos,ver[2].pos);
  ver[0].npos:= normal;
  ver[1].npos:= normal;
  ver[2].npos:= normal;
 end;
 if Failed( VertexBuffer.Lock(3*PolygoneCount*SizeOf(T3DVertex),3*SizeOf(T3DVertex),pver,0) ) then exit;
  Move(ver,PVer^,3*SizeOf(T3DVertex));
 VertexBuffer.Unlock;
 inc(polygonecount);
end;

[_-Re@l-_]

Вот:

D3DXCreateTextureFromFile(Device,'grass.jpg',tex);
 //Ñîçäàíèå òðàâû
 Device.SetTexture(0,tex);

и вот

 D3DXCreateTextureFromFile(Device,'box.jpg',tex);
 Device.SetTexture(0,tex);

Вы сразу пытаетесь установить две текстуры, а сначала нужно прорисовать первый объект с его текстурой, а затем установить вторую текстуру и прорисовывать второй объект с его текстурой.

[alexprey]

Я вроде так и делаю
Или я не понимаю слово прорисовать
функции CreateFace и AddToStream сразу добовляет всю нужное в VertexBuffer

[alexprey]

Хм... заметил, что если поставить sleep перед рисованием кубика, то на травке будет нужная текстура. Потом как нарисуется куб, то трава будет с текстурой кубика и сам куб.

[alexprey]

А вот до меня кажись дошло как сделать. Но получается что-то геморно.
Ну может есть еще у кого идеи?

[alexprey]

А нет все тему можно удалять!