XP版 Graphics.snap_to_bitmap

神思

!!!呃``啊``好象发错区了```帮忙转一下``= =```

1. #==============================================================================
   
2. # ■ Graphics
   
3. #------------------------------------------------------------------------------
   
4. # 　进行有关全体图像处理的模块。
   
5. #   RMXP 版的 Graphics.snap_to_bitmap
   
6. #==============================================================================
   
7. 
   
8. class << Graphics
   
9.   GetWindowDC = Win32API.new("user32", "GetWindowDC", "l", "l")
   
10.   GetDC = Win32API.new("user32", "GetDC", "l", "l")
    
11.   GetPrivateProfileString = Win32API.new("kernel32", "GetPrivateProfileStringA", "pppplp", "l")
    
12.   FindWindow = Win32API.new("user32", "FindWindowA", "pp", "l" )
    
13.   CreateDC = Win32API.new("gdi32", "CreateDC", "pppl", "l")
    
14.   CreateCompatibleBitmap = Win32API.new("gdi32", "CreateCompatibleBitmap", "lll", "l")
    
15.   CreateCompatibleDC = Win32API.new("gdi32", "CreateCompatibleDC", "l", "l")
    
16.   SelectObject = Win32API.new("gdi32", "SelectObject", "ll", "l")
    
17.   BitBlt = Win32API.new("gdi32", "BitBlt", "lllllllll", "l")
    
18.   GetBitmapBits = Win32API.new("gdi32", "GetBitmapBits", "llp", "l")
    
19.   ScreenToClient = Win32API.new("user32", "ScreenToClient", "ip", "i")
    
20.   SRCCOPY = 0xCC0020
    
21.   #--------------------------------------------------------------------------
    
22.   # ● snap_to_bitmap
    
23.   #   将当前画面转换为Bitmap对象
    
24.   #--------------------------------------------------------------------------
    
25.   def snap_to_bitmap
    
26.     hb = Bitmap.new(640,480)
    
27.     rgbs = self.bitmap_data
    
28.     x=y=0
    
29.     indexs = [0]
    
30.     t1 = Time.now
    
31.     for i in indexs
    
32.       break if rgbs[i].nil?
    
33.       break if rgbs[i+1].nil?
    
34.       break if rgbs[i+2].nil?
    
35.       break if rgbs[i+3].nil?
    
36.       color = Color.new(rgbs[i+2],rgbs[i+1],rgbs[i],rgbs[i+3])
    
37.       hb.set_pixel(x,y,color)
    
38.       x += 1
    
39.       if x == 640
    
40.         x = 0
    
41.         y += 1
    
42.       end
    
43.       indexs << i + 4
    
44.     end
    
45.     t2 = Time.now
    
46.     #p t2 - t1
    
47.     return hb
    
48.   end
    
49.   #--------------------------------------------------------------------------
    
50.   # ● bitmap_data
    
51.   #   获取当前画面的数据部分```
    
52.   #   RGB依然是调转过来了`= =``
    
53.   #--------------------------------------------------------------------------
    
54.   def bitmap_data
    
55.     hScrDC = CreateDC.call("DISPLAY", "", "", 0)
    
56.     hMemDC = CreateCompatibleDC.call(hScrDC)
    
57.     hBitmap = CreateCompatibleBitmap.call(hScrDC, 640, 480)
    
58.     #BitBlt.call(hDC, 0, 0, 640, 480, hDC(0), 0, 0, SRCCOPY)
    
59.     hOldBitmap = SelectObject.call(hMemDC, hBitmap)
    
60.     BitBlt.call(hMemDC, xsrc, ysrc, 640*2, 480*2, hScrDC, 0, 0, SRCCOPY)
    
61.     hBitmap = SelectObject.call(hMemDC, hOldBitmap)
    
62.     dwCount = (640 * 480 * 4) * 2
    
63.     lpBits = "\000" * dwCount
    
64.     GetBitmapBits.call(hBitmap, dwCount, lpBits)
    
65.     lpBits.delete!("\000")
    
66.     return lpBits.unpack("C*")
    
67.   end
    
68.   #--------------------------------------------------------------------------
    
69.   # ● 获取DC场景...
    
70.   #--------------------------------------------------------------------------
    
71.   def hDC(*h)
    
72.     if h == []
    
73.       return GetWindowDC.call(hWnd)
    
74.     else
    
75.       return GetDC.call(*h)
    
76.     end
    
77.   end
    
78.   #--------------------------------------------------------------------------
    
79.   # ● 用户窗口的位置
    
80.   #--------------------------------------------------------------------------
    
81.   def xsrc
    
82.     return self.point[0]
    
83.   end
    
84.   #--------------------------------------------------------------------------
    
85.   # ● 用户窗口的位置
    
86.   #--------------------------------------------------------------------------
    
87.   def ysrc
    
88.     return self.point[1]
    
89.   end
    
90.   #--------------------------------------------------------------------------
    
91.   # ● 那个点`= =``
    
92.   #--------------------------------------------------------------------------
    
93.   def point
    
94.     point = [0,0].pack("LL")
    
95.     ScreenToClient.call(hWnd, point)
    
96.     return point.unpack("LL")
    
97.   end
    
98.   #--------------------------------------------------------------------------
    
99.   # ● 窗口句柄
    
100.   #--------------------------------------------------------------------------
     
101.   def hWnd
     
102.     game_name = "\0" * 256
     
103.     GetPrivateProfileString.call("Game","Title","",game_name,255,".\\Game.ini")
     
104.     game_name.delete!("\0")
     
105.     return FindWindow.call("RGSS Player",game_name)
     
106.   end
     
107. end

复制代码

看到之前有人问能不能在XP下实现VX的Graphics.snap_to_bitmap
试了一下..然后.这东西就出来了``

就这样吧```
= =```只是理论出品...
因为set_pixel的惊人速度...所以平均一次要4.5秒左右才出来

david50407

有个问题:
当窗体被遮蔽一部份时
截图中会变黑色

suicaoya123

以下引用精灵使者于2008-11-28 11:54:44的发言：

思思啊……这样的话制作XP版新的截图存档就有希望了耶……

对啊!....我的超华丽自制素材游戏就有希望了{/cy}

ONEWateR

发布完毕
http://rpg.blue/web/htm/news1202.htm
vip += 2

yangff

以下引用Una于2008-11-29 21:20:27的发言：


以下引用yangff于2008-11-29 19:31:33的发言：

其实,偷偷的说,我只要一个API


如果自己写DLL的话返回一个指针确实可以....

但是有个问题就是怎么把PICTURE转成BITMAP

Una

以下引用yangff于2008-11-29 19:31:33的发言：

其实,偷偷的说,我只要一个API

如果自己写DLL的话返回一个指针确实可以....

yangff

其实,偷偷的说,我只要一个API

hide秀

神思前辈也复出了 {/hx}

柳之一

以下引用TERENCE于2008-11-28 13:05:12的发言：


以下引用柳之一于2008-11-28 12:42:16的发言：
xp截图用



以下引用精灵使者于2008-11-28 12:45:42的发言：

根据VX的说明文件。
Graphics.snap_to_bitmap (RGSS2)
将当前游戏画面截图存为位图对象。
所指向的是显现出来的图像，与调用 freeze 方法没有关联。
所生成的位图在不使用时必须被释放掉。


感谢二位高手的解释
......

龙皇客气了