如何在给定的场合，让玩家输入文字答案

lanyuting

现在文字是可以输出来 但是就是不能控制输入框出现的时机。求解，非常感谢！

为什么不早说

lanyuting 发表于 2014-7-12 14:10
我不是要改名字，是要让玩家输入文本，就想文字答案那种

这其实是用更改名字的方法输入答案

wolves

我有一个输入脚本比较不错，看看这个脚本：
（总共有四段，显示的位置在最下面）
第一个：获取窗口句柄

1. #==============================================================================
   
2. # ■ Kernel
   
3. #------------------------------------------------------------------------------
   
4. # 　该模块中定义了可供所有类使用的方法。Object 类中包含了该模块。
   
5. #==============================================================================
   
6. module Kernel
   
7.   #--------------------------------------------------------------------------
   
8.   # ● 需要的 Windows API 函数
   
9.   #--------------------------------------------------------------------------
   
10.   GetWindowThreadProcessId = Win32API.new("user32", "GetWindowThreadProcessId", "LP", "L")
    
11.   GetWindow = Win32API.new("user32", "GetWindow", "LL", "L")
    
12.   GetClassName = Win32API.new("user32", "GetClassName", "LPL", "L")
    
13.   GetCurrentThreadId = Win32API.new("kernel32", "GetCurrentThreadId", "V", "L")
    
14.   GetForegroundWindow = Win32API.new("user32", "GetForegroundWindow", "V", "L")
    
15.   #--------------------------------------------------------------------------
    
16.   # ● 获取窗口句柄
    
17.   #--------------------------------------------------------------------------
    
18.   def get_hWnd
    
19.     # 获取调用线程（RM 的主线程）的进程标识
    
20.     threadID = GetCurrentThreadId.call
    
21.     # 获取 Z 次序中最靠前的窗口
    
22.     hWnd = GetWindow.call(GetForegroundWindow.call, 0)
    
23.     # 枚举所有窗口
    
24.     while hWnd != 0
    
25.       # 如果创建该窗口的线程标识匹配本线程标识
    
26.       if threadID == GetWindowThreadProcessId.call(hWnd, 0)
    
27.         # 分配一个 11 个字节的缓冲区
    
28.         className = " " * 11
    
29.         # 获取该窗口的类名
    
30.         GetClassName.call(hWnd, className, 12)
    
31.         # 如果匹配 RGSS Player 则跳出循环
    
32.         break if className == "RGSS Player"
    
33.       end
    
34.       # 获取下一个窗口
    
35.       hWnd = GetWindow.call(hWnd, 2)
    
36.     end
    
37.     return hWnd
    
38.   end
    
39. end

复制代码

第二个：TextBox

1. #==============================================================================
   
2. # ■ TextBox  by EngShun
   
3. #------------------------------------------------------------------------------
   
4. # 　输入框的类。
   
5. #==============================================================================
   
6. class TextBox
   
7.   #--------------------------------------------------------------------------
   
8.   # ● 设置API
   
9.   #--------------------------------------------------------------------------
   
10.   CreateWindow = Win32API.new('user32','CreateWindowEx','lpplllllllll','l')
    
11.   ShowWindow = Win32API.new('user32','ShowWindow','ll','l')
    
12.   DestroyWindow = Win32API.new('user32','DestroyWindow','l','l')
    
13.   GetWindowText = Win32API.new('user32','GetWindowText','lpl','l')
    
14.   SetWindowText = Win32API.new("user32", "SetWindowText", "lp", "l")
    
15.   GetWindowTextLength = Win32API.new('user32','GetWindowTextLength','l','l')
    
16.   UpdateWindow = Win32API.new('user32','UpdateWindow','l','i')
    
17.   SetFocus = Win32API.new('user32','SetFocus','l','l')
    
18.   SendMessage = Win32API.new('user32','SendMessage','llll','l')
    
19.   MultiByteToWideChar = Win32API.new('kernel32', 'MultiByteToWideChar', 'ilpipi', 'i')
    
20.   WideCharToMultiByte = Win32API.new('kernel32', 'WideCharToMultiByte', 'ilpipipp', 'i')
    
21.   GetKeyState = Win32API.new("user32","GetAsyncKeyState",'I','I')
    
22.   #--------------------------------------------------------------------------
    
23.   # ● 定义实例变量
    
