窗口问题，在线等

Question

我现遇到一个问题：
    我想几个窗口能同时显示，具体的说，一个主界面（全屏），另外在主界面的下方有几个小窗口，他们显示相关信息；这几个窗口始终可见，只是活动性不同，这样怎样设计呢？
    

Answer 1

不太明白你的意思，主窗体用MDIForm,其他的Form中MDIChild设成True

Answer 2

将小窗口设为最顶层窗口即可.'例如:在FORM_LOAD中.
'SetTopWindow ME.HWND'**下面代码放到一个模块中*
Private Const HWND_TOP = 0
Private Const HWND_BOTTOM = 1
Private Const HWND_TOPMOST = -1
Private Const HWND_NOTOPMOST = -2Private Const SWP_NOSIZE = &H1
Private Const SWP_NOMOVE = &H2
Private Const SWP_NOZORDER = &H4
Private Const SWP_NOREDRAW = &H8Private Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, _
                                         ByVal hWndInsertAfter As Long, _
                                         ByVal X As Long, ByVal Y As Long, _
                                         ByVal cx As Long, ByVal cy As Long, _
                                         ByVal wFlags As Long) As Long'
'设置窗口为最顶层
'函数:SetTopWindow
'参数:Winwnd 要设置为最顶层窗口的HWND
'返回值:
'例子：
Public Function SetTopWindow(WinWnd As Long)
       SetWindowPos WinWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOSIZE Or SWP_NOMOVE
End Function

Answer 3

up to liyan010(我是大坏蛋)

Answer 4

MDIForm 怎使用的？给一个例子吧？
[email protected]

Answer 5

从Project中选Add MDIForm就可以了，如果想想添加子窗体，可以从Project中选Add Form然后将MDIChild设为True