主页

★★★★★★好久没来问问题了。关于Mid子窗体的问题！！★★★★★★

yunok 2003-09-30 04:00:47

有好几个子窗体窗体。要求只能有一个是在最上边的，而且其它子窗体都不相应任何鼠标键盘事件，包括父窗体上的TreeView都不再相应。该怎样做呢？：）

...全文

16 条回复

切换为时间正序

当前发帖距今超过3年，不再开放新的回复

发表回复

甴曱 2003-10-02

再为你顶吧。

回复赞

yunok 2003-09-30

yunfeng007(一水寒) ,这样不符合我的要求。我要求鼠标还能动的。而不是限制。谢谢。

luolovegui(东方不败)，SetWindowPos是用来是窗口在最上方的。也不符合我的要求。请您看清我的要求OK？

回复赞

luolovegui 2003-09-30

不错的想法，你可以试试SetWindowPos()不知道行不行，有时间的话我帮你写写。

回复赞

yunfeng007 2003-09-30

把鼠标限制在你的这个窗体内！并且屏蔽键盘，不响应键盘操作！^_^

回复赞

yunok 2003-09-30

关键是我不想用Timer。太占资源了啊

回复赞

海牛 2003-09-30

唉！
你只需要把其它其它子窗体.Enabled = False，再加上TreeView.Enabled = False不就行了！

回复赞

海牛 2003-09-30

用一个Timer控件再结合wea1978(川) 的方法，应该能行！

回复赞

yunok 2003-09-30

恩。。。。。。。办法都不是太好啊！

回复赞

pigpag 2003-09-30

子类处理比较好。

回复赞

pandengzhe 2003-09-30

同意。
如果不择手段的话，应有多种方法

回复赞

wea1978 2003-09-30

你在子窗体的的mouse事件里面，做个判断,如果超出本窗体范围，则让其它窗体的enabled为false，当此窗体关闭的时候再回复.如:
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If X > Me.Width Or Y < Me.Height Then
其它窗体.Enabled = False
End If
End Sub

回复赞