DX9贴图-------VB6编程学习DX9游戏编程DirectX9编程2D小游戏源码冷风引擎CoolWind2D游戏引擎（11）

DX9贴图

先准备2张图片,蜘蛛为m1.png,单眼怪物为m2.png


创建一个Form1.frm,输入如下源码：

Private Sub Form_Load()

'新手注意：游戏编程中，
'通常将窗体的 BorderStyle 设置为“Fixed single”即不允许改变窗体大小
'通常将窗体的 MinButton 设置为“True”即允许最小化
'通常将窗体的 MaxButton 设置为“False”即禁止最大化

  '初始化引擎并设置引擎初始化窗体和引擎分辨率，但最好是电脑常用的分辨率比如 640,480 、 800,600 、 1024,768 、 1366,768
CWVBDX9Initialization Me, 800, 600, CW_Windowed
  '初始化引擎（目标窗体，横向分辨率，纵向分辨率，窗口模式/全屏模式）


Dim PicDemo1 As CWPic, PicDemo2 As CWPic    '定义CoolWind引擎图片变量

    CWLoadPic PicDemo1, App.Path & "\Pic\M1.png", CWColorNone
    CWLoadPic PicDemo2, App.Path & "\Pic\M2.png", CWColorNone
    '载入图片(图片变量,图片路径,屏蔽色)
    '关于屏蔽色:顾名思义,就是不显示图片上的指定的某种颜色,通常设为无色即可(即不屏蔽任何颜色)
    
    Do While CWGameRun = True         '进入游戏循环
    
    If CWD3DDevice9.TestCooperativeLevel = 0 And Me.WindowState <> 1 Then  '检测是否可以渲染（设备正常并且窗体未最小化时渲染）
    CWBeginScene CWBlue '准备好绘制场景
         
    CWPaintPicBegin     '贴图开始 必须与贴图结束成对出现，用于通知引擎准备贴图