TC2.0热键设置实例(图)

Soy_meng

看到论坛上好像有很多人不懂得怎么设置热键,下面就来做个热键获取当前鼠标所在的窗口标题等信息的例子。(注：当前的TC版本中F12键及HOME等功能区键不能设为热键)
一、界面：




下面是重要的热键设置：


完成后注册热键函数：



下面是代码(代码实现就不做解释了)：

1. 空间 热键实例
   
2. 
   
3. 功能 热键函数()
   
4.         窗口句柄
   
5.         x,y
   
6.         大小
   
7.         窗口句柄 = 窗口.鼠标所在窗口句柄()
   
8.         
   
9.         如果(窗口句柄 == 0)
   
10.                 辅助.消息框("没找到窗口！")
    
11.         否则
    
12.                 编辑框.设置文本("句柄",转换.整型转字符型(窗口句柄))
    
13.                 编辑框.设置文本("标题",窗口.得到标题(窗口句柄))
    
14.                 编辑框.设置文本("类名",窗口.类名(窗口句柄))
    
15.                 窗口.获取大小(窗口句柄,x,y)
    
16.                 大小 = 字符串.连接(字符串.连接(x,","),y)
    
17.                 编辑框.设置文本("大小",大小)
    
18.         如果结束
    
19. 返回 真
    
20. 功能结束
    
21. 
    
22. 功能 开始_点击()
    
23.         热键实例.热键函数()
    
24. 返回 真
    
25. 
    
26. 功能结束
    
27. 
    
28. 功能 退出_点击()
    
29. 
    
30. 辅助.退出()
    
31. 
    
32. 返回 真
    
33. 功能结束
    
34. 
    
35. 
    
36. 功能 热键0_热键()
    
37.         热键实例.热键函数()
    
38. 返回 真
    
39. 功能结束
    
40. 
    
41. 空间结束
    

复制代码

OK,编译运行。

二、有人觉得热键摆在界面上很碍眼,没关系,TC可以让它在界面初始化的时候隐藏起来。
如图,添加初始化函数：




代码如下：

1. 功能 初始化()
   
2. 控件.可见("热键0",假)
   
3. 返回 真
   
4. 功能结束

复制代码

编译运行,看不见了吧。


三、还有人说,如果我想让用户自己定义快捷键怎么办？在TC中实现也很简单。

打开界面,设置热键的属性



然后写下下面的代码：

1. 功能  热键0_失去焦点()
   
2.         //这里要注意一下,如果不销毁,那么以前所设置的热键还是存在的
   
3.         热键.销毁("热键0")
   
4.         热键.注册("热键0")
   
5. 返回 真
   
6. 功能结束

复制代码

当然,这个时候应该让热键这个控件显示出来。把这里注释掉。

1. 功能 初始化()
   
2.         //控件.可见("热键0",假)
   
3. 返回 真
   
4. 功能结束

复制代码

编译运行。你是否成功了？

TC管理员

不错。  支持下，感谢分享。

saemy

学习学习！

cttao_ifamily

弱弱的问一下，你的属性面板，跟我的不一样啊，能+我QQ，教我一下吗？:t(  QQ：1569876181

Soy_meng

回复 4楼cttao_ifamily的帖子

我是TC2.0的

zxyc2000

:strong:给力，很全面。代码很简洁。

↘夢想飛舞√

:strong:

布衣混混

签到帖子   回帖奖励5威望和5金币  系统自己奖励 请勿重复签到z

章昊

感谢分享 很好很给力

VIP

回复 9楼章昊的帖子

2。0热键为什么弄得这么复杂，象1。0热键，在界面上就设置暂和停止，不是更方便吗