24.   #--------------------------------------------------------------------------
    
25.   attr_accessor :focus
    
26.   #--------------------------------------------------------------------------
    
27.   # ● 初始化
    
28.   #--------------------------------------------------------------------------
    
29.   def initialize(text = "",limit = 8,number=false)
    
30.     c = 0x40011000
    
31.     c = (c|0x00001000) if number
    
32.     [url=home.php?mod=space&uid=37298]@Window[/url] = CreateWindow.call(0, 'EDIT', u2s(text), c, 0, 480-22, 640, 22, get_hWnd, 0, 0, 0)
    
33.     SendMessage.call(@window,0xC5,limit,0)
    
34.     @focus = true
    
35.     @disposed = false
    
36.   end
    
37.   #--------------------------------------------------------------------------
    
38.   # ● 释放
    
39.   #--------------------------------------------------------------------------
    
40.   def dispose
    
41.     @disposed = true
    
42.     DestroyWindow.call(@window)
    
43.   end
    
44.   #--------------------------------------------------------------------------
    
45.   # ● 刷新
    
46.   #--------------------------------------------------------------------------
    
47.   def update
    
48.     return if !@focus or @disposed
    
49.     UpdateWindow.call(@window)
    
50.     SetFocus.call(@window)
    
51.   end
    
52.   #--------------------------------------------------------------------------
    
53.   # ● 获取内容
    
54.   #--------------------------------------------------------------------------
    
55.   def text
    
56.     return if @disposed
    
57.     l = GetWindowTextLength.call(@window)
    
58.     str = "\0" * (l + 1)
    
59.     GetWindowText.call(@window, str, l+1)
    
60.     return s2u(str.delete("\0"))
    
61.   end
    
62.   #--------------------------------------------------------------------------
    
63.   # ● 更改内容
    
64.   #--------------------------------------------------------------------------
    
65.   def text=(str)
    
66.     SetWindowText.call(@window, u2s(str))
    
67.     return if @disposed
    
68.   end
    
69.   #--------------------------------------------------------------------------
    
70.   # ● 获取光标位置
    
71.   #--------------------------------------------------------------------------
    
72.   def sel_pos
    
73.     return if @disposed
    
74.     return (SendMessage.call(@window,0xB0,0,0) % 65535) / 2
    
75.   end
    
76.   #--------------------------------------------------------------------------
    
77.   # ● 设置光标位置
    
78.   #--------------------------------------------------------------------------
    
79.   def sel_pos=(i)
    
80.     return if @disposed
    
81.     SendMessage.call(@window,0xB1,i,i)
    
82.   end
    
83.   #--------------------------------------------------------------------------
    
84.   # ● 获取光标位置
    
85.   #--------------------------------------------------------------------------
    
86.   def limit
    
87.     return if @disposed
    
88.     return SendMessage.call(@window,0xD5,0,0)
    
89.   end
    
90.   #--------------------------------------------------------------------------
    
91.   # ● 设置光标位置
    
92.   #--------------------------------------------------------------------------
    
93.   def limit=(i)
    
94.     return if @disposed
    
95.     SendMessage.call(@window,0xC5,i,0)
    
96.   end
    
97.   #--------------------------------------------------------------------------
    
98.   # ● 是否按下回车键
    
99.   #--------------------------------------------------------------------------
    
100.   def press_enter?
     
101.     return if @disposed
     
102.     return (@focus and (GetKeyState.call(13) != 0))
     
103.   end
     
104.   #--------------------------------------------------------------------------
     
105.   # ● 转码：系统转UTF-8
     
106.   #--------------------------------------------------------------------------
     
107.   def s2u(text)
     
108.     len = MultiByteToWideChar.call(0, 0, text, -1, nil, 0);
     
109.     buf = "\0" * (len*2)
     
110.     MultiByteToWideChar.call(0, 0, text, -1, buf, buf.size/2);
     
111.     len = WideCharToMultiByte.call(65001, 0, buf, -1, nil, 0, nil, nil);
     
112.     ret = "\0" * len
     
113.     WideCharToMultiByte.call(65001, 0, buf, -1, ret, ret.size, nil, nil);
     
114.     return ret.delete("\000")
     
115.   end
     
116.   #--------------------------------------------------------------------------
     
117.   # ● 转码：UTF-8转系统
     
