Project1

标题: 怎么可以修改窗口大小 [打印本页]

作者: xlwas    时间: 2008-5-7 06:15
标题: 怎么可以修改窗口大小
有没有简单的方法 [LINE]1,#dddddd[/LINE]版务信息:本贴由楼主自主结贴~
作者: 3535    时间: 2008-5-7 06:17
复制全部脚本内容,在Main脚本之前按insert,插入此脚本全部内容。


这个脚本中当然提供其他的刷新方法,如果把窗口改小则不会出现任何问题,如果改大则有一些刷新上的小问题。
  1. #==============================================================================
  2. # 本脚本来自www.66RPG.com,使用和转载请保留此信息
  3. #==============================================================================
  4. # ————————————————————————————————————
  5. # 本脚本来自www.66rpg.com,转载请保留此信息
  6. # ————————————————————————————————————

  7. #ウィンドウサイズの変更(v1.00)

  8. class Win32API
  9.   GAME_INI_FILE = ".\\Game.ini"
  10.   
  11.   def Win32API.GetPrivateProfileString(section, key)
  12.     val = "\0"*256
  13.     gps = Win32API.new('kernel32', 'GetPrivateProfileString',%w(p p p p l p), 'l')
  14.     gps.call(section, key, "", val, 256, GAME_INI_FILE)
  15.     val.delete!("\0")
  16.     return val
  17.   end

  18.   def Win32API.FindWindow(class_name, title)
  19.     fw = Win32API.new('user32', 'FindWindow', %(p, p), 'i')
  20.     hWnd = fw.call(class_name, title)
  21.     return hWnd
  22.   end

  23.   HWND_TOP     = 0
  24.   HWND_TOPMOST = -1
  25.   SWP_NOMOVE   = 2
  26.   
  27.   def Win32API.SetWindowPos(hWnd, w, h)
  28.     swp = Win32API.new('user32', 'SetWindowPos', %(l, l, i, i, i, i, i), 'i')
  29.     ok = swp.call(hWnd, HWND_TOP, 0, 0, w, h, SWP_NOMOVE)
  30.     # 下の行を有効にすると、常に前面に表示されるウィンドウになる。
  31.     #ok = swp.call(hWnd, HWND_TOPMOST, 0, 0, w, h, SWP_NOMOVE)
  32.     return ok
  33.   end
  34. end

  35. title =  Win32API.GetPrivateProfileString("Game", "Title")
  36. hWnd = Win32API.FindWindow("RGSS Player", title)

  37. # 幅320、高さ480に変更
  38. ok = Win32API.SetWindowPos(hWnd, 320, 480)
  39. if(ok == 0)
  40.   p "サイズ変更失敗"
  41. end
  42. #==============================================================================
  43. # 本脚本来自www.66RPG.com,使用和转载请保留此信息
  44. #==============================================================================
复制代码

作者: asperta    时间: 2008-5-7 06:17
http://rpg.blue/web/htm/news170.htm
作者: Infrared    时间: 2008-5-7 06:20
提示: 作者被禁止或删除 内容自动屏蔽
作者: xlwas    时间: 2008-5-7 15:07
硪是想改成640*400的..
作者: 楓葉    时间: 2008-5-7 15:18
提示: 作者被禁止或删除 内容自动屏蔽
作者: 楓葉    时间: 2009-6-12 08:00
提示: 作者被禁止或删除 内容自动屏蔽




欢迎光临 Project1 (https://rpg.blue/) Powered by Discuz! X3.1