Foxtable(狐表)用户栏目专家坐堂 → 怎样才能修改窗口标题?


  共有15745人关注过本帖树形打印复制链接

主题:怎样才能修改窗口标题?

帅哥哟,离线,有人找我吗?
reachtone
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:版主 帖子:1993 积分:19409 威望:0 精华:20 注册:2008/9/2 10:09:00
怎样才能修改窗口标题?  发帖心情 Post By:2009/7/30 13:58:00 [只看该作者]

我做了一个窗口,打开时会根据当前表的列名称不同、而绑定不同的查询表。
请教,怎样才能修改窗口的标题?我的意思是想将窗口标题动态的显示与当前列相关联的信息。
帮助中没有找到Form的Name属性,不知怎样才能动态修改。

 回到顶部
帅哥哟,离线,有人找我吗?
HLJ
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:71 积分:703 威望:0 精华:0 注册:2009/7/4 13:56:00
  发帖心情 Post By:2009/7/30 14:07:00 [只看该作者]

forms("A").text ="myname"

 回到顶部
美女呀,离线,留言给我吧!
yangming
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/7/30 14:53:00 [只看该作者]

首先要打开窗口才能改标题
Forms("窗口2").Show()
Forms("窗口2").text ="my"


 回到顶部
帅哥哟,离线,有人找我吗?
reachtone
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:版主 帖子:1993 积分:19409 威望:0 精华:20 注册:2008/9/2 10:09:00
  发帖心情 Post By:2009/7/30 15:06:00 [只看该作者]

问题解决,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
youngds
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:23 积分:409 威望:0 精华:0 注册:2011/4/29 17:00:00
  发帖心情 Post By:2012/11/24 10:14:00 [只看该作者]

我现在也碰到这个问题,而且像楼上说的:

Forms("窗口2").Show()
Forms("窗口2").text ="my"

窗口的标题还是没有变


 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/11/24 10:18:00 [只看该作者]

以下是引用youngds在2012-11-24 10:14:00的发言:

我现在也碰到这个问题,而且像楼上说的:

Forms("窗口2").Show()
Forms("窗口2").text ="my"

窗口的标题还是没有变


经测试,有效的,无效的话,请上传例子。

 回到顶部
帅哥哟,离线,有人找我吗?
youngds
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:23 积分:409 威望:0 精华:0 注册:2011/4/29 17:00:00
  发帖心情 Post By:2012/11/24 11:13:00 [只看该作者]

我终于知道原因了,如果窗口类型选择为“独立”,则上述代码运行是正常的;如果窗口类型选择为“模态”,则在窗口被关闭之前,Show()后面的代码都将不被执行,因此也就看不到窗口的标题被改变的效果了。

 回到顶部
帅哥哟,离线,有人找我吗?
迷狐
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:228 积分:2060 威望:0 精华:1 注册:2012/5/24 16:00:00
  发帖心情 Post By:2012/11/24 15:28:00 [只看该作者]

在窗口AfterLoad事件:

e.Form.text=  "my"

如还想将窗口标题动态的显示与当前行相关联的信息
则在表PositionChanged事件
If  forms("窗口").Opened  Then
    forms("窗口").text= e.Table.Current("产品图号") 
End If
[此贴子已经被作者于2012-11-24 15:39:15编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/11/24 15:30:00 [只看该作者]

以下是引用迷狐在2012-11-24 15:28:00的发言:

在窗口AfterLoad事件:

e.Form.text=  "my"

嗯嗯,或者,用全局变量赋值。

e.Form.Text = 全局变量

 回到顶部