118.   #--------------------------------------------------------------------------
     
119.   def u2s(text)
     
120.     len = MultiByteToWideChar.call(65001, 0, text, -1, nil, 0);
     
121.     buf = "\0" * (len*2)
     
122.     MultiByteToWideChar.call(65001, 0, text, -1, buf, buf.size/2);
     
123.     len = WideCharToMultiByte.call(0, 0, buf, -1, nil, 0, nil, nil);
     
124.     ret = "\0" * len
     
125.     WideCharToMultiByte.call(0, 0, buf, -1, ret, ret.size, nil, nil);
     
126.     return ret.delete("\000")
     
127.   end
     
128.   private :u2s ,:s2u # 定义私有功能
     
129. end

复制代码

第三个：Sprite_TextBox

1. #==============================================================================
   
2. # ■ Sprite_TextBox  by EngShun
   
3. #------------------------------------------------------------------------------
   
4. # 　显示输入框用的活动块。
   
5. #==============================================================================
   
6. class Sprite_TextBox < Sprite
   
7.   #--------------------------------------------------------------------------
   
8.   # ● 设置缓存的类
   
9.   #--------------------------------------------------------------------------
   
10.   Cache = Struct.new(:bc ,:fc ,:fs ,:text ,:sel_pos)
    
11.   #--------------------------------------------------------------------------
    
12.   # ● 定义实例变量
    
13.   #--------------------------------------------------------------------------
    
14.   attr_accessor :textbox
    
15.   attr_accessor :back_color
    
16.   #--------------------------------------------------------------------------
    
17.   # ● 初始化
    
18.   #--------------------------------------------------------------------------
    
19.   def initialize(x = 0,y = 0,w = 128,h = 32,bc = Color.new(255,255,255),fc = Color.new(0,0,0),tb = TextBox.new)
    
20.     super(nil)
    
21.     self.x = x
    
22.     self.y = y
    
23.     self.bitmap = Bitmap.new(w,h)
    
24.     self.bitmap.font.color = fc
    
25.     @back_color = bc
    
26.     @textbox = tb
    
27.     [url=home.php?mod=space&uid=341345]@Cache[/url] = Cache.new
    
28.     refresh
    
29.   end
    
30.   #--------------------------------------------------------------------------
    
31.   # ● 刷新
    
32.   #--------------------------------------------------------------------------
    
33.   def update
    
34.     super
    
35.     return unless @textbox.focus
    
36.     @textbox.update
    
37.     if (self.bitmap.font.color != @cache.fc) or
    
38.        (self.bitmap.font.size != @cache.fs) or
    
39.        (@textbox.sel_pos != @cache.sel_pos) or
    
40.        (@textbox.text != @cache.text) or
    
41.        (@back_color != @cache.bc)
    
42.       refresh
    
43.     end
    
44.   end
    
45.   #--------------------------------------------------------------------------
    
46.   # ● 释放
    
47.   #--------------------------------------------------------------------------
    
48.   def dispose
    
49.     self.bitmap.dispose
    
50.     @textbox.dispose
    
51.     super
    
52.   end
    
53.   #--------------------------------------------------------------------------
    
54.   # ● 内容刷新
    
55.   #--------------------------------------------------------------------------
    
56.   def refresh
    
57.     @cache.fc = self.bitmap.font.color
    
58.     @cache.fs = self.bitmap.font.size
    
59.     @cache.sel_pos = @textbox.sel_pos
    
60.     @cache.text = @textbox.text
    
61.     @cache.bc = @back_color
    
62.     w = self.bitmap.width
    
63.     h = self.bitmap.height
    
64.     self.bitmap.fill_rect(0,0,w,h,@back_color)
    
65.     self.bitmap.draw_text(4,0,w-4,h,@textbox.text)
    
66.     t = @textbox.text.scan(/./)[0,@textbox.sel_pos].join("")
    
67.     s = self.bitmap.text_size(t).width
    
68.     self.bitmap.draw_text((4 + s)-16,0,32,h,"|",1)
    
69.   end
    
70.   private :refresh # 设置私有功能
    
71. end

复制代码

第四个：Scene_Name

1. #==============================================================================
   
2. # ■ Scene_Name
   
3. #------------------------------------------------------------------------------
   
4. # 　处理名称输入画面的类。
   
5. #==============================================================================
   
6. class Scene_Name
   
