以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]建立一个模式窗口,如何点击任务栏上的程序,这个模式窗口跟着放大缩小  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=53369)

--  作者:aalons
--  发布时间:2014/7/6 14:30:00
--  [求助]建立一个模式窗口,如何点击任务栏上的程序,这个模式窗口跟着放大缩小
如题,请高手指教


--  作者:有点甜
--  发布时间:2014/7/6 14:36:00
--  

 什么意思?是问将模式窗口放在任务栏里?

 

Forms("XX").baseform.ShowInTaskBar = True


--  作者:aalons
--  发布时间:2014/7/6 14:50:00
--  
放在任务栏后能点击这个主窗口也跟着放大缩小


--  作者:有点甜
--  发布时间:2014/7/6 14:55:00
--  

窗口SizeChanged事件,加入代码

 

Dim obj As object = e.Form.BaseForm
basemainform.WindowState = obj.WindowState


--  作者:有点甜
--  发布时间:2014/7/6 14:57:00
--  

 判断,对应的做对应的操作。

 

Dim obj As object = e.Form.BaseForm
Select obj.WindowState
    Case 0
       
    Case 1

 

    Case 2

 

End Select

[此贴子已经被作者于2014-7-6 14:57:24编辑过]

--  作者:aalons
--  发布时间:2014/7/6 15:10:00
--  
还是没说清楚,我传个附件上来,点击打开按钮后会把主界面隐藏掉,然后点击缩小窗口后,就找不到另一个窗口了。
--  作者:aalons
--  发布时间:2014/7/6 15:13:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:打开新窗口.foxdb


--  作者:有点甜
--  发布时间:2014/7/6 15:19:00
--  

 不理解你什么意思,窗口最小化以后,就在屏幕的左下角啊。

 

 如果要把窗口显示在任务栏里面,就用2楼的方法。


--  作者:aalons
--  发布时间:2014/7/6 15:23:00
--  
现在点击窗口1上的按钮出现窗口2的同时,主界面会被隐藏。打开主界面的话窗口2又被隐藏??????


--  作者:有点甜
--  发布时间:2014/7/6 15:29:00
--  

 窗口1,按钮代码,去掉 e.Form.BaseForm.Hide

 

 窗口2,AfterLoad代码加入 e.Form.baseform.Topmost = True