设为首页收藏本站|繁體中文
开启辅助访问

Project1

 找回密码
 注册会员
新版主页
搜索
Project1»广场 › 技术讨论 › RPG Maker XP 讨论区 › 如何在给定的场合，让玩家输入文字答案 ...

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

查看数: 4293 | 评论数: 13 | 收藏 1
关灯 | 提示：支持键盘翻页<-左 右->
帖子模式
    组图打开中，请稍候......
lanyuting
发布时间: 2014-7-12 09:50

正文摘要:

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

回复

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

这其实是用更改名字的方法输入答案
wolves 发表于 2014-7-14 09:34:03
本帖最后由 wolves 于 2014-7-14 09:41 编辑

我有一个输入脚本比较不错，看看这个脚本：
（总共有四段，显示的位置在最下面）
第一个：获取窗口句柄
  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了。
日月星辰 发表于 2014-7-13 09:24:05
https://rpg.blue/thread-363065-1-1.html

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

wwwcctvty 发表于 2014-7-12 18:36:38
写一个专用的scene,需要时调用出来就行了
lanyuting 发表于 2014-7-12 14:10:37
woaivo2 发表于 2014-7-12 10:24
创建另一个空白角色  不要有字 然后利用条件分歧 最后是这样

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

点评

杨广
他确实是这么做了……  发表于 2014-7-12 15:19
至高无上 发表于 2014-7-12 13:21:38
在首页看到两个一摸一样的图片,我还以为6R又坏掉了
杨广 发表于 2014-7-12 11:42:16
http://www.66rpg.com/articles/4597

评分

参与人数 1星屑 +100 收起 理由
RyanBern + 100 认可答案

查看全部评分

我爱吴悦淇 发表于 2014-7-12 11:16:52
http://www.66rpg.com/articles/4837
个人感觉这个会比较适合
lanyuting 发表于 2014-7-12 10:46:58
本帖最后由 hys111111 于 2014-7-12 12:34 编辑

加了这个脚本。。。求解啊
  1. =begin

  3.   脚本：【完美输入法修正】
  4.   
  5.   功能：输入法。
  6.   
  7.   说明: 直接用Type_Field创建输入域即可进行输入，在此可根据Type_Field域对象
  8.   
  9.         的活动标记active来自定义刷新等，在Type_Field中需要自己处理特殊按键
  10.         
  11.         的处理方法。具体不明白之处请参考范例工程。

  13.   作者：灼眼的夏娜
  14.   
  15.   补充: 至于以前那个版本也许很多人都注意到那个烦人的问题了吧，按Enter和Tab那
  16.   
  17.         些会出现不爽的声音，这个版本解决了那个问题，并简化添加了Type_Field类
  18.         
  19.         来方便创建输入域。

  21. =end

  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

  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')

  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

  71. end

  73. #==============================================================================
  74. # ■ EasyConv
  75. #------------------------------------------------------------------------------
  76. # 　转码模块。
  77. #==============================================================================
  78. module EasyConv

  80.   #--------------------------------------------------------------------------
  81.   # ● 常量定义
  82.   #--------------------------------------------------------------------------
  83.   CP_ACP = 0
  84.   CP_UTF8 = 65001

  86.   #--------------------------------------------------------------------------
  87.   # ● 模块函数
  88.   #--------------------------------------------------------------------------
  89.   module_function
  90.   
  91.   #--------------------------------------------------------------------------
  92.   # ● 转码
  93.   #--------------------------------------------------------------------------
  94.   def s2u(text)

  96.     m2w = Win32API.new('kernel32', 'MultiByteToWideChar', 'ilpipi', 'i')
  97.     w2m = Win32API.new('kernel32', 'WideCharToMultiByte', 'ilpipipp', 'i')

  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)

  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

  111.   #--------------------------------------------------------------------------
  112.   # ● 转码
  113.   #--------------------------------------------------------------------------
  114.   def u2s(text)
  115.    
  116.     m2w = Win32API.new('kernel32', 'MultiByteToWideChar', 'ilpipi', 'i')
  117.     w2m = Win32API.new('kernel32', 'WideCharToMultiByte', 'ilpipipp', 'i')

  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)

  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

  130. end

  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)

  245.   #--------------------------------------------------------------------------
  246.   # ● 设置HK应用
  247.   #--------------------------------------------------------------------------
  248.   self.setHK
  249.   
  250. end

  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

  346.   #--------------------------------------------------------------------------
  347.   # ● 刷新
  348.   #--------------------------------------------------------------------------
  349.   def refresh
  350.     @cts.bitmap.clear
  351.     @cts.bitmap.draw_text(0,0,@w,@h,@text.to_s)
  352.   end

  354.   #--------------------------------------------------------------------------
  355.   # ● 获取文字
  356.   #--------------------------------------------------------------------------
  357.   def get_text
  358.     return @text.to_s
  359.   end

  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

  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
复制代码

点评

woaivo2
我在你的另一个帖子已经回复了  发表于 2014-7-12 11:17
拿上你的纸笔，建造一个属于你的梦想世界，加入吧。
 注册会员
找回密码

站长信箱：[email protected]|手机版|小黑屋|无图版|Project1游戏制作

GMT+8, 2024-11-26 23:51

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表