7.   #--------------------------------------------------------------------------
   
8.   # ● 主处理
   
9.   #--------------------------------------------------------------------------
   
10.   def main
    
11.     @spriteset = Spriteset_Map.new
    
12.     @actor = $game_actors[$game_temp.name_actor_id]
    
13.     [url=home.php?mod=space&uid=37298]@Window[/url] = Window_Base.new(0,480-128,640,128)
    
14.     @window.contents = Bitmap.new(576,96)
    
15.     @window.draw_actor_graphic(@actor, 60, 70)
    
16.     @window.contents.draw_text(128,0,480,32,$input)
    
17.     @window.opacity = 180
    
18.     @sprite_tb = Sprite_TextBox.new(144,410,464)
    
19.     @sprite_tb.z = 500
    
20.     @sprite_tb.textbox.limit = $game_temp.name_max_char
    
21.     @sprite_tb.textbox.text = @actor.name
    
22.     @sprite_tb.textbox.sel_pos = @actor.name.length
    
23.     @sprite_tb.opacity = 180
    
24.     Graphics.transition
    
25.     loop do
    
26.       Graphics.update
    
27.       Input.update
    
28.       update
    
29.       break if $scene != self
    
30.     end
    
31.     Graphics.freeze
    
32.     @sprite_tb.dispose
    
33.     @window.dispose
    
34.     @spriteset.dispose
    
35.   end
    
36.   #--------------------------------------------------------------------------
    
37.   # ● 刷新画面
    
38.   #--------------------------------------------------------------------------
    
39.   def update
    
40.     @sprite_tb.update
    
41.     if @sprite_tb.textbox.press_enter?
    
42.       if @sprite_tb.textbox.text == ""
    
43.         $game_system.se_play($data_system.buzzer_se)
    
44.         return
    
45.       end
    
46.       @actor.name = @sprite_tb.textbox.text
    
47.       $scene = Scene_Map.new
    
48.     end
    
49.   end
    
50. end

复制代码

调用方法： 修改某个角色的姓名，这个角色最好不用，因为他的名字就是你要输入的东西，角色姓名的调用方法自己百度吧，是个字符串，把这个字符串代入你要的变量，一切都ok了。

日月星辰

https://rpg.blue/thread-363065-1-1.html

链接只是打个广告= =不过就是类似的功能呢

wwwcctvty

写一个专用的scene,需要时调用出来就行了

lanyuting

woaivo2 发表于 2014-7-12 10:24
创建另一个空白角色  不要有字 然后利用条件分歧 最后是这样

我不是要改名字，是要让玩家输入文本，就想文字答案那种

至高无上

在首页看到两个一摸一样的图片,我还以为6R又坏掉了

杨广

http://www.66rpg.com/articles/4597

我爱吴悦淇

http://www.66rpg.com/articles/4837
个人感觉这个会比较适合

lanyuting

加了这个脚本。。。求解啊

1. =begin
   
2. 
   
3.   脚本：【完美输入法修正】
   
4.   
   
5.   功能：输入法。
   
6.   
   
7.   说明: 直接用Type_Field创建输入域即可进行输入，在此可根据Type_Field域对象
   
8.   
   
9.         的活动标记active来自定义刷新等，在Type_Field中需要自己处理特殊按键
   
10.         
    
11.         的处理方法。具体不明白之处请参考范例工程。
    
12. 
    
13.   作者：灼眼的夏娜
    
14.   
    
15.   补充: 至于以前那个版本也许很多人都注意到那个烦人的问题了吧，按Enter和Tab那
    
16.   
    
17.         些会出现不爽的声音，这个版本解决了那个问题，并简化添加了Type_Field类
    
18.         
    
19.         来方便创建输入域。
    
20. 
    
21. =end
    
22. 
    
23. #==============================================================================
    
24. # ■ RInput
    
25. #------------------------------------------------------------------------------
    
26. # 　全键盘处理的模块。
    
27. #==============================================================================
    
28. module RInput
    
29.   
    
30.   #--------------------------------------------------------------------------
    
31.   # ● 常量定义
    
32.   #--------------------------------------------------------------------------
    
33.   ENTER             = 0x0D
    
34.   SPACE             = 0x20
    
35.   UP                = 0x26
    
36.   DOWN              = 0x28
    
37.   LEFT              = 0x25
    
