欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → [求助]跨窗格输出字符串,无效?

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


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

主题:[求助]跨窗格输出字符串,无效?

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


加好友 发短信
等级:论坛游民 帖子:253 积分:1742 威望:0 精华:0 注册:2010/8/12 13:04:52
[求助]跨窗格输出字符串,无效?  发帖心情 Post By:2011/10/11 14:13:11 [只看该作者]

我在框架LZZ003中窗格WINDOW3中公式YCXT中调用自定义函数outmsgwin7:达到在窗格window7中输出字符串。

但测试后,在window7窗格中始终空白

求老大帮助。

 

Function outmsgwin7(Formula,msno)
    'Application.ActivateFrame("LZZ003")
    Set Grid = LZZ003.GetGridByName("Window7")
    CALL Grid.DRAWTEXT(2,1,"TESTT**************************************************")
    CALL Grid.DRAWTEXT(3,0.5,"TESTT**************************************************")
    outmsgwin7=0

End Function


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


加好友 发短信
等级:黑侠 帖子:676 积分:2548 威望:0 精华:3 注册:2011/4/13 16:18:50
  发帖心情 Post By:2011/10/11 14:26:56 [只看该作者]

问题正在解决中

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


加好友 发短信
等级:黑侠 帖子:676 积分:2548 威望:0 精华:3 注册:2011/4/13 16:18:50
  发帖心情 Post By:2011/10/11 15:41:12 [只看该作者]

你写的文本颜色是黑色的,和背景相同,所以显示看不出效果,要么换了背景颜色,要么换一下字体的颜色。


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


加好友 发短信
等级:蜘蛛侠 帖子:1366 积分:5210 威望:0 精华:7 注册:2010/12/11 18:00:33
  发帖心情 Post By:2011/10/11 20:44:01 [只看该作者]

不能在自定义函数中传递字符串,可以通过全局变量来解决你的问题,方法是:公式中使用extgbstringset()函数给全局变量赋值,自定义函数中用document.getextstring()读取字符串的值。

 


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


加好友 发短信
等级:论坛游民 帖子:253 积分:1742 威望:0 精华:0 注册:2010/8/12 13:04:52
  发帖心情 Post By:2011/10/12 8:22:03 [只看该作者]

我试了一下系统的示范程序:原来代码如下

' 得到框架名称为"Technic",窗格名称为"Main"的窗格对象

Set Grid = Technic.GetGridByName("Main")

'在开始坐标10,100,结束坐标10,100位置绘制椭圆

Grid.DrawEllipse 10,10,100,100,255

'显示窗格内的公式个数

Count = Grid.FormulaCount

MsgBox Count

 

 

改成,不是跨窗格的,就在Technic框架下的Window11窗格:

' 得到框架名称为"Technic",窗格名称为"Main"的窗格对象

Set Grid = Technic.GetGridByName("Window11")

'在开始坐标10,100,结束坐标10,100位置绘制椭圆

Grid.DrawEllipse 10,10,100,100,255

Grid.DrawText   1,1,"23424444444444444444444444444444444444444"

Grid.DrawText   10,2,"23424444444444444444444444444444444444444",1

Grid.DrawText   100,1.5,"23424444444444444444444444444444444444444",2

'显示窗格内的公式个数

 

结果:椭圆一闪而灭,文字始终不见

 


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


加好友 发短信
等级:黑侠 帖子:676 积分:2548 威望:0 精华:3 注册:2011/4/13 16:18:50
  发帖心情 Post By:2011/10/12 8:32:26 [只看该作者]

你试没试改了背景色后,还是看不见字体吗。我试过,椭圆一闪而过,字体看不见就是因为字体是黑色显示的。


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


加好友 发短信
等级:罗宾汉 帖子:11808 积分:20695 威望:0 精华:10 注册:2009/8/18 8:15:13
  发帖心情 Post By:2011/10/12 10:22:05 [只看该作者]



金字塔—专业程序化软件提供商

金字塔-技术部

-----------------------------------------------------------------------------------------------------

工作时间:周一至周五 08:30 - 17:30   周末及法定节假日休息

Email:service@weistock.com
 回到顶部