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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → 缩放的问题

   

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

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

主题：缩放的问题
帅哥哟，离线，有人找我吗？
kenan168
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游侠 帖子：347 积分：0 威望：0 精华：0 注册：2013/12/3 10:29:18 		缩放的问题  发帖心情 Post By：2014/8/3 15:30:09 [只看该作者]

如何通过vba，设定画面K的缩放？  比如一个画面一显示 60根  K线自动缩放适应只显示60根 ？  感谢老师

 回到顶部
帅哥哟，离线，有人找我吗？
王锋
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

Grid对象

 

ShowCount        窗格显示数据量，可与Grid.StartShowIndex配合可以实现画面平移，可读写

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

金字塔-技术部

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

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

Email:service@weistock.com
 回到顶部
帅哥哟，离线，有人找我吗？
kenan168
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游侠 帖子：347 积分：0 威望：0 精华：0 注册：2013/12/3 10:29:18 		疑问  发帖心情 Post By：2014/8/3 20:43:23 [只看该作者]



图片点击可在新窗口打开查看此主题相关图片如下：1.jpg
图片点击可在新窗口打开查看

1 ,在全屏的时候， 为何没办法全部全屏？  下方还有空隙在？ 


2, 如何通过VBA控制软件的全屏显示 ？ 不是指  shift + U       感谢

3.  如何通过VBA 向金字塔发出键盘信号？    比如 shift + A 组合键



感谢老师
[此贴子已经被作者于2014/8/3 20:44:28编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
王锋
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

1,系统就是这么设计的，空隙一般给坐标用，防止文字的一半被遮住，这个无法更改。

2，全屏命令可以使用给菜单发消息来实现 ，参考 http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=8749&page=1&star=1

3，这个功能目前还有待完善，请等待日后的新版

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

金字塔-技术部

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

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

Email:service@weistock.com
 回到顶部
帅哥哟，离线，有人找我吗？
kenan168
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游侠 帖子：347 积分：0 威望：0 精华：0 注册：2013/12/3 10:29:18 		感谢回复  发帖心情 Post By：2014/8/5 8:29:26 [只看该作者]


感谢您的回复

但在全屏的时候 一直出现  退出窗口， 每次都要去关闭  如何能不显示这个窗口 ？


图片点击可在新窗口打开查看此主题相关图片如下：1.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2014/8/5 8:29:47编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
kenan168
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游侠 帖子：347 积分：0 威望：0 精华：0 注册：2013/12/3 10:29:18 		问题2  发帖心情 Post By：2014/8/5 8:37:10 [只看该作者]

这里标题保存后  重新打开  还是没有保存进来？   比如设定  颜色与0  对比
图片点击可在新窗口打开查看此主题相关图片如下：12.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
kenan168
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游侠 帖子：347 积分：0 威望：0 精华：0 注册：2013/12/3 10:29:18 		回复  发帖心情 Post By：2014/8/5 13:16:44 [只看该作者]


1,系统就是这么设计的，空隙一般给坐标用，防止文字的一半被遮住，这个无法更改。

可是我看了之前的版本好像是全屏显示的，会不会是我配置的问题？
 回到顶部
帅哥哟，离线，有人找我吗？
王锋
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

快捷键VBA代码

 

sub TEST()
Dim WshShellSet
Set WshShell = CreateObject("WScript.Shell")
WshShell.AppActivate Application.TitleText
WshShell.SendKeys "+u"

END SUB

 

参考资料

 

.特殊功能键
对于需要与Shift、Ctrl、Alt三个控制键组合的按键SendKeys使用特殊字符来表示:
特殊控制键 特殊字符
Shift +
Ctrl ^
Alt %
如要发送的组合按键是同时按下Ctrl+E,需要用" WshShell.SendKeys "^e" "表示,



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

金字塔-技术部

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

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

Email:service@weistock.com
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.15625 秒, 5 次数据查询