38.   RIGHT             = 0x27
    
39.   
    
40.   LCTRL             = 0xA2
    
41.   LALT              = 0xA4
    
42. 
    
43.   #--------------------------------------------------------------------------
    
44.   # ● 临时Hash
    
45.   #--------------------------------------------------------------------------
    
46.   @R_Key_Hash = {}
    
47.   @R_Key_Repeat = {}
    
48.   
    
49.   #--------------------------------------------------------------------------
    
50.   # ● 唯一API
    
51.   #--------------------------------------------------------------------------
    
52.   GetKeyState = Win32API.new("user32","GetAsyncKeyState",['I'],'I')
    
53. 
    
54.   #--------------------------------------------------------------------------
    
55.   # ● 单键处理
    
56.   #--------------------------------------------------------------------------
    
57.   def self.trigger?(rkey)
    
58.     result = GetKeyState.call(rkey)
    
59.     if @R_Key_Hash[rkey] == 1 and result != 0
    
60.       return false
    
61.     end
    
62.     if result != 0
    
63.       @R_Key_Hash[rkey] = 1
    
64.       return true
    
65.     else
    
66.       @R_Key_Hash[rkey] = 0
    
67.       return false
    
68.     end
    
69.   end
    
70. 
    
71. end
    
72. 
    
73. #==============================================================================
    
74. # ■ EasyConv
    
75. #------------------------------------------------------------------------------
    
76. # 　转码模块。
    
77. #==============================================================================
    
78. module EasyConv
    
79. 
    
80.   #--------------------------------------------------------------------------
    
81.   # ● 常量定义
    
82.   #--------------------------------------------------------------------------
    
83.   CP_ACP = 0
    
84.   CP_UTF8 = 65001
    
85. 
    
86.   #--------------------------------------------------------------------------
    
87.   # ● 模块函数
    
88.   #--------------------------------------------------------------------------
    
89.   module_function
    
90.   
    
91.   #--------------------------------------------------------------------------
    
92.   # ● 转码
    
93.   #--------------------------------------------------------------------------
    
94.   def s2u(text)
    
95. 
    
96.     m2w = Win32API.new('kernel32', 'MultiByteToWideChar', 'ilpipi', 'i')
    
97.     w2m = Win32API.new('kernel32', 'WideCharToMultiByte', 'ilpipipp', 'i')
    
98. 
    
99.     len = m2w.call(CP_ACP, 0, text, -1, nil, 0)
    
100.     buf = "\0" * (len*2)
     
101.     m2w.call(CP_ACP, 0, text, -1, buf, buf.size/2)
     
102. 
     
103.     len = w2m.call(CP_UTF8, 0, buf, -1, nil, 0, nil, nil)
     
104.     ret = "\0" * len
     
105.     w2m.call(CP_UTF8, 0, buf, -1, ret, ret.size, nil, nil)
     
106.     ret[-1] = ""
     
107.    
     
108.     return ret
     
109.   end
     
110. 
     
111.   #--------------------------------------------------------------------------
     
112.   # ● 转码
     
113.   #--------------------------------------------------------------------------
     
114.   def u2s(text)
     
115.    
     
116.     m2w = Win32API.new('kernel32', 'MultiByteToWideChar', 'ilpipi', 'i')
     
117.     w2m = Win32API.new('kernel32', 'WideCharToMultiByte', 'ilpipipp', 'i')
     
118. 
     
119.     len = m2w.call(CP_UTF8, 0, text, -1, nil, 0)
     
120.     buf = "\0" * (len*2)
     
121.     m2w.call(CP_UTF8, 0, text, -1, buf, buf.size/2)
     
122. 
     
123.     len = w2m.call(CP_ACP, 0, buf, -1, nil, 0, nil, nil)
     
124.     ret = "\0" * len
     
125.     w2m.call(CP_ACP, 0, buf, -1, ret, ret.size, nil, nil)
     
126.    
     
127.     return ret
     
128.   end
     
129. 
     
130. end
     
131. 
     
132. #==============================================================================
     
133. # ■ TypeAPI
     
134. #------------------------------------------------------------------------------
     
135. # 　输入法相关API模块。
     
136. #==============================================================================
     
137. module TypeAPI
     
138.   
     
139.   #--------------------------------------------------------------------------
     
140.   # ● API定义
     
