Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

DelphiX D3DRM [D7, Win2k]


m-AAA-d ©   (2004-02-05 15:32:00) 

Добрый день.
создаю несколько сфер и заставляю их вращаться все вместе - это несложно, непонятно другое: на каждую сферу я накладываю свою текстуру но все они почему то заполняются той что была загружена последней. как этого избежать?

 for i:= 1 to GalaxyMap.Count do begin
   s:= ExtractFilePath(Application.ExeName) +
       GalaxyMap.Star[i-1].Texture;
//---  Setting up MeshBuilder  ---------------------------
   DXDraw.D3DRM.LoadTexture(PChar(s), Texture);
   MeshBuilder.SetColor(D3DRGB(1, 1, 1));
   MeshBuilder.SetTexture(Texture);
//---  Setting up MeshFrames 1st level (stars)  ----------
   DXDraw.D3DRM.CreateFrame(MeshFrame, dMeshFrame);
   dMeshFrame.SetPosition(MeshFrame, GalaxyMap.Star[i-1].X,
     GalaxyMap.Star[i-1].Y, GalaxyMap.Star[i-1].Z);
//---  Create wrap  --------------------------------------
   dMeshFrame.AddVisual(MeshBuilder);
   CreateWarp(D3DRMWRAP_CHROME, MeshBuilder, dMeshFrame);
   dMeshFrame:= nil;
 end; MeshBuilder:= nil;

необходимо както это отследить в DXTimerTimer? если да, то как.


m-AAA-d   (2004-02-06 17:09:00) [1]

понял, седня попробую. tnx.


Sapersky   (2004-02-06 10:42:00) [2]

Текстуры в данном случае нужно присваивать фреймам (Frame.SetTexture).


m-AAA-d   (2004-02-05 16:15:00) [3]

сейчас прочитал про функции обратного вызова (AddMoveCallBack) - никто не знает как их написать?


Наверх

Титульная страница Поиск, карта сайта Написать письмо