Microsoft DirectX 8.0 (Visual Basic) |
Microsoft® Direct3D® では、一度に 1 つのシェーディング モードしか選択できない。デフォルトでは、グーロー シェーディングが選択されている。Microsoft Visual Basic® では、Direct3Ddevice8.SetRenderState メソッドを呼び出してシェーディング モードを変更できる。State パラメータを D3DRS_SHADEMODE に設定する。State パラメータには、CONST_D3DSHADEMODE 列挙のメンバを設定する。次のサンプル コードは、Direct3D アプリケーションの現在のシェーディング モードを、フラット シェーディング モードまたはグーロー シェーディング モードに設定する方法を示している。
' フラット シェーディングに設定する。 ' このコードでは、d3dDev が Direct3DDevice8 オブジェクトへの ' 有効な参照であるとする。 On Local Error Resume Next Call d3dDev.SetRenderState(D3DRS_SHADEMODE, _ D3DSHADE_FLAT) ' エラーを調べる。 If Err.Number <> D3D_OK Then ' エラーを処理する。 End If ' グーロー シェーディングに設定する。これが Direct3D のデフォルト値である。 Call d3dDev.SetRenderState(D3DRS_SHADEMODE, _ D3DSHADE_GOURAUD) If Err.Number <> D3D_OK Then ' エラーを処理する。 End If