以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口设计求助  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=106111)

--  作者:998168
--  发布时间:2017/9/2 11:20:00
--  窗口设计求助
如下图,如何在红色区域放入一个窗口,使之它始终在红色区域内是最大化的,其它窗口切换到该红区时也是在它内最大化的!
红区和黄区这两个整体在不同显示器上也始终是满屏的样式。


图片点击可在新窗口打开查看此主题相关图片如下:1504321983(1).png
图片点击可在新窗口打开查看


--  作者:有点蓝
--  发布时间:2017/9/2 11:25:00
--  
内嵌窗口用法参考:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=86188


--  作者:998168
--  发布时间:2017/9/6 23:43:00
--  回复:(有点蓝)内嵌窗口用法参考:http://www.foxta...
有点蓝老师,你好!此法打开的内嵌窗口没有最大化,最小化控制框,如何保留窗口自带的大小化和关闭控制框显示出来呢?
[此贴子已经被作者于2017/9/6 23:44:09编辑过]

--  作者:有点甜
--  发布时间:2017/9/7 9:07:00
--  

参考

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=16371&skin=0

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table

下载信息  [文件大小:308.0 KB  下载次数:6]
图片点击可在新窗口打开查看点击浏览该文件:嵌入exe程序到自己的窗口.table


--  作者:998168
--  发布时间:2017/9/14 12:37:00
--  管理项目1
如何在管理项目1打开的内嵌窗口默认在父窗体中为最大化?
用这句代码Forms("窗口1").BaseForm.windowstate = 2,出现下图红圈内重复显示的问题,如何解决?:

图片点击可在新窗口打开查看此主题相关图片如下:如何默认内嵌窗口最大化到父窗体.jpg
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2017/9/14 14:27:00
--  
 请上传具体foxtable例子说明你的问题。
--  作者:998168
--  发布时间:2017/9/14 17:01:00
--  
你好,不知什么原因,无法上传实例文件,就是上面的管理项目1,把窗口2的afterload事件代码改为以下:

e.form.baseform.IsMdiContainer = True
e.Form.baseform.TopMost = True
e.Form.panel.Dock = 0
e.Form.panel.width = 300
e.Form.panel.height = 300

Forms("窗口1").open
Forms("窗口1").baseform.MdiParent = e.Form.baseform
Forms("窗口1").BaseForm.windowstate = 2 \' 让窗口1在窗口2中最大化模式

然后应用窗口2浏览就可以看到我上面的异常显示图片的圆圈的部分显示异常情况了!
[此贴子已经被作者于2017/9/14 17:02:28编辑过]

--  作者:有点甜
--  发布时间:2017/9/14 18:21:00
--  

1、把代码写在按钮上执行没问题。

 

2、如果要在afterload执行,执行前,先显示窗口

 

e.form.baseform.IsMdiContainer = True
e.Form.baseform.TopMost = True
e.Form.panel.Dock = 0
e.Form.panel.Top = 20
e.Form.panel.width = 300
e.Form.panel.height = 300
e.Form.baseform.visible = True
Forms("窗口1").open(-1000,-1000)
Forms("窗口1").baseform.MdiParent = e.Form.baseform
Forms("窗口1").BaseForm.windowstate = 2 \' 让窗口1在窗口2中最大化模式

3、你也可以把代码写到timertick事件,在窗口显示出来以后,再把窗口1添加进去。


--  作者:998168
--  发布时间:2017/9/15 4:54:00
--  
如何打开狐表直接显示窗口2,但不要再显示狐表本身的程序界面呢?(就是说不再需要程序界面出现)
--  作者:有点甜
--  发布时间:2017/9/15 8:50:00
--  
以下是引用998168在2017/9/15 4:54:00的发言:
如何打开狐表直接显示窗口2,但不要再显示狐表本身的程序界面呢?(就是说不再需要程序界面出现)

 

1、窗口2改成模式窗口

 

2、AfterOpenProject事件写代码

 

Forms("窗口2").Show

basemainform.Close