用DirectX7.0开发3D效果

最新推荐文章于 2024-06-15 23:03:23 发布

Wish-Way

最新推荐文章于 2024-06-15 23:03:23 发布

阅读量807

点赞数

分类专栏：软件开发技术文章标签：图形 vb library basic windows

本文链接：https://blog.csdn.net/osion/article/details/1810889

版权

本文介绍了如何使用Visual Basic结合DirectX 7.0进行3D图形开发，包括设置DirectDraw引用，创建DirectDraw对象，设置全屏或窗口模式，以及建立Primary、Backbuffer和Offscreen Surfaces。BltFast方法用于实现Surface间图像的复制与显示。

摘要由CSDN通过智能技术生成

DirectX 7.0终於支援VB了，让我们这些VB的爱好者也能享受到DirectX带来的便利，现在我在这里提出使用DirectDraw的心得。使用DirectDraw时可以不用安装DirectX7.0的SDK，只要确定有装DirectX7.0就可以了。

现在我们实际来使用DirectDraw：
在“工程(Project)”里点选“设定引用项目”，来引用DirectX物件。
接著将“DirectX 7 for Visual Basic Type Library”的那一行打勾，就可以开始使用DirectX了。

我们首先得建立DirectDraw物件，先宣告一个Direct物件和一个DirectDraw物件：
Dim objDX As New DirectX7
Dim objDD As DirectDraw7

接下来是使用DirectDrawCreate函式来建立DirectDraw物件：
Set objDD = objDX.DirectDrawCreate("")

然后必须设定是视窗模式还是全屏幕模式：
Call objDD.SetCooperativeLevel(Me.hWnd, DDSCL_FULLSCREEN Or DDSCL_ALLOWMODEX Or DDSCL_EXCLUSIVE)
第一个参数是设定DirectDraw的视窗是那一个，填入视窗的Handle代码而后面的参数是设定具备的能力，可以不止一个，使用Or组合起来。
DDSCL_FULLSCREEN 使用全屏幕(必须和DDSCL_EXCLUSIVE一起用)
DDSCL_ALLOWMODEX 使用Modex模式
DDSCL_EXCLUSIVE 使用独占模式
DDSCL_NORMAL 使用Windows的程式视窗
DDSCL_NOWINDOWCHANGE