- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]我有一个窗口。需要悬浮置顶，单点击窗口的时候又不会改变主窗口的顺序 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=146580)
-- 发布时间：2020/2/26 22:58:00
-- [求助]我有一个窗口。需要悬浮置顶，单点击窗口的时候又不会改变主窗口的顺序
[求助]我有一个窗口。需要悬浮置顶，单点击窗口的时候又不会改变主窗口的顺序让他调到最顶层（类似于有悬浮球的千牛、360等），该怎么做？
-- 发布时间：2020/2/27 1:28:00
--
1 把该窗口类型设置为独立
2 把最顶层设置为 true
此主题相关图片如下：搜狗截图20200227012645.png
-- 发布时间：2020/2/27 2:45:00
--
这种只要点击窗口就会把主窗口也一起显示最上面。没达到点击窗口不会显示出来的效果
-- 发布时间：2020/2/27 8:53:00
--
独立窗口，这样打开
Forms("窗口1").show
Forms("窗口1").baseform.hide
Forms("窗口1").baseform.show(Nothing)
Forms("窗口1").baseform.owner = Nothing
Forms("窗口1").baseform.showintaskbar = True
-- 发布时间：2020/2/27 12:10:00
--
你是说只显示悬浮窗口,不显示主窗口?
-- 发布时间：2020/2/27 21:48:00
--
可以，就是这样，不过好像不能加在打开窗口时的代码里
-- 发布时间：2020/2/28 6:13:00
--
mark
-- 发布时间：2020/2/28 8:35:00
--
或者这样
Dim f As WinForm.Form = Forms("窗口1")
f.show
f.Baseform.parent = Nothing
f.Baseform.Owner = Nothing
-- 发布时间：2020/2/29 1:05:00
--
我就是要这样的，但有个新问题
我需要打印东西，一打印就弹出主窗口，我用异步函数执行也一样，该怎么弄才不会弹出主窗口呢？Dim doc As New PrintDoc \'定义一个报表
doc.PageSetting.Width = 100 \'纸张宽度为100毫米
doc.PageSetting.Height = 180 \'纸张高度为120毫米
Dim rt As New prt.RenderTable() \'定义一个表格对象
........
Doc.Print() \'预览报表
-- 发布时间：2020/2/29 8:51:00
--
这个目前没有办法