登录系统时只显示主表单，而不同时显示foxpro主窗口，如何做？

[toerdo]

是在主程序里设置吗？如何设置？

[fj_jiangqi]

set sysmenu off
主表单可以设置为1模式。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[toerdo]

登录表单后面还是有foxpro主窗口啊，我的主程序如下：
set sysmenu off

path1=sys(5)+sys(2003)
path2=path1+'\sj'
path3=path1+'\forms'
path4=path1+'\bb'

Set Defa to &path1
Set Path to &path1;&path2;&path3;&path5;&path4
public a1,a2,y1,y2,y3

*登录表单
do form dl
read event

[fj_jiangqi]

把表单d1的WindowType设置为1，把read event去掉，就行了。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[toerdo]

还是不行，登录表单后面还是有窗口名为Microsoft visual forpro的主窗口，我已经把dl表单的WindowType设置为1，把主程序里的read event去掉了，然后在dl表单的active里加了一句read events

[fj_jiangqi]

WindowType设置为1就不用read event这个了。
你是不是要把主窗口隐藏掉。
在do form d1之前加上
_screen.Visible=.f.
在d1表表单中Desktop设置为.t.
这样试试看。
--------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[toerdo]

还是不行，因为有了_screen.Visible=.f.这句程序的话运行的时候系统一闪就不见了。

[fj_jiangqi]

表单d1
WindowType=0
Desktop=.t.
unload加上
clear event
主程序
do form d1 name d1
_screen.Visible=.f.
d1.Visible=.t. && 这个可能可以不要，如果不要的话，上面那句的name d1也可以不要。
read event
--------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[toerdo]

我照你那样做了，这回主窗口终于不显示了，但是我的dl表单里的一个按钮代码是do form main的，点击之后main不显示。为什么？

[fj_jiangqi]

你要不要显示主窗口，不知现在你要实现什么？
_screen.Visible=.f. &&是隐藏主窗口
主窗口被隐藏了，它所包含的表单全看不见。
--------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[toerdo]

我只要显示我的表单，而不要主窗口，比如我首先进入的是dl表单，然后点击dl表单里的其他按钮可以打开其他表单，请问能实现吗？

[FrancisW]

呵呵，很简单的，这个问题我半年前问过一次，而且很早就解决了：
按照我说的来做吧：在主程序里面写：
“
application.visible=.f.
read events
do form main
”
然后记得双击main并在main的distory那里或者退出的按钮那里写代码“clear events”
就可以了^_^

[fj_jiangqi]

不显示主窗口，可以运行_screen.Visible=.f.
还要显示其它窗口，那么其它窗口的Desktop=.t.
--------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[FrancisW]

另外_screen.visible=.f.
等价于application.visible=.f.
这个也可以再config文件里面设定，但有主程序的情况下在下还是倾向于用
application.visible=.f.
呵呵

[frankizhong]

把表单属性设为顶层表单,在主表单的Load事件中加上:Application.Visible=.F.