赞 | 0 |
VIP | 12 |
好人卡 | 0 |
积分 | 1 |
经验 | 3626 |
最后登录 | 2020-5-5 |
在线时间 | 1 小时 |
Lv1.梦旅人
- 梦石
- 0
- 星屑
- 60
- 在线时间
- 1 小时
- 注册时间
- 2008-5-31
- 帖子
- 237
|
- #==============================================================================
- # ■ Main
- #------------------------------------------------------------------------------
- # 各定义结束后、从这里开始实际处理。
- #==============================================================================
- Graphics.resize_screen(640, 480)
- # 一些常用的字体
- Font.default_name = ["SimHei", "黑体", "DFKai-SB", "標楷體", "Verdana", "Arial Unicode MS"]
- begin
- Graphics.freeze
- $scene = Scene_Logo.new
- $scene.main while $scene != nil
- Graphics.transition(30)
- rescue Errno::ENOENT
- filename = $!.message.sub("无此文件或文件夹 - ", "")
- print("无法找到文件 #{filename}.")
- end
复制代码 主处理的main是这样的,最上面加了 一句 另:最大就是640X480- #-----------------------------------------------------------------------------
- # ● 只是用来窗口大小变更的
- # ○ 来源秀秀Win32API教程之一(基础篇)
- #-----------------------------------------------------------------------------
- class Win32API
- GAME_INI_FILE = ".\\Game.ini"
- #============================================================================
- def Win32API.GetPrivateProfileString(section, key)
- # 初始化
- val = "\0"*256
- gps = Win32API.new('kernel32', 'GetPrivateProfileString',%w(p p p p l p), 'l')
- gps.call(section, key, "", val, 256, GAME_INI_FILE)
- val.delete!("\0")
- return val
- end
- #============================================================================
- def Win32API.FindWindow(class_name, title)
- fw = Win32API.new('user32', 'FindWindow', %(p, p), 'i')
- hWnd = fw.call(class_name, title)
- return hWnd
- end
- #============================================================================
- HWND_TOP = 0
- HWND_TOPMOST = -1
- SWP_NOMOVE = 2
- def Win32API.SetWindowPos(hWnd, w, h)
- swp = Win32API.new('user32', 'SetWindowPos', %(l, l, i, i, i, i, i), 'i')
- ok = swp.call(hWnd, HWND_TOP, 200, 200, w, h, SWP_NOMOVE)
- return ok
- end
- end
- title = Win32API.GetPrivateProfileString("Game", "Title")
- hWnd = Win32API.FindWindow("RGSS Player", title)
- ok = Win32API.SetWindowPos(hWnd,640,480)
- if(ok == 0)
- p "変更失敗"
- end
复制代码 用api调整窗口大小的
复制到脚本区
这样就可以完美的640X480了
单单加了脚本总要点一下很不爽 |
|