实现一个有趣的功能（system modal）(100分)

hhzh426 · 2000-09-27

对不起，刚才不小心按了一下回车！ 具体问题是： 在VB中用msgbox("提示",vbSystemModal+vbOKOnly)将会出现一个对话框，此时系统中的 其他程序都停止运行直到用户响应了该对话框后才会继续运行，就象是系统处于等待状态 中一样，其解释是： vbSystemModal: 系统强制返回；全部应用程序都被挂起，直到用户对消息框作出响应才继续工作。 我想让我的程序达到这种效果该怎么办？？？

Another_eYes · 2000-09-27

去已答问题中寻找有关"屏幕保护程序"的内容.

hhzh426 · 2000-09-28

to Another_eYes: 屏幕保护程序运行时别的程序仍在后台运行，并没有停止！ 只是此时不能使用系统功能键！ 我要的是停下来等待的效果！

Iknow · 2000-09-28

在你自己的程序一启动时就Messagebox(...)弹出一个对话框, 停在那儿等. Messagebox(0, '系统停了', 'aaa', MB_OK or MB_TOPMOST or MB_SYSTEMMODAL or MB_SETFOREGROUND);

o*o · 2000-09-28

估计是调用了16位的LockInput. Win3.1 SDK中有介绍.

o*o · 2000-09-28

你说的msgbox("提示",vbSystemModal+vbOKOnly) 俺试了一下, 完全可以切换到别的程序.

胡柚 · 2000-09-29

<h1>这可以用HTML吗？</h1>

Rover · 2000-09-29

TABLE border=1 width="100%">     <TR>     <TD width="5%">敢兴趣！</TD></TR></TABLE>

hhzh426 · 2000-09-29

to o*o: 我上微软的当了！！！不过我仍想问一问能不能在程序中达到这种效果！即将我的窗口的 类型设为系统模式窗口，所有程序停止运行直到我的程序结束或者释放控制权？ 我查看过MSDN，有关于setsysmodalwindow和lockinput的描述，但是我找不到它的函数 原型（在SDK的帮助中），而且MSDN中说是只有在win3.x中使用的。我想问一下，它在哪儿， 如何调用它？？ 请大侠帮忙！！！！！

CathyEagle · 2000-09-29

setsysmodalwindow弃用了，不过可以用其它技巧达到这种效果， 要点是屏蔽alt-tab等等系统键。

温柔一刀 · 2000-09-29

http://www.delphibbs.com/delphibbs/DispQ.asp?LID=147675 看看我在里面的回答

hustmouse · 2000-09-29

If you want only run under Win9X , you can use Win16Mutex . It need not simulate ScreenSaver or others. But it doesn't work under Windows NT , because there's no Win16Mutex .

hhzh426 · 2000-10-06

to hustmouse: where is Win16Mutex ? to 温柔一刀： 那个网站我已经去过了，却不知其所以然？有没有这样的函数将窗口的类型设置为系统模 态的？因为我注意到这样的现象，当windows me非正常关闭时将出现一个扫描磁盘的界面 直到这个界面消失后windows才会象往常一样按顺序加载各种自启动程序！还有windows的 登录窗口，也是这样！

温柔一刀 · 2000-10-06

我在哪个贴子也说了，Windows的登录窗口是独此一份， 不可能用一般的Windows程序来实现的，你还是不要想了。 我给的连接里有源代码下载，你down下来运行一下， 是通过各种手段达到使windows不能处理各种消息， 从而模拟“系统模态”的。

sunstone · 2000-10-06

我也听说系统有模式对话框,不知道是什吗?

devuser · 2000-10-08

不可能系统的其他程序停止，我原来使用VB从来没有发现这一点

sunstone · 2000-10-08

的确在msdn上说明了此功能,但在win9x上不行.

pxie · 2000-10-09

是不是要这个效果: int MessageBox(     HWND hWnd, // handle of owner window     LPCTSTR lpText, // address of text in message box     LPCTSTR lpCaption, // address of title of message box       UINT uType // style of message box   &nbsp

; Parameters uType MB_SYSTEMMODAL   Same as MB_APPLMODAL except that the message box has the WS_EX_TOPMOST   style. Use system-modal message boxes to notify the user of serious,   potentially damaging errors that require immediate attention (for example,   running out of memory). This flag has no effect on the user's ability to   interact with windows other than those associated with hWnd. 比如:   MessageBox(Application.Handle, 'System Modal Dialog',     'Message', MB_OK or MB_SYSTEMMODAL or MB_ICONSTOP);

Jams · 2000-10-09

>>

实现一个有趣的功能（system modal）(100分)

hhzh426

Unregistered / Unconfirmed

hhzh426

Unregistered / Unconfirmed

Another_eYes

Unregistered / Unconfirmed

hhzh426

Unregistered / Unconfirmed

Iknow

Unregistered / Unconfirmed

o*o

Unregistered / Unconfirmed

o*o

Unregistered / Unconfirmed

胡柚

Unregistered / Unconfirmed

Rover

Unregistered / Unconfirmed

hhzh426

Unregistered / Unconfirmed

CathyEagle

Unregistered / Unconfirmed

温柔一刀

Unregistered / Unconfirmed

hustmouse

Unregistered / Unconfirmed

hhzh426

Unregistered / Unconfirmed

温柔一刀

Unregistered / Unconfirmed

sunstone

Unregistered / Unconfirmed

devuser

Unregistered / Unconfirmed

sunstone

Unregistered / Unconfirmed

pxie

Unregistered / Unconfirmed

Jams

Unregistered / Unconfirmed

Similar threads