以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]打印预览窗口怎样在最顶层  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=130884)

--  作者:天一生水
--  发布时间:2019/2/10 13:00:00
--  [求助]打印预览窗口怎样在最顶层
老师好!

窗口按钮打开“打印预览”,被其他窗口挡住,怎样设置?

......
doc.Preview


--  作者:有点甜
--  发布时间:2019/2/10 13:43:00
--  

 

不会有这种情况吧?具体实例发上来测试。

 

 


--  作者:天一生水
--  发布时间:2019/2/13 21:38:00
--  
老师好!
做了个实例,存在2个问题:
1、打印预览窗口不在最顶层;
2、发布的项目图标不是设置的图标。

图片点击可在新窗口打开查看此主题相关图片如下:截屏图片.jpg
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:11.jpg
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:12.jpg
图片点击可在新窗口打开查看





--  作者:天一生水
--  发布时间:2019/2/13 21:39:00
--  
实例:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试预览与发布.rar



--  作者:有点甜
--  发布时间:2019/2/13 23:06:00
--  

    e.Form.baseform.Topmost = False

 

‘打印代码

 

    e.Form.baseform.Topmost = True


--  作者:天一生水
--  发布时间:2019/2/14 11:13:00
--  

谢谢甜老师!

第一个问题解决了。

第二个发布后的图标是什么原因呢?

 

 

主窗口AfterOpenProject

basemainform.icon = new icon(projectPath & "temp.ico")   \'主窗口图标
basemainform.Visible = True

basemainform.windowstate = 0
basemainform.width=0
basemainform.height=0
basemainform.left=-1000
basemainform.visible = False

basemainform.ShowInTaskBar = False    \'任务栏不显示主程序窗口图标

Forms("主窗口").show()

 

------------------------

主窗口的AfterLoad事件 

e.Form.BaseForm.ShowInTaskBar = True


--  作者:有点甜
--  发布时间:2019/2/14 11:47:00
--  
以下是引用天一生水在2019/2/14 11:13:00的发言:

 

第二个发布后的图标是什么原因呢?

 

 

1、发布后,你要打开运行【可执行文件名.exe】;

 

2、发布前,你要设置你自己的窗口->外观->图标,设置成你自己的图片


--  作者:天一生水
--  发布时间:2019/2/14 18:13:00
--  
例子也是按照这2点做的,但是还是不行。
--  作者:有点甜
--  发布时间:2019/2/14 18:19:00
--  

 

发布的时候,你设置【图标】了没有?请设置一个图标。

 


--  作者:天一生水
--  发布时间:2019/2/14 19:21:00
--  
谢谢甜老师!
终于可以了,这个程序图标要放在Images目录下。
原来发布时放在项目目录下,不行。

图片点击可在新窗口打开查看此主题相关图片如下:111.jpg
图片点击可在新窗口打开查看