[08.09.18更新]RM托盘程序V1.04（更加灵活的设置）

雷欧纳德

咳咳。。。RM 托盘程序。。。= = 以前ms很多人想要这个东西``{/gg}{/gg}

不介绍了

1.04最新版下载
更新全RGSS设置，包括各种信息，处理，自定义选项等。使用说明参考注释。

1. unless defined? RM_Tray
   
2. #==========================================================================
   
3. # ■ RM_Tray v1.04
   
4. #--------------------------------------------------------------------------
   
5. # 　RM窗口托盘模块。
   
6. #==========================================================================
   
7. module RM_Tray
   
8. 
   
9.   #--------------------------------------------------------------------------
   
10.   # ● 定义常量
    
11.   #--------------------------------------------------------------------------
    
12.   NIIF_INFO       = 0x00000001  # 气球普通提示
    
13.   NIIF_WARNING    = 0x00000002  # 气球警告提示
    
14.   NIIF_ERROR      = 0x00000003  # 气球错误提示
    
15.   
    
16.   DEFAULT_TIP       = "RM Tray is Running! - -bb" # 鼠标经过托盘时的提示信息
    
17.   DEFALUT_INFO      = "RM 游戏开始运行 - -bbb ！" # 游戏开始的时候提示信息内容
    
18.   DEFAULT_INFOTITLE = "Hi"                        # 游戏开始的时候提示信息标题
    
19.   
    
20.   # PS: 不提示，把信息设置为 nil 即可。
    
21.   
    
22.   #--------------------------------------------------------------------------
    
23.   # ● API声明
    
24.   #--------------------------------------------------------------------------
    
25.   ADD_TRAY        = Win32API.new("RMTray","_add_tray","ppp","v")
    
26.   MODIFY_TIP      = Win32API.new("RMTray","_modify_tip","p","v")
    
27.   SUPPORT_BALLOON = Win32API.new("RMTray","_support_balloon","v","i")
    
28.   SHOW_BALLOON    = Win32API.new("RMTray","_show_balloon","ppil","v")
    
29.   REMOVE_TRAY     = Win32API.new("RMTray","_remove_tray","v","v")
    
30.   API_REGISTER    = Win32API.new("RMTray","_register", "lipp", "i")
    
31.   
    
32.   API_RESTORE     = Win32API.new("RMTray","_restore_window","v","v")
    
33.   
    
34.   #--------------------------------------------------------------------------
    
35.   # ● 功能函数01: 查找窗口
    
36.   #--------------------------------------------------------------------------
    
37.   def self.findWindow
    
38.     Win32API.new("user32","FindWindow","pp","i").call("RGSS Player",readIni)
    
39.   end
    
40.   
    
41.   #--------------------------------------------------------------------------
    
42.   # ● 功能函数02：读取Ini文件
    
43.   #--------------------------------------------------------------------------
    
44.   def self.readIni(item = "Title")
    
45.     buf = 0.chr * 256
    
46.     gpps = Win32API.new("kernel32","GetPrivateProfileString","pppplp","l")
    
47.     gpps.call("Game",item,"",buf,256,"./Game.ini")
    
48.     buf.delete!("\0")
    
49.     return buf
    
50.   end
    
51.   
    
52.   #--------------------------------------------------------------------------
    
53.   # ● 定义常量：窗口句柄
    
54.   #--------------------------------------------------------------------------
    
55.   HWND = findWindow
    
56.   
    
57.   #--------------------------------------------------------------------------
    
58.   # ● 特殊方法：窗口转向后台时的提示信息
    
59.   #--------------------------------------------------------------------------
    
60.   def self.hide_window_info
    
61.     self.show_balloon("提示", "最小化到后台运行", 10000, NIIF_INFO)
    
62.   end
    
63.   
    
64.   #--------------------------------------------------------------------------
    
65.   # ● 托盘操作方法：加载托盘
    
66.   #--------------------------------------------------------------------------
    
67.   def self.add_tray(tip = DEFAULT_TIP, info = DEFALUT_INFO, title = DEFAULT_INFOTITLE)
    
68.     ADD_TRAY.call tip, info, title
    
69.   end
    
70.   
    
71.   #--------------------------------------------------------------------------
    
72.   # ● 托盘操作方法：修改鼠标经过的提示信息
    
73.   #--------------------------------------------------------------------------
    
74.   def self.modify_tip(str)
    
75.     MODIFY_TIP.call(str)
    
76.   end
    
77.   
    
78.   #--------------------------------------------------------------------------
    
79.   # ● 托盘操作方法：检查是否支持气球提示
    
80.   #--------------------------------------------------------------------------
    
81.   def self.support_balloon?
    
82.     return SUPPORT_BALLOON.call != 0
    
83.   end
    
84.   
    
85.   #--------------------------------------------------------------------------
    
86.   # ● 托盘操作方法：显示气球提示
    
87.   #--------------------------------------------------------------------------
    
88.   def self.show_balloon(title,str,timeout = 10000,flags = NIIF_INFO)
    
89.     SHOW_BALLOON.call(title,str,timeout,flags) if support_balloon?
    
90.   end
    
91.   
    
92.   #--------------------------------------------------------------------------
    
93.   # ● 托盘操作方法：移除托盘
    
94.   #--------------------------------------------------------------------------
    
95.   def self.remove_tray
    
96.     REMOVE_TRAY.call
    
97.   end
    
98.   
    
99.   #--------------------------------------------------------------------------
    
100.   # ● 回调方法：RM_Tray.restore
     
