有谁知道，请给个明示

[zhjame]

我只能将toolbar放在表单集里，有谁能想办法把它放在foxpro的屏幕上

config.fpw
screen=on
title=公司名称

[zhjame]

对了，是运行时刻！

[newfang]

hehe ...明天再说，今天要GO HOME了。。。

[newfang]

你把那些代码放在主程序里，不要放在表单的事件里试试…………！

[zhjame]

当然，我本来就放在主程序中的部分代码如下：
clear all
close all
set alter off
set cent on
set talk off
set sysmenu to
set safe off
_screen.visible=.f.
_screen.caption="..."
_screen.windowstate=2
_screen.backcolor=iif(oldcolor<=0,rgb(255,255,255),oldcolor())
_screen.picture=(oldpicture)

if islogin
do form login name ologin linked
endif

if isshowuser
do form userlogin name ouserlogin linked
endif

do mymenus.mpr

on shutdown mainquit()

read events

function mainquit()
if messagebox("are you sure Quit "+gscaption+"system?",4+16+256,"message")#6
return
else
clear events
quit
endif
endfunc

[newfang]

不知道你的toolbar是不是指工具栏；
你上面的代码里好象没有运行toolbar的…… ……
你这样试试看行不……（可能不完全，你自己根据情况在补充吧！）
_screen.application.tbrtools=createobject('mytoolbar') &&创建工具条
_screen.application.tbrtools.dock(0) &&放置在屏幕顶端
_screen.application.tbrtools.Show &&显示工具条

^_^ ,没有试过……

[zhjame]

谢谢你了，我已经找到解决的办法，
otoolsbar=newobject("toolbar1","publicclass")
otoolsbar.dock(0)
otoolsbar.visible=.t.
但最主要的不在此，而是VFP加了几个属性，desktop,windowstate,winsytle
用错了就不行。