【汉化任务简报】#27 图片交集像素抽出程序 - 冒险解谜游戏中文网 ChinaAVG

引用第1楼肥牛于2009-06-03 20:13发表的 :, l* ^, f1 S) y! _) _6 _
查找像素的问题不难，难的是识别成文本文件。OCR的技术还是比较困难的。对于英文字体来说，26个字母+数字+符号可以生成码表查找，但是存在几个问题：2 Q/ l3 Y& @* B/ I% a, ]
1、每个字符的宽度不同，这样在获取的时候有一定困难；( R( U! Z l7 X7 h; e
2、文字字体假如不同，就需要建立不同的对码表；
" _, H& I9 T* [" s$ @" x3、如果是汉字，那需要的码表就更复杂了
" m# \9 K# ]' x) \" j暂时只想到这些。

Option Explicit
Private Declare Function GetPixel _
Lib "gdi32" (ByVal hdc As Long, _
ByVal x As Long, _
ByVal y As Long) As Long
Private Sub cmdText_Click()
With picBox
.Cls
.ForeColor = vbYellow
picBox.Print "This is a test."
End With
End Sub
Private Sub cmdWork_Click()
Dim x As Single, y As Single, w As Single, h As Single
Dim strOut As String, strTmp As String, lngTmp As Long
With picBox
w = .Width
h = .Height
End With
strOut = ""
strTmp = ""
For x = 0 To w
For y = 0 To h
lngTmp = GetPixel(picBox.hdc, x, y)
If lngTmp = 0 Then
strTmp = "x:" & x & " y:" & y & vbNewLine
strOut = strOut & strTmp
End If
Next
Next
txtOut = strOut
End Sub
Private Sub cmdXor_Click()
With picBox
.DrawMode = vbXorPen
picBox.Line (0, 0)-(.Width, .Height), vbYellow, BF
End With
End Sub

复制代码

public void DrawXORRectangle( Graphics grp,
int X1, int Y1, int X2, int Y2 )
{
// Extract the Win32 HDC from the Graphics object supplied.
IntPtr hdc = grp.GetHdc();
// Create a pen with a dotted style to draw the border of the
// rectangle.
IntPtr gdiPen = CreatePen( penStyle,
1, BLACK_PEN );
// Set the ROP cdrawint mode to XOR.
SetROP2( hdc, R2_XORPEN );
// Select the pen into the device context.
IntPtr oldPen = SelectObject( hdc, gdiPen );
// Create a stock NULL_BRUSH brush and select it into the device
// context so that the rectangle isn 't filled.
IntPtr oldBrush = SelectObject( hdc,
GetStockObject( NULL_BRUSH ) );
// Now XOR the hollow rectangle on the Graphics object with
// a dotted outline.
Rectangle( hdc, X1, Y1, X2, Y2 );
// Put the old stuff back where it was.
SelectObject( hdc, oldBrush ); // no need to delete a stock object
SelectObject( hdc, oldPen );
DeleteObject( gdiPen ); // but we do need to delete the pen
// Return the device context to Windows.
grp.ReleaseHdc( hdc );
}

复制代码

引用第9楼sspking于2009-06-04 22:06发表的 :
8 |' [2 l/ z4 k0 |8 E2 F1 `/ r这个事情不难，我给你写个小程式~
; Q/ c+ r/ W4 `! M, x) F4 J! v就是取一个图片，把图片中所有的指定颜色的XY坐标集输出到TXT中对吧？