101.   #--------------------------------------------------------------------------
     
102.   def self.restore
     
103.     p "restore"
     
104.     API_RESTORE.call
     
105.   end
     
106.   
     
107.   #--------------------------------------------------------------------------
     
108.   # ● 回调方法：RM_Tray.about
     
109.   #--------------------------------------------------------------------------
     
110.   def self.about
     
111.     p "about"
     
112.     Win32API.new("user32", "MessageBox", "lppi", "i").call      0,
     
113.       "RMTray V1.04 ! - -bb from 66RPG!",
     
114.       "hi",
     
115.       0x00000040
     
116.   end
     
117.   
     
118.   #--------------------------------------------------------------------------
     
119.   # ● 回调方法：RM_Tray.gotobbs
     
120.   #--------------------------------------------------------------------------
     
121.   def self.gotobbs
     
122.     p "gotobbs"
     
123.     Win32API.new("shell32", "ShellExecute", "lppppi", "l").call      0, nil, "http://rpg.blue/bbs", nil, nil, 1
     
124.   end
     
125.   
     
126.   #--------------------------------------------------------------------------
     
127.   # ● 回调方法：RM_Tray.exit
     
128.   #--------------------------------------------------------------------------
     
129.   def self.exit
     
130.     p "exit"
     
131.     Win32API.new("user32","DestroyWindow", "l", "i").call HWND
     
132.   end
     
133.   
     
134. =begin
     
135. 
     
136.   关于 RM_Tray.register 方法。
     
137.   
     
138.       该方法用于给托盘的弹出菜单注册菜单项，每一项为包含4个元素的数组，
     
139.   其中第一个参数用于指定菜单项的风格；
     
140.      MF_STRING    - 字符串
     
141.      MF_GRAYED    - 灰色(无效)化
     
142.      MF_SEPARATOR - 分割线
     
143.   第二个参数用于指定一个菜单项的ID号；
     
144.   第三个参数用于指定对应的字符串，如果MF_SEPARATOR的情况传递nil；
     
145.   第四个参数指定一个“可执行”的字符串。
     
146.   
     
147. =end
     
148. 
     
149.   #--------------------------------------------------------------------------
     
150.   # ● 设置菜单项状态用API：MF_ENABLED、MF_DISABLED、MF_GRAYED 三个状态
     
151.   #--------------------------------------------------------------------------
     
152.   API_SETITEMSTATE  = Win32API.new("RMTray", "_set_item_state", "ii", "v")
     
153. 
     
154.   MF_ENABLED    = 0x00000000
     
155.   MF_DISABLED   = 0x00000002
     
156.   
     
157.   MF_GRAYED     = 0x00000001
     
158.   
     
159.   MF_STRING     = 0x00000000
     
160.   MF_SEPARATOR  = 0x00000800
     
161.   
     
162.   def self.register
     
163.     [
     
164.     [MF_STRING | MF_GRAYED, 0, "还原(&R)", "RM_Tray.restore"],
     
165.     [MF_STRING,             1, "关于(&A)", "RM_Tray.about"],
     
166.     [MF_SEPARATOR,          2, nil,         nil],
     
167.     [MF_STRING,             3, "前往论坛", "RM_Tray.gotobbs"],
     
168.     [MF_SEPARATOR,          4, nil,         nil],
     
169.     [MF_STRING,             5, "退出(&C)", "RM_Tray.exit"]
     
170.     ].each do |arr|
     
171.       API_REGISTER.call *arr
     
172.     end
     
173.   end
     
174.   
     
175.   #--------------------------------------------------------------------------
     
176.   # ● 简单启动句柄
     
177.   #--------------------------------------------------------------------------
     
178.   def self.start
     
179.     self.register
     
180.     self.add_tray
     
181.   end
     
182. 
     
183. end
     
184. 
     
185.   RM_Tray.start  
     
186.   
     
187. end
     
188. 
     
189. 
     
190. 
     
191. 
     

复制代码

1.03版下载
更新了一些气球提示什么的，可以在RM事件里直接操作提示信息。具体的看工程好了，咳= =

点击下载范例工程

以下为几张效果图= =bb








ps：这只素一个初版，至于以后更不更新就不知道呢。。。咳 闪人。。= =bb

轮回者

这个东西差不多做完了？

以下引用越前リョーマ于2008-9-19 18:38:55的发言：

又更新了……
只可惜一般游戏用不到……

的确，但有些用得到
其实我当初鼓动夏娜做这个的原因就是玩CG Offline的时候采集速度太慢，想把它弄成后台，然后玩别的，可自己不会弄……{/gg}

越前リョーマ

又更新了……
只可惜一般游戏用不到……

果冻叮当猫

太好了！来支持一下！{/cy}{/cy}{/cy}

雷欧纳德

v1.04更新了~~{/gg}

地龙

不错的啊 我的游戏正需要

果冻叮当猫

{/pz}每天都在这里晃过!希望LZ加快解决

じ☆ve冰风

{/cy}{/cy}不错

果冻叮当猫

以下引用灼眼的夏娜于2008-9-8 11:46:00的发言：

呃= = 其实ms这个东西也是没完善的东西，完善后可以直接提供在RGSS里进行修改控制的= =

那要到什么时候才能够实现这些功能呢！其实本热很支持lz的制作的！希望lz能够成功发扬此技术的！

灼眼的夏娜

呃= = 其实ms这个东西也是没完善的东西，完善后可以直接提供在RGSS里进行修改控制的= =