精华区文章阅读

发信人: zhaowei (还珠格格), 信区: VisualBasic
标  题: VB中软件封面技术探秘2
发信站: 紫丁香 (Tue Jun  1 18:21:16 1999), 转信

         使用微软公司的Visual Basic进行软件开发是WINDOWS环境下应
         用程序开发的捷径，同样，使用Visual Basic制作应用程序封
         面也是相当方便的。在开发过程中，主要应该解决的问题有：

         1. 封面的制作。

         这不是一个纯技术性的问题。开发者必须有一定的美术知识和
         功底，制作出的封面也可以具有个人的不同的风格。在VB中，
         封面也是一个窗体，开发者可以在窗体上使用VB的绘图工具
         Line和Shape绘制出图形，甚至可以绘制出类似WORD的三维效
         果，也可以在窗体内载入一个图片框（Picture Box）或图象控
         制（Image Control）,利用图片框或图象控制载入自己所喜欢
         的图片来制作封面，在图形之上，可以使用文本框（Text
         Box）或标签框（Label）来显示版本信息。为了使这样的一个
         窗体更加象一个封面，应该去除窗体的控制框，标题栏和最大
         最小化按钮，同时窗体的大小也不允许用户改变。因而在封面
         窗体的属性中，属性Control Box应设为False，Caption应设为
         空，MaxButton和MinButton应设为False，BorderStyler属性设
         为1，即固定的单线边界，这样就实现了一个具有专业水准的封
         面。

         2. 浮动窗体的实现。

         由于主窗体先载入，然后激发封面的事件(event),使封面窗体
         成为当前活动窗体，所以必须保证窗体总是浮在主窗体的上
         面，在VB中，这个问题主要依靠调用WINDOWS的API函数
         SetWindowpos来实现。SetWindowpos函数的声明如下：

         　

         Declare Sub SetWindowPos Lib "User" (ByVal hWnd As
         Integer, ByVal hWndInsertAfter As Integer, ByVal X As
         Integer, ByVal Y As Integer, ByVal cx As Integer, ByVal
         cy As Integer, ByVal wFlags As Integer)

         　

         其中： hWnd为作为封面窗体的句柄；

         hWndInsertAfter 指示为封面窗体前载入的窗体；

         X为封面窗体左上角的X坐标;

         Y为封面窗体左上角的Y坐标;

         cx为窗体新宽度；

         cy为窗体新高度；

         wFlags影响窗体大小和位置的16位值。

         其中，hWndInsertAfter设为HWND_TOPMOST，wFlags设为
         SWP_NOMOVE （不移动窗体，即忽略cx和cy）或SWP_NOSIZE（不
         改变窗体大小，即忽略X和Y），就可以实现将HWND标识的窗体
         置于所有非最顶窗体之上。
--
----------------------
        %-%      身  人
      % * * %    不  在
      %  .  % /   由江
         \\--/     己湖                    �
-----------------------

※ 来源:．紫丁香 bbs.hit.edu.cn．[FROM: 202.118.243.47]

VB 版 (精华区)