以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何让 windows 任务栏图标隐藏  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=75602)
--  作者：ljh29206
--  发布时间：2015/10/11 9:55:00
--  如何让 windows 任务栏图标隐藏

老师  像  foxmail 一样

我不想再 任务栏了显示 系统图标，就在右端的 位置见一个 小图标 通过双击  开启 隐藏 ， 这个 代码是怎么样的呢

开发编译好的系统。

主要显示窗体是 模式窗体 ，  右端的 小图标 已经建好 可以 双击 最大最小化，

就是不知道 如何 让 任务栏的图标 消失？？？
--  作者：大红袍
--  发布时间：2015/10/11 12:26:00
--  

AfterLoad事件加入代码

 

e.Form.BaseForm.ShowInTaskBar = False
--  作者：ljh29206
--  发布时间：2015/10/12 11:35:00
--  

老师 我用

 

If  Forms("mainform").baseform.windowstate = 1 Then
Forms("mainform").baseform.windowstate = 0

else

 

Forms("mainform").baseform.windowstate = 1

end if

 

进行最大最小化

 

 

现在最小化的时候 窗体 会在左下角 有个最小化窗口

 

能否 让  窗体最小化的时候 完全看不见？？
--  作者：大红袍
--  发布时间：2015/10/12 11:50:00
--  

只要foxtable主窗口没有显示出来，就不会有你这个情况。
--  作者：ljh29206
--  发布时间：2015/10/12 15:13:00
--  

老师

 

在 afterload

 

加载了  小框框！

 

baseMainform.visible=false

 

也没效。

 

还是最小化到左下角


图片点击可在新窗口打开查看此主题相关图片如下：无标题.jpg
图片点击可在新窗口打开查看
--  作者：大红袍
--  发布时间：2015/10/12 15:16:00
--  

这样，就只能改成隐藏代替吧。

 

Forms().Visilbe = False
--  作者：ljh29206
--  发布时间：2015/10/12 15:30:00
--  

测试过 也不行的！

 
--  作者：大红袍
--  发布时间：2015/10/12 15:36:00
--  

这样写

 

e.form.baseform.visible = False

 

或者

 

e.form.baseform.hide
--  作者：ljh29206
--  发布时间：2015/10/12 17:07:00
--  

老师 我测试过

 

用

 

if forms（"A").baseform.visible = False then

forms（"A").baseform.visible = true

else

forms（"A").baseform.visible = False

end if

 

第一次进行 主界面会跳出来

 

加上

 

if forms（"A").baseform.visible = False then

baseMainform.visible=false

forms（"A").baseform.visible = true

else

baseMainform.visible=false

forms（"A").baseform.visible = False

end if

或者 在项目加载时就

baseMainform.visible=false

也没有用

 

用 hide 判断

forms（"A").baseform.hide = true

提示表达式不产生值，测试不到
--  作者：大红袍
--  发布时间：2015/10/12 17:11:00
--  

多做一个模式窗口，打开项目就open，然后在其afterLoad事件里，把窗口A打开。以防止出现主窗口。