相关分类: Java技术 C/C++ VB delphi
  • 在VB中实现位图的透明放置

    我们在开发一个软件中,通过扫描仪输进了大量实景图片,这些图片是以位图格式存储的,实际需要将这些图片透明放置到多彩色背景上,而在我们所使用的Visual Basic for Windows开发环境中,只能将WMF格式的矢量图(通过Image控件装载)透明放置到多彩色复杂背景图上,对位...

    2008-02-23 06:53:57

  • 用VB编写FLASH动画播放器

    Flash4是MacroMedia公司出品的矢量动画创作专业软件,利用该软件制作的矢量动画具有文件体积?⒋?粜Ш图嫒菪院玫忍氐恪D敲矗?阆氩幌朐谧约罕嘈吹某绦蛑屑尤隖lash动画,为自己的程序添加一道亮丽的色彩呢? 一、编程原理 本程序利用了Flash4本身自带播放Flash动画的...

    2008-02-23 06:53:57

  • 即时即战游戏的写法

    这跟多工什么关系咧,别把问题搅的那么复杂。 1.这叫棋子操纵模式。 2.回合制采用单方棋子操纵模式,也就是敌方棋子由电脑操纵,使用者棋子由使用者操 纵。 3.即时制采用双方棋子操纵模式,也就是双方棋子都由电脑操作,只是电脑允许使用者 改变我方棋子行为模式而已。...

    2008-02-23 06:53:55

  • 如何用API定义程序热键

    一些软件在启动时窗体不可见,在需要操作时按一下某一个键,窗体会自动弹出来,很方便。这是因为该软件事先定义了热键。 VB程序也能加入此功能,步骤如下: 一、申明定义热键的API函数 Private Declare Function GetAsyncKeyState Lib "user32" _ (ByVal vKey As Long)...

    2008-02-23 06:53:55

  • 获取桌面窗口图象

    Windows提供了一个API函数GetDesktopWindow,该函数返回桌面窗口的设备描述。 因此利用它就可以轻松获取桌面窗口的图象。 参见下例: 步骤1----建立新工程。 步骤2----编写如下代码: Private Declare Function GetDesktopWindow Lib "user32" () As Long Private Declar...

    2008-02-23 06:53:53

  • 如何设定墙纸的显示方式?

    在改变桌面图片时,也设定显示方式(包括“居中”、“平铺”、“拉伸”)呢? 方法就是在呼叫 SystemParametersInfo 之前, 利用改变注册表的以下设定值: HKEY_CURRENT_USERControl PanelDesktopTileWallpaper HKEY_CURRENT_USERControl PanelDesktopWallpaperSt...

    2008-02-23 06:53:54

  • 满屏播放AVI文件

    在Windows系统中,满屏播放AVI文件同在窗口中播放AVI文件是不同的,在满屏播放的时候不需要屏幕上的颜色进行抖动,只需要将调色板设置为AVI文件所独有的就可以了,这是因为没有其它的窗口在背景中存在的缘故。 使用Windows 应用程序编程接口(API)的mciSendString函数...

    2008-02-23 06:53:52

  • Visual Basic 5.0中实现视频画中画

    在VISUAL BAISC 5.0中可以使用播放视频动画文件(*.AVI)的方法在我们的软件中加入动画效果,但在软件中如何实现视频画中画的效果呢?经笔者摸索,发现利用WIDOWS 95的API函数mciExecute、mciSendString和SetWindowPos可实现这一效果。 下面笔者以最常用的大画面中叠加小...

    2008-02-23 06:53:51

  • 用VB 在 AutoCAD R14 中写 Text 的方法

    AutoCAD 可以写不同高宽比、不同角度、不同颜色的 TEXT。无论是用 AutoCAD的TEXT 命令,还是用 AutoLISP,都是很容易做到的,用 VB 是否也很容易哪?我们来看下面一段示例: Public objAcad As Object Public objDoc As Object Dim ent As Object Dim startPoint(0 To 2)...

    2008-02-23 06:53:51

  • 处理过程时的鼠标显示

    为让你的程序更加专业一点,我们往往需要在程序处理过程时的鼠标形状显示为“沙漏”状态。我们一般的方法是在子程序的开始及结尾编程来改变鼠标形状,这样十分烦琐且容易忘记。我们还可以以下面的方法来实现这一目标: 1、创建一个新类,命名为:CHourGlass; 2、在此类...

    2008-02-23 06:53:49

2