渲染目标层

译:zh1110

这里讲述了如何将对象渲染到指定目标上。

Dim tex As Direct3DTexture8 '创建贴图主体
texDime = 512
Set tex = device.CreateTexture(texDime, texDime, 0, D3DUSAGE_RENDERTARGET, D3DFMT_R5G6B5, D3DPOOL_DEFAULT)
 '创建渲染，模板表面，取得tex级别，这样对texSurf的改变就会反映到tex上

Dim texSurf As Direct3DSurface8
Dim stencilS As Direct3DSurface8

Set texSurf = tex.GetSurfaceLevel(0)
Set stencilS = device.CreateDepthStencilSurface(texDime, texDime, D3DFMT_D16, D3DMULTISAMPLE_NONE)
 '取得dx默认的渲染，模板表面

Dim backBuffS As Direct3DSurface8 'superficie del backbuffer principale
Dim ZbuffS As Direct3DSurface8 'superficie del Zbuffer principale

Set backBuffS = device.GetRenderTarget
Set ZbuffS = device.GetDepthStencilSurface

'设置渲染目标表面

device.SetRenderTarget texSurf, stencilS, 0

'......渲染飞机，飞机渲染后的图形就从texSurf反映到了tex上

'还原渲染目标表面

device.SetRenderTarget backBuffS, ZbuffS, 0

device.SetTexture 0, tex

'......渲染鸡蛋

文件下载