141.   #--------------------------------------------------------------------------
     
142.   GPPS         = Win32API.new("kernel32","GetPrivateProfileString",'pppplp','l')
     
143.   FindWindow   = Win32API.new("user32", "FindWindow", 'pp', 'i')
     
144.   CreateWindow = Win32API.new("NetGame","CreatWnd",'l','l')
     
145.   SetHK        = Win32API.new("NetGame","SetHK",'v','v')
     
146.   GetText      = Win32API.new("NetGame","GetWndText",'l','p')
     
147.   SetFocus     = Win32API.new("user32","SetFocus",'l','l')
     
148.   IfBack       = Win32API.new("NetGame","If_Back",'v','i')
     
149.   StartType    = Win32API.new("NetGame","StartType",'v','v')
     
150.   EndType      = Win32API.new("NetGame","EndType",'v','v')
     
151.   GetKeyInfos  = Win32API.new("NetGame","GetKeyInfo",'v','i')
     
152.   
     
153.   #--------------------------------------------------------------------------
     
154.   # ● 模块函数
     
155.   #--------------------------------------------------------------------------
     
156.   module_function
     
157.   
     
158.   #--------------------------------------------------------------------------
     
159.   # ● 获取参数
     
160.   #--------------------------------------------------------------------------
     
161.   def getParam
     
162.     val = "\0" * 256
     
163.     GPPS.call("Game","Title","",val,256,"./Game.ini")
     
164.     val.delete!("\0")
     
165.     return val
     
166.   end
     
167.   
     
168.   #--------------------------------------------------------------------------
     
169.   # ● 获取窗口
     
170.   #--------------------------------------------------------------------------
     
171.   def findWindow
     
172.     return FindWindow.call("RGSS Player",self.getParam)
     
173.   end
     
174.   
     
175.   #--------------------------------------------------------------------------
     
176.   # ● 创建窗口
     
177.   #--------------------------------------------------------------------------
     
178.   def createWindow(hwnd)
     
179.     return CreateWindow.call(hwnd)
     
180.   end
     
181.   
     
182.   #--------------------------------------------------------------------------
     
183.   # ● 设置HK
     
184.   #--------------------------------------------------------------------------
     
185.   def setHK
     
186.     SetHK.call
     
187.   end
     
188.   
     
189.   #--------------------------------------------------------------------------
     
190.   # ● 获取文字
     
191.   #--------------------------------------------------------------------------
     
192.   def getText
     
193.     return EasyConv.s2u(GetText.call(@subhwnd))
     
194.   end
     
195.   
     
196.   #--------------------------------------------------------------------------
     
197.   # ● 设置焦点
     
198.   #--------------------------------------------------------------------------
     
199.   def setFocus
     
200.     SetFocus.call(@subhwnd)
     
201.   end
     
202.   
     
203.   #--------------------------------------------------------------------------
     
204.   # ● 转换焦点
     
205.   #--------------------------------------------------------------------------
     
206.   def lostFocus
     
207.     SetFocus.call(@hwnd)
     
208.   end
     
209.   
     
210.   #--------------------------------------------------------------------------
     
211.   # ● 退格判定
     
212.   #--------------------------------------------------------------------------
     
213.   def ifBack
     
214.     return IfBack.call
     
215.   end
     
216.   
     
217.   #--------------------------------------------------------------------------
     
218.   # ● 开始输入
     
219.   #--------------------------------------------------------------------------
     
220.   def startType
     
221.     StartType.call
     
222.   end
     
223.   
     
224.   #--------------------------------------------------------------------------
     
225.   # ● 结束输入
     
226.   #--------------------------------------------------------------------------
     
227.   def endType
     
228.     EndType.call
     
229.   end
     
230.   
     
231.   #--------------------------------------------------------------------------
     
232.   # ● 输入中特殊按键处理
     
233.   #--------------------------------------------------------------------------
     
234.   def getKeyInfos
     
235.     return GetKeyInfos.call
     
236.   end
     
237.   
     
238.   #--------------------------------------------------------------------------
     
239.   # ● 获取句柄
     
240.   #--------------------------------------------------------------------------
     
241.   @hwnd    = self.findWindow
     
242.   
     
243.   @subhwnd = self.createWindow(@hwnd)
     
244. 
     
245.   #--------------------------------------------------------------------------
     
