万能的分辨率更改脚本

仲秋启明

原帖在DIYRPG发布

刚才看了海绵的680X480的VX示范包

但是只能改成680X480

这个脚本可以随意改动分辨率，会占用一点FTP
图片，对话不受影响，图片还是544X416的大小，屏幕中自动放大

1. 
   
2. class Win32API
   
3. GAME_INI_FILE = ".\\Game.ini"
   
4. 
   
5. def Win32API.GetPrivateProfileString(section, key)
   
6. val = "\0"*256
   
7. gps = Win32API.new('kernel32', 'GetPrivateProfileString',%w(p p p p l p), 'l')
   
8. gps.call(section, key, "", val, 256, GAME_INI_FILE)
   
9. val.delete!("\0")
   
10. return val
    
11. end
    
12. def Win32API.FindWindow(class_name, title)
    
13. fw = Win32API.new('user32', 'FindWindow', %(p, p), 'i')
    
14. hWnd = fw.call(class_name, title)
    
15. return hWnd
    
16. end
    
17. HWND_TOP = 0
    
18. HWND_TOPMOST = -1
    
19. SWP_NOMOVE = 2
    
20. 
    
21. def Win32API.SetWindowPos(hWnd, w, h)
    
22. swp = Win32API.new('user32', 'SetWindowPos', %(l, l, i, i, i, i, i), 'i')
    
23. ok = swp.call(hWnd, HWND_TOP, 0, 0, w, h, SWP_NOMOVE)
    
24. return ok
    
25. end
    
26. end
    
27. #以下是分辨率变更
    
28. title = Win32API.GetPrivateProfileString("Game", "Title")
    
29. hWnd = Win32API.FindWindow("RGSS Player", title)
    
30. #使用时X轴加6，Y轴加25，否则画面会变形
    
31. ok = Win32API.SetWindowPos(hWnd, 806, 625)
    
32. if(ok == 0)
    
33. p "失败"
    
34. end

复制代码

默认脚本中改成了800X600

应DK的图片，给出我的范例工程 800×600.rar (238.74 KB, 下载次数: 1108)

2010-7-7 11:02 上传

点击文件名下载附件

chd114

这个在XP上有效果吗？

chd114

这个在XP上有效果吗？

chd114

这个在XP上有效果吗？

本圈圈本

这个是个屏幕缩放脚本吧，被标题骗进来了

Jousun

面对不同分辨率的电脑,可以实现放大后打开自动居中画面就好咯

小闵

那啥，我用是可以的，但只能放大一点，怎么样能放大全屏呢？

tester

把背景涂黑！还有不要用findwindow，用GetActiveWindow