246.   # ● 设置HK应用
     
247.   #--------------------------------------------------------------------------
     
248.   self.setHK
     
249.   
     
250. end
     
251. 
     
252. #==============================================================================
     
253. # ■ Type_Field
     
254. #------------------------------------------------------------------------------
     
255. # 　处理输入域的类。
     
256. #==============================================================================
     
257. class Type_Field
     
258.   
     
259.   #--------------------------------------------------------------------------
     
260.   # ● 定义实例变量
     
261.   #--------------------------------------------------------------------------
     
262.   attr(:active)
     
263.   
     
264.   attr_accessor :event_tab
     
265.   attr_accessor :event_enter
     
266.   attr_accessor :enter_esc
     
267.   
     
268.   #--------------------------------------------------------------------------
     
269.   # ● 初始化
     
270.   #--------------------------------------------------------------------------
     
271.   def initialize(v,default_text = "",default_careth = nil,default_fonts = 25,\
     
272.     default_fontc = Color.new(0,0,0))
     
273.     # active
     
274.     @active = true
     
275.     # 视口
     
276.     rect = v.rect
     
277.     @v = Viewport.new(rect.x,rect.y,rect.width,rect.height)
     
278.     [url=home.php?mod=space&uid=133944]@w[/url] = rect.width
     
279.     @h = rect.height
     
280.     # 属性
     
281.     @caret_h = default_careth.nil? ? @h : [@h,default_careth].min
     
282.     @caret_y = rect.y + (@h - @caret_h) / 2
     
283.     @font_size = [default_fonts,@h].min
     
284.     # 描绘contents
     
285.     @cts = Sprite.new(@v)
     
286.     @cts.bitmap = Bitmap.new([url=home.php?mod=space&uid=133944]@w[/url] - 3,@h)
     
287.     @cts.bitmap.font.size = @font_size
     
288.     @cts.bitmap.font.color = default_fontc
     
289.     # 辅助属性
     
290.     @bk_count = 0
     
291.     @text = default_text.scan(/./)
     
292.     @max_width = @w - 3
     
293.     @caret_pos = @text.size
     
294.     @save_pos = @caret_pos
     
295.     # 光标Caret
     
296.     @v1 = Viewport.new(rect.x,@caret_y,@w + 3,@caret_h)
     
297.     @caret_sp = Sprite.new(@v1)
     
298.     @caret_bitmap = Bitmap.new(3,@caret_h)
     
299.     @caret_bitmap.fill_rect(0,0,1,@caret_h,Color.new(0,0,0,180))
     
300.     @caret_bitmap.fill_rect(1,0,1,@caret_h,Color.new(0,0,0))
     
301.     @caret_bitmap.fill_rect(2,0,1,@caret_h,Color.new(120,120,120))
     
302.     @caret_sp.bitmap = @caret_bitmap
     
303.     @caret_sp.x = self.get_width(@text[0,@caret_pos].to_s)
     
304.     @caret_sp.y = 0
     
305.     @caret_sp.visible = false
     
306.     @caret_flash_count = 0
     
307.    
     
308.     @event_tab = nil
     
309.     @event_enter = nil
     
310.     @event_esc = nil
     
311.    
     
312.     # 刷新
     
313.     refresh
     
314.     # 设置焦点
     
315.     TypeAPI.setFocus
     
316.     # 开始输入
     
317.     TypeAPI.startType
     
318.     #先清空
     
319.     TypeAPI.getText
     
320.   end
     
321.   
     
322.   #--------------------------------------------------------------------------
     
323.   # ● 设置活动标记
     
324.   #--------------------------------------------------------------------------
     
325.   def active=(value)
     
326.     if value != true and value != false
     
327.       return
     
328.     end
     
329.     @active = value
     
330.     @caret_sp.visible = @active
     
331.   end
     
332.   
     
333.   #--------------------------------------------------------------------------
     
334.   # ● 释放
     
335.   #--------------------------------------------------------------------------
     
336.   def dispose
     
337.     @caret_bitmap.dispose
     
338.     @caret_sp.bitmap.dispose
     
339.     @caret_sp.dispose
     
340.     @cts.bitmap.dispose
     
341.     @cts.dispose
     
342.     @v.dispose
     
343.     @v1.dispose
     
344.   end
     
345. 
     
346.   #--------------------------------------------------------------------------
     
347.   # ● 刷新
     
348.   #--------------------------------------------------------------------------
     
349.   def refresh
     
350.     @cts.bitmap.clear
     
351.     @cts.bitmap.draw_text(0,0,@w,@h,@text.to_s)
     
352.   end
     
353. 
     
354.   #--------------------------------------------------------------------------
     
355.   # ● 获取文字
     
356.   #--------------------------------------------------------------------------
     
357.   def get_text
     
358.     return @text.to_s
     
359.   end
     
360. 
     
361.   #--------------------------------------------------------------------------
     
362.   # ● 取得字符宽度
     
363.   #--------------------------------------------------------------------------
     
364.   def get_width(str)
     
365.     return @cts.bitmap.text_size(str).width
     
366.   end
     
367.   
     
368.   #--------------------------------------------------------------------------
     
369.   # ● 更新
     
370.   #--------------------------------------------------------------------------
     
371.   def update
     
372.     # 非激活状态则返回
     
373.     unless @active
     
374.       return
     
375.     end
     
376.     # 获取按键信息
     
377.     key_info = TypeAPI.getKeyInfos
     
378.     case key_info
     
379.     when 0x09 # Tab
     
380.       # 按下 Tab 键的情况自己定义怎么处理
     
381.       @event_tab.call(self) if @event_tab
     
382.       return
     
383.     when 0x0d # Enter
     
384.       # 按下 Enter 键的情况自己定义怎么处理
     
385.       @event_enter.call(self) if @event_enter
     
386.       return
     
387.     when 0x1B # Esc
     
388.       # 按下 Esc 键的情况自己定义怎么处理
     
389.       @event_esc.call(self) if @event_esc
     
390.       return
     
391.     end
     
392.     self.update_text
     
393.     self.update_lrb
     
394.     self.update_back
     
395.     self.update_caret
     
396.   end
     
397. 
     
398.   #--------------------------------------------------------------------------
     
399.   # ● 更新文字
     
400.   #--------------------------------------------------------------------------
     
401.   def update_text
     
402.     # 文字刷新
     
403.     TypeAPI.setFocus
     
404.     text = TypeAPI.getText
     
405.     if text != ""
     
406.       for char in text.scan(/./)
     
407.         if self.get_width(@text.to_s + char) <= @max_width
     
408.           @text[@caret_pos,0] = char
     
409.           @caret_pos += 1
     
410.         else
     
411.           break
     
412.         end
     
413.       end
     
414.       refresh
     
415.     end
     
416.   end
     
417.   
     
418.   #--------------------------------------------------------------------------
     
419.   # ● 更新左右按键
     
420.   #--------------------------------------------------------------------------
     
421.   def update_lrb
     
422.     if RInput.trigger?(RInput::LEFT) and @caret_pos > 0
     
423.       @caret_pos -= 1
     
424.       return
     
425.     end
     
426.     if RInput.trigger?(RInput::RIGHT) and @caret_pos < @text.size
     
427.       @caret_pos += 1
     
428.       return
     
429.     end
     
430.   end
     
431.   
     
432.   #--------------------------------------------------------------------------
     
433.   # ● 更新退格
     
434.   #--------------------------------------------------------------------------
     
435.   def update_back
     
436.     # 前退格处理
     
437.     @bk_count += TypeAPI.ifBack
     
438.     if @bk_count > 0
     
439.       @bk_count -= 1
     
440.       if @caret_pos > 0
     
441.         @text.delete_at(@caret_pos - 1);@caret_pos -= 1;refresh
     
442.       end
     
443.     end
     
444.   end
     
445.   
     
446.   #--------------------------------------------------------------------------
     
447.   # ● 更新光标闪烁
     
448.   #--------------------------------------------------------------------------
     
449.   def update_caret
     
450.     # 闪烁计时
     
451.     @caret_flash_count += 1
     
452.     if @caret_flash_count == 20
     
453.       @caret_sp.visible = !@caret_sp.visible
     
454.       @caret_flash_count = 0
     
455.     end
     
456.     # Caret位置刷新
     
457.     if @save_pos != @caret_pos
     
458.       @save_pos = @caret_pos
     
459.       @caret_sp.x = self.get_width(@text[0,@save_pos].to_s)
     
460.     end
     
461.   end
     
462.   
     
463. end

复制代码