一个子类化重绘仿QQ2009

来源:互联网 发布:nginx lua 写入txt 编辑:程序博客网 时间:2024/06/07 15:04
Option ExplicitPrivate Type RECT        Left        As Long        Top         As Long        Right       As Long        Bottom      As LongEnd TypePrivate Type RECTW        Left        As Long        Top         As Long        Right       As Long        Bottom      As Long        Width       As Long        Height      As LongEnd TypePrivate Type PAINTSTRUCT        hDC As Long        fErase As Long        rcPaint As RECT        fRestore As Long        fIncUpdate As Long        rgbReserved(32) As ByteEnd TypePrivate Type TRACKMOUSEEVENTTYPE    cbSize      As Long    dwFlags     As Long    hwndTrack   As Long    dwHoverTime As LongEnd TypePrivate Type WINDOWPOS   hWnd                     As Long   hWndInsertAfter          As Long   X                        As Long   Y                        As Long   cx                       As Long   cy                       As Long   Flags                    As LongEnd TypePrivate Type NCCALCSIZE_PARAMS   rgrc(0 To 2)             As RECT   lppos                    As LongEnd TypePrivate Enum DTSTYLE    DT_LEFT = &H0    DT_TOP = &H0    DT_CENTER = &H1    DT_RIGHT = &H2    DT_VCENTER = &H4    DT_BOTTOM = &H8    DT_WORDBREAK = &H10    DT_SINGLELINE = &H20    DT_EXPANDTABS = &H40    DT_TABSTOP = &H80    DT_NOCLIP = &H100    DT_EXTERNALLEADING = &H200    DT_CALCRECT = &H400    DT_NOPREFIX = &H800    DT_INTERNAL = &H1000    DT_EDITCONTROL = &H2000    DT_PATH_ELLIPSIS = &H4000    DT_FORE_ELLIPSIS = &H8000    DT_END_ELLIPSIS = &H8000&    DT_MODIFYSTRING = &H10000    DT_RTLREADING = &H20000    DT_WORD_ELLIPSIS = &H40000End EnumPrivate Const GWL_WNDPROC = (-4)Private Const GWL_STYLE = (-16)Private Const GWL_EXSTYLE = (-20)Private Const BM_SETSTYLE       As Long = &HF4Private Const BS_OWNERDRAW      As Long = &HB&Private Const WM_ACTIVATE       As Long = &H6Private Const WM_GETTEXT        As Long = &HDPrivate Const WM_DESTROY        As Long = &H2Private Const WM_PAINT          As Long = &HFPrivate Const WM_LBUTTONDOWN    As Long = &H201Private Const WM_LBUTTONUP      As Long = &H202Private Const WM_MOUSEMOVE      As Long = &H200Private Const WM_SETFOCUS       As Long = &H7Private Const WM_KILLFOCUS      As Long = &H8Private Const WM_GETFONT        As Long = &H31Private Const WM_SETFONT        As Long = &H30Private Const WM_SIZE           As Long = &H5Private Const WM_MOUSELEAVE     As Long = &H2A3Private Const WM_TIMER          As Long = &H113Private Const WM_ENABLE         As Long = &HAPrivate Const WM_KEYDOWN        As Long = &H100Private Const WM_KEYUP          As Long = &H101Private Const WM_NCCALCSIZE     As Long = &H83Private Const WM_NCPAINT        As Long = &H85Private Const WS_BORDER         As Long = &H800000Private Const WS_EX_CLIENTEDGE  As Long = &H200&Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As LongPrivate Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As LongPrivate Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" (ByVal lpPrevWndFunc As Long, ByVal hWnd As Long, ByVal Msg As Long, ByVal wParam As Long, ByVal lParam As Long) As LongPrivate Declare Function DefWindowProc Lib "user32" Alias "DefWindowProcA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As LongPrivate Declare Function GetProp Lib "user32" Alias "GetPropA" (ByVal hWnd As Long, ByVal lpString As String) As LongPrivate Declare Function RemoveProp Lib "user32" Alias "RemovePropA" (ByVal hWnd As Long, ByVal lpString As String) As LongPrivate Declare Function SetProp Lib "user32" Alias "SetPropA" (ByVal hWnd As Long, ByVal lpString As String, ByVal hData As Long) As LongPrivate Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As LongPrivate Declare Function GetModuleHandleA Lib "kernel32" (ByVal lpModuleName As String) As LongPrivate Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As LongPrivate Declare Function GetProcAddress Lib "kernel32" (ByVal hModule As Long, ByVal lpProcName As String) As LongPrivate Declare Function FreeLibrary Lib "kernel32" (ByVal hLibModule As Long) As LongPrivate Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)Private Declare Function GetClassName Lib "user32" Alias "GetClassNameA" (ByVal hWnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As LongPrivate Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hWnd As Long, ByVal lpString As String, ByVal cch As Long) As LongPrivate Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hWnd As Long) As LongPrivate Declare Function GetWindowRect Lib "user32" (ByVal hWnd As Long, lpRect As RECT) As LongPrivate Declare Function GetClientRect Lib "user32" (ByVal hWnd As Long, lpRect As RECT) As LongPrivate Declare Function EnumChildWindows Lib "user32" (ByVal hWndParent As Long, ByVal lpEnumFunc As Long, ByVal lParam As Long) As LongPrivate Declare Function IsWindowEnabled Lib "user32" (ByVal hWnd As Long) As LongPrivate Declare Function BeginPaint Lib "user32" (ByVal hWnd As Long, lpPaint As PAINTSTRUCT) As LongPrivate Declare Function EndPaint Lib "user32" (ByVal hWnd As Long, lpPaint As PAINTSTRUCT) As LongPrivate Declare Function TrackMouseEvent Lib "user32.dll" (ByRef lpEventTrack As TRACKMOUSEEVENTTYPE) As Long ' Win98 or laterPrivate Declare Function TrackMouseEvent2 Lib "comctl32.dll" Alias "_TrackMouseEvent" (ByRef lpEventTrack As TRACKMOUSEEVENTTYPE) As Long ' Win95 w/ IE 3.0Private Declare Function SetTimer Lib "user32" (ByVal hWnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long) As LongPrivate Declare Function KillTimer Lib "user32" (ByVal hWnd As Long, ByVal nIDEvent As Long) As LongPrivate Declare Function RedrawWindow Lib "user32" (ByVal hWnd As Long, lprcUpdate As Any, ByVal hrgnUpdate As Long, ByVal fuRedraw As Long) As LongPrivate Declare Function GetParent Lib "user32" (ByVal hWnd As Long) As LongPrivate Declare Function CreateDCAsNull Lib "gdi32" Alias "CreateDCA" (ByVal lpDriverName As String, lpDeviceName As Any, lpOutput As Any, lpInitData As Any) As LongPrivate Declare Function CreateDC Lib "gdi32" Alias "CreateDCA" (ByVal lpDriverName As String, ByVal lpDeviceName As String, ByVal lpOutput As String, lpInitData As Any) As LongPrivate Declare Function GetDC Lib "user32" (ByVal hWnd As Long) As LongPrivate Declare Function GetWindowDC Lib "user32" (ByVal hWnd As Long) As LongPrivate Declare Function CreateCompatibleDC Lib "gdi32" (ByVal hDC As Long) As LongPrivate Declare Function CreateCompatibleBitmap Lib "gdi32" (ByVal hDC As Long, ByVal nWidth As Long, ByVal nHeight As Long) As LongPrivate Declare Function SelectObject Lib "gdi32" (ByVal hDC As Long, ByVal hObject As Long) As LongPrivate Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As LongPrivate Declare Function DeleteDC Lib "gdi32" (ByVal hDC As Long) As LongPrivate Declare Function ReleaseDC Lib "user32" (ByVal hWnd As Long, ByVal hDC As Long) As LongPrivate Declare Function SetPixel Lib "gdi32" (ByVal hDC As Long, ByVal X As Long, ByVal Y As Long, ByVal crColor As Long) As LongPrivate Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As LongPrivate Declare Function StretchBlt Lib "gdi32" (ByVal hDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal nSrcWidth As Long, ByVal nSrcHeight As Long, ByVal dwRop As Long) As LongPrivate Declare Function AlphaBlend Lib "msimg32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal widthSrc As Long, ByVal heightSrc As Long, ByVal blendFunct As Long) As BooleanPrivate Declare Function SetTextColor Lib "gdi32" (ByVal hDC As Long, ByVal crColor As Long) As LongPrivate Declare Function DrawText Lib "user32" Alias "DrawTextA" (ByVal hDC As Long, ByVal lpStr As String, ByVal nCount As Long, lpRect As RECT, ByVal wFormat As Long) As LongPrivate Declare Function SetBkMode Lib "gdi32" (ByVal hDC As Long, ByVal nBkMode As Long) As LongPrivate Declare Function DrawFocusRect Lib "user32" (ByVal hDC As Long, lpRect As RECT) As LongPrivate Declare Function GetFocus Lib "user32" () As LongPrivate Declare Function CreateRoundRectRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long, ByVal X3 As Long, ByVal Y3 As Long) As LongPrivate Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long, ByVal hRgn As Long, ByVal bRedraw As Boolean) As LongPrivate Declare Function FrameRect Lib "user32" (ByVal hDC As Long, lpRect As RECT, ByVal hBrush As Long) As LongPrivate Declare Function CreateSolidBrush Lib "gdi32" (ByVal crColor As Long) As LongPrivate Declare Function FillRect Lib "user32" (ByVal hDC As Long, lpRect As RECT, ByVal hBrush As Long) As LongPrivate Declare Function Rectangle Lib "gdi32" (ByVal hDC As Long, ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As LongPrivate Declare Function GetBkColor Lib "gdi32" (ByVal hDC As Long) As LongPrivate m_Init              As Boolean  '保存是否已经初始化Private m_SrcDC             As LongPrivate m_bTrackHandler32   As BooleanPrivate m_ButtonCount       As Long     '保存子类化的窗口和按钮个数,以便在销毁所有窗口和按钮之后可以释放资源Private m_DialogCount       As LongPublic Function Attach(ByVal hWnd As Long) As Long    If m_Init = False Then        m_Init = True        m_bTrackHandler32 = IsFunctionSupported("TrackMouseEvent", "User32")        Call pInit    End If    Select Case LCase(pGetClassName(hWnd))        Case "thundercommandbutton", "thunderrt6commandbutton", "button"            Attach = AttachButton(hWnd)                            Case "#32770", "thunderformdc", "thunderrt6formdc", "form"            Call EnumChildWindows(hWnd, AddressOf pEnumChildProc, ByVal 0&)            Attach = AttachDialog(hWnd)                Case Else            Debug.Print LCase(pGetClassName(hWnd))                End SelectEnd FunctionPublic Function Detach(ByVal hWnd As Long) As Long    Select Case LCase(pGetClassName(hWnd))        Case "thundercommandbutton", "thunderrt6commandbutton", "button"            Detach = DetachButton(hWnd)                            Case "#32770", "thunderformdc", "thunderrt6formdc", "form"            Call EnumChildWindows(hWnd, AddressOf pDeEnumChildProc, ByVal 0&)            Detach = DetachDialog(hWnd)                End SelectEnd FunctionPrivate Function AttachButton(ByVal hWnd As Long) As Long    If GetProp(hWnd, "PROCADDR") Then Exit Function    Dim i           As Long    Dim m_hDC       As Long    Dim m_mDC(3)    As Long    Dim m_BMP(3)    As Long    Dim m_wRect     As RECTW    m_hDC = GetWindowDC(hWnd)    pGetWindowRectW hWnd, m_wRect    For i = 0 To 3        m_mDC(i) = CreateCompatibleDC(m_hDC)        m_BMP(i) = CreateCompatibleBitmap(m_hDC, m_wRect.Width, m_wRect.Height)        DeleteObject SelectObject(m_mDC(i), m_BMP(i))        SetProp hWnd, "HDC" & CStr(i), m_mDC(i)        SetProp hWnd, "BMP" & CStr(i), m_BMP(i)    Next    Call pDrawMemDC(hWnd)    ReleaseDC hWnd, m_hDC    SendMessage hWnd, BM_SETSTYLE, BS_OWNERDRAW, ByVal True    SetProp hWnd, "MOUSEFLAG", 0    SetProp hWnd, "TIMERID", 0    SetProp hWnd, "OLDSTATE", IIf(IsWindowEnabled(hWnd), 0, 3)    SetProp hWnd, "ALPHALEVEL", 0    SetWindowRgn hWnd, CreateRoundRectRgn(0, 0, m_wRect.Width + 1, m_wRect.Height + 1, 3, 3), True    SetProp hWnd, "PROCADDR", SetWindowLong(hWnd, GWL_WNDPROC, AddressOf ButtonProc)    m_ButtonCount = m_ButtonCount + 1    AttachButton = 1End FunctionPrivate Function DetachButton(ByVal hWnd As Long) As Long    Dim origProc        As Long    origProc = GetProp(hWnd, "PROCADDR")    If origProc = 0 Then Exit Function    Dim m_mDC(3)    As Long    Dim m_BMP(3)    As Long    Dim i As Long    For i = 0 To 3        m_mDC(i) = GetProp(hWnd, "HDC" & CStr(i))        m_BMP(i) = GetProp(hWnd, "BMP" & CStr(i))        DeleteObject m_mDC(i)        DeleteDC m_BMP(i)        RemoveProp hWnd, "HDC" & CStr(i)        RemoveProp hWnd, "BMP" & CStr(i)    Next    Call pKillTimer(hWnd)    RemoveProp hWnd, "MOUSEFLAG"    RemoveProp hWnd, "TIMERID"    RemoveProp hWnd, "OLDSTATE"    RemoveProp hWnd, "ALPHALEVEL"    RemoveProp hWnd, "PROCADDR"    SetWindowLong hWnd, -16, GetWindowLong(hWnd, -16) And Not BS_OWNERDRAW    SetWindowRgn hWnd, 0&, ByVal True    SetWindowLong hWnd, GWL_WNDPROC, origProc    RedrawWindow hWnd, ByVal 0&, ByVal 0&, &H1    m_ButtonCount = m_ButtonCount - 1    If m_ButtonCount <= 0 And m_DialogCount <= 0 Then        DeleteDC m_SrcDC        m_Init = False    End If    DetachButton = 1End FunctionPrivate Function AttachBasic(ByVal hWnd As Long) As Long    If GetProp(hWnd, "PROCADDR") Then Exit Function    SetProp hWnd, "PROCADDR", SetWindowLong(hWnd, GWL_WNDPROC, AddressOf BasicProc)    'RedrawWindow hWnd, ByVal 0&, ByVal 0&, &H2    SendMessage hWnd, WM_NCPAINT, 1&, 0&    AttachBasic = 1End FunctionPrivate Function DetachBasic(ByVal hWnd As Long) As Long    Dim origProc As Long    origProc = GetProp(hWnd, "PROCADDR")    If origProc = 0 Then Exit Function    RemoveProp hWnd, "PROCADDR"    SetWindowLong hWnd, GWL_WNDPROC, origProc    'RedrawWindow hWnd, ByVal 0&, ByVal 0&, &H2    SendMessage hWnd, WM_NCPAINT, 1&, 0&    DetachBasic = 1End FunctionPrivate Function AttachDialog(ByVal hWnd As Long) As Long    If GetProp(hWnd, "PROCADDR") Then Exit Function    SetProp hWnd, "PROCADDR", SetWindowLong(hWnd, GWL_WNDPROC, AddressOf DialogProc)    m_DialogCount = m_DialogCount + 1    AttachDialog = 1End FunctionPrivate Function DetachDialog(ByVal hWnd As Long) As Long    Dim origProc As Long    origProc = GetProp(hWnd, "PROCADDR")    If origProc = 0 Then Exit Function    RemoveProp hWnd, "PROCADDR"    SetWindowLong hWnd, GWL_WNDPROC, origProc    m_DialogCount = m_DialogCount - 1    If m_ButtonCount <= 0 And m_DialogCount <= 0 Then        DeleteDC m_SrcDC        m_Init = False    End If    DetachDialog = 1End FunctionPrivate Function ButtonProc(ByVal hWnd As Long, ByVal uMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As LongDim origProc As LongDim m_hDC    As LongDim m_wRect As RECTW    If hWnd = 0 Then Exit Function    origProc = GetProp(hWnd, "PROCADDR")    If Not origProc = 0 Then        If uMsg = WM_DESTROY Then            Call DetachButton(hWnd)        Else            Select Case uMsg                    Case WM_PAINT                        ButtonProc = False                        Dim mState  As Long                        Dim PS As PAINTSTRUCT                        Call BeginPaint(hWnd, PS)                            Call pGetWindowRectW(hWnd, m_wRect)                            mState = GetProp(hWnd, "OLDSTATE")                            BitBlt PS.hDC, 0, 0, m_wRect.Width, m_wRect.Height, GetProp(hWnd, "HDC" & CStr(mState)), 0, 0, vbSrcCopy                        Call EndPaint(hWnd, PS)                        Exit Function                                        Case WM_SIZE                        ButtonProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)                        Dim i As Long                        Dim m_mDC(3)    As Long                        Dim m_BMP(3)    As Long                        m_hDC = GetWindowDC(hWnd)                        Call pGetWindowRectW(hWnd, m_wRect)                        For i = 0 To 3                            m_mDC(i) = GetProp(hWnd, "HDC" & CStr(i))                            m_BMP(i) = CreateCompatibleBitmap(m_hDC, m_wRect.Width, m_wRect.Height)                            DeleteObject SelectObject(m_mDC(i), m_BMP(i))                        Next                        Call pDrawMemDC(hWnd)                        ReleaseDC hWnd, m_hDC                        SetWindowRgn hWnd, CreateRoundRectRgn(0, 0, m_wRect.Width + 1, m_wRect.Height + 1, 3, 3), True                        Exit Function                                        Case WM_KEYDOWN                        If wParam = 32 Then                            ButtonProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)                            Call SetProp(hWnd, "ALPHALEVEL", 50)                            Call SetProp(hWnd, "OLDSTATE", 2)                            Call pSetTimer(hWnd)                            Exit Function                        End If                                            Case WM_KEYUP                        If wParam = 32 Then                            ButtonProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)                            Call SetProp(hWnd, "MOUSEFLAG", 0)                            Call SetProp(hWnd, "ALPHALEVEL", 0)                            Call SetProp(hWnd, "OLDSTATE", 0)                            Call pSetTimer(hWnd)                            Exit Function                        End If                                        Case WM_LBUTTONDOWN                        ButtonProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)                        Call SetProp(hWnd, "OLDSTATE", 2)                        Call SetProp(hWnd, "ALPHALEVEL", 10)                        Call pSetTimer(hWnd)                        Exit Function                                            Case WM_LBUTTONUP                        ButtonProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)                        Call SetProp(hWnd, "MOUSEFLAG", 0)                        Call SetProp(hWnd, "OLDSTATE", 0)                        Call SetProp(hWnd, "ALPHALEVEL", 0)                        Call pSetTimer(hWnd)                        Exit Function                                            Case WM_MOUSEMOVE                        ButtonProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)                        If GetProp(hWnd, "MOUSEFLAG") = 0 Then                            Call SetProp(hWnd, "MOUSEFLAG", 1)                            Call pTrackMouseTracking(hWnd)                            Call pGetWindowRectW(hWnd, m_wRect)                            'm_hDC = GetWindowDC(hWnd)                            'AlphaBlend m_hDC, 0, 0, m_wRect.Width, m_wRect.Height, GetProp(hWnd, "HDC1"), 0, 0, m_wRect.Width, m_wRect.Height, 50 * &H10000                            'ReleaseDC hWnd, m_hDC                            Call SetProp(hWnd, "OLDSTATE", 1)                            Call SetProp(hWnd, "ALPHALEVEL", 70)                            Call pSetTimer(hWnd)                        End If                        Exit Function                                            Case WM_MOUSELEAVE                        ButtonProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)                        Call SetProp(hWnd, "MOUSEFLAG", 0)                        Call SetProp(hWnd, "OLDSTATE", 0)                        Call SetProp(hWnd, "ALPHALEVEL", 0)                        Call pSetTimer(hWnd)                        Exit Function                                            Case WM_SETFOCUS, WM_KILLFOCUS                        ButtonProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)                        Call pDrawMemDC(hWnd)                        Call SetProp(hWnd, "ALPHALEVEL", 0)                        Call pSetTimer(hWnd)                        Exit Function                                            Case WM_TIMER                        Dim m_sDC   As Long                        Dim m_Level As Long                        Dim m_State As Long                        Call pGetWindowRectW(hWnd, m_wRect)                        m_State = GetProp(hWnd, "OLDSTATE")                        m_Level = GetProp(hWnd, "ALPHALEVEL")                        m_sDC = GetProp(hWnd, "HDC" & CStr(m_State))                        m_hDC = GetWindowDC(hWnd)                        AlphaBlend m_hDC, 0, 0, m_wRect.Width, m_wRect.Height, m_sDC, 0, 0, m_wRect.Width, m_wRect.Height, m_Level * &H10000                        ReleaseDC hWnd, m_hDC                        m_Level = m_Level + 3       '这里的+3是速度,可以改变Timer的时间和+的数值以改变速度                        If m_Level > 255 Then                            Call pKillTimer(hWnd)                            Call SetProp(hWnd, "ALPHALEVEL", 0)                        Else                            Call SetProp(hWnd, "ALPHALEVEL", m_Level)                        End If                                                Case WM_ENABLE                        ButtonProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)                        m_hDC = GetWindowDC(hWnd)                        Call pGetWindowRectW(hWnd, m_wRect)                        If wParam Then                            Call SetProp(hWnd, "OLDSTATE", 0)                            BitBlt m_hDC, 0, 0, m_wRect.Width, m_wRect.Height, GetProp(hWnd, "HDC0"), 0, 0, vbSrcCopy                        Else                            Call SetProp(hWnd, "OLDSTATE", 3)                            BitBlt m_hDC, 0, 0, m_wRect.Width, m_wRect.Height, GetProp(hWnd, "HDC3"), 0, 0, vbSrcCopy                        End If                        ReleaseDC hWnd, m_hDC                        Exit Function                                    End Select            ButtonProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)        End If    Else        ButtonProc = DefWindowProc(hWnd, uMsg, wParam, lParam)    End IfEnd FunctionPrivate Function DialogProc(ByVal hWnd As Long, ByVal uMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As LongDim origProc As Long    If hWnd = 0 Then Exit Function    origProc = GetProp(hWnd, "PROCADDR")    If Not origProc = 0 Then        If uMsg = WM_DESTROY Then            Call DetachDialog(hWnd)        Else            Select Case uMsg                Case WM_ACTIVATE                    If Not (lParam = hWnd Or lParam = 0) Then                        Select Case LCase(pGetClassName(lParam))                            Case "#32770", "thunderformdc", "thunderrt6formdc", "form", "newhelpclass"                                Attach lParam                                                        End Select                    End If            End Select            DialogProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)        End If    Else        DialogProc = DefWindowProc(hWnd, uMsg, wParam, lParam)    End IfEnd FunctionPrivate Function BasicProc(ByVal hWnd As Long, ByVal uMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As LongDim origProc As Long    If hWnd = 0 Then Exit Function    origProc = GetProp(hWnd, "PROCADDR")    If Not origProc = 0 Then        If uMsg = WM_DESTROY Then            Call DetachBasic(hWnd)        Else            Select Case uMsg                    Case WM_NCPAINT                        BasicProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)                        If GetWindowLong(hWnd, GWL_EXSTYLE) And WS_EX_CLIENTEDGE Then                            Dim m_wRect     As RECTW                            Dim m_hDC       As Long                            Dim m_cDC       As Long                            Dim m_Width     As Long                            Dim m_Height    As Long                            Dim i           As Long                            Call pGetWindowRectW(hWnd, m_wRect)                            m_hDC = GetWindowDC(hWnd)                            m_cDC = GetDC(hWnd)                            If IsWindowEnabled(hWnd) Then                                Call pFrameRect(m_hDC, 0, 0, m_wRect.Width, m_wRect.Height, &HD5A554)                            Else                                Call pFrameRect(m_hDC, 0, 0, m_wRect.Width, m_wRect.Height, &HCCCCCC)                            End If                            Call pFrameRect(m_hDC, 1, 1, m_wRect.Width - 2, m_wRect.Height - 2, GetBkColor(m_cDC))                            Call pFrameRect(m_hDC, 2, 2, m_wRect.Width - 4, m_wRect.Height - 4, GetBkColor(m_cDC))                            ReleaseDC hWnd, m_cDC                            ReleaseDC hWnd, m_hDC                        End If                        Exit Function                                                                                    End Select            BasicProc = CallWindowProc(origProc, hWnd, uMsg, wParam, lParam)        End If    Else        BasicProc = DefWindowProc(hWnd, uMsg, wParam, lParam)    End IfEnd FunctionPrivate Function pEnumChildProc(ByVal hWnd As Long, ByVal lParam As Long) As Long    Select Case LCase(pGetClassName(hWnd))        Case "thundercommandbutton", "thunderrt6commandbutton", "button"            Call AttachButton(hWnd)                Case Else            Call AttachBasic(hWnd)                    'Case "#32770", "thunderformdc", "thunderrt6formdc", "form"                End Select    pEnumChildProc = 1End FunctionPrivate Function pDeEnumChildProc(ByVal hWnd As Long, ByVal lParam As Long) As Long    Select Case LCase(pGetClassName(hWnd))        Case "thundercommandbutton", "thunderrt6commandbutton", "button"            Call DetachButton(hWnd)                    Case Else            Call DetachBasic(hWnd)                    'Case "#32770", "thunderformdc", "thunderrt6formdc", "form"                End Select    pDeEnumChildProc = 1End FunctionPrivate Function pGetClassName(ByVal hWnd As Long) As StringOn Error Resume Next    Dim BuffStr     As String    Dim BuffStrLen  As Long    Dim Rtn         As Long    BuffStr = String$(255, Chr(0))    BuffStrLen = Len(BuffStr)    Rtn = GetClassName(hWnd, ByVal BuffStr, BuffStrLen)    If Not Rtn = 0 Then        Dim iPos As Long        iPos = InStr(1, BuffStr, Chr(0)) - 1        If iPos < Len(BuffStr) Then            pGetClassName = Left$(BuffStr, iPos)        Else            pGetClassName = BuffStr        End If    End IfEnd FunctionPrivate Function pGetWindowText(ByVal hWnd As Long) As String    Dim BuffStr     As String    Dim BuffStrLen  As Long    BuffStrLen = GetWindowTextLength(hWnd)    BuffStr = String(BuffStrLen, Chr(0))    Call GetWindowText(hWnd, ByVal BuffStr, BuffStrLen + 1)    pGetWindowText = BuffStrEnd FunctionPrivate Function pGetText(ByVal hWnd As Long) As String    Dim BuffStr As String, BuffStrLen As Long, Rtn As Long    BuffStrLen = GetWindowTextLength(hWnd)    BuffStr = String(BuffStrLen, Chr(0))    Rtn = SendMessage(hWnd, WM_GETTEXT, BuffStrLen + 1, ByVal BuffStr)    pGetText = BuffStrEnd FunctionPrivate Function pDrawText(ByVal hDC As Long, ByVal Text As String, ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long, ByVal lpFlag As DTSTYLE) As Long    Dim TmpRect As RECT    With TmpRect        .Left = X1        .Top = Y1        .Right = X2        .Bottom = Y2    End With    pDrawText = DrawText(hDC, Text, -1, TmpRect, lpFlag)End FunctionPrivate Function pDrawTextL(ByVal hDC As Long, ByVal Text As String, ByVal X As Long, ByVal Y As Long, ByVal Width As Long, ByVal Height As Long, ByVal lpFlag As DTSTYLE) As Long    Dim TmpRect As RECT    With TmpRect        .Left = X        .Top = Y        .Right = X + Width        .Bottom = Y + Height    End With    pDrawTextL = DrawText(hDC, Text, -1, TmpRect, lpFlag)End FunctionPrivate Function pGetWindowRectW(ByVal hWnd As Long, lpRectW As RECTW) As Long    Dim TmpRect As RECT    Dim Rtn     As Long    Rtn = GetWindowRect(hWnd, TmpRect)    With lpRectW        .Left = TmpRect.Left        .Top = TmpRect.Top        .Right = TmpRect.Right        .Bottom = TmpRect.Bottom        .Width = TmpRect.Right - TmpRect.Left        .Height = TmpRect.Bottom - TmpRect.Top    End With    pGetWindowRectW = RtnEnd FunctionPrivate Function pDrawFocusRect(ByVal hDC As Long, ByVal X As Long, ByVal Y As Long, ByVal Width As Long, ByVal Height As Long) As Long    Dim TmpRect As RECT    With TmpRect        .Left = X        .Top = Y        .Right = X + Width        .Bottom = Y + Height    End With    pDrawFocusRect = DrawFocusRect(hDC, TmpRect)End FunctionPrivate Function pFrameRect(ByVal hDC As Long, ByVal X As Long, Y As Long, ByVal Width As Long, ByVal Height As Long, ByVal Color As Long) As Long    Dim TmpRect     As RECT    Dim m_hBrush    As Long    With TmpRect        .Left = X        .Top = Y        .Right = X + Width        .Bottom = Y + Height    End With    m_hBrush = CreateSolidBrush(Color)    pFrameRect = FrameRect(hDC, TmpRect, m_hBrush)    DeleteObject m_hBrushEnd FunctionPrivate Function pDrawBorderLine(ByVal hWnd As Long, ByVal State As Long) As Long    Dim m_wRect As RECTW    Dim m_hDC   As Long    If GetWindowLong(hWnd, GWL_EXSTYLE) And WS_EX_CLIENTEDGE Then        Call pGetWindowRectW(hWnd, m_wRect)        m_hDC = GetWindowDC(hWnd)        If State = 0 Then            Call pFrameRect(m_hDC, 0, 0, m_wRect.Width, m_wRect.Height, &HD5A554)            Call pFrameRect(m_hDC, 1, 1, m_wRect.Width - 2, m_wRect.Height - 2, &HF4E7D3)        Else            Call pFrameRect(m_hDC, 0, 0, m_wRect.Width, m_wRect.Height, &HF4E7D3)            Call pFrameRect(m_hDC, 1, 1, m_wRect.Width - 2, m_wRect.Height - 2, &HD5A554)        End If        ReleaseDC hWnd, m_hDC        pDrawBorderLine = 1    End IfEnd FunctionPrivate Function pSetTimer(ByVal hWnd As Long) As Long    Dim m_TimerID       As Long    m_TimerID = GetProp(hWnd, "TIMERID")    If m_TimerID Then Exit Function    m_TimerID = SetTimer(hWnd, 1, 15, 0&)    Call SetProp(hWnd, "TIMERID", m_TimerID)    pSetTimer = m_TimerIDEnd FunctionPrivate Function pKillTimer(ByVal hWnd As Long) As Long    Dim m_TimerID       As Long    m_TimerID = GetProp(hWnd, "TIMERID")    If Not m_TimerID Then Exit Function    Call SetProp(hWnd, "TIMERID", 0)    pKillTimer = KillTimer(hWnd, m_TimerID)End FunctionPrivate Function IsFunctionSupported(sFunction As String, sModule As String) As Boolean    Dim hModule As Long        hModule = GetModuleHandleA(sModule)            If (hModule = 0) Then        hModule = LoadLibrary(sModule)    End If        If (hModule) Then        If (GetProcAddress(hModule, sFunction)) Then            IsFunctionSupported = True        End If        FreeLibrary hModule    End IfEnd FunctionPrivate Sub pTrackMouseTracking(hWnd As Long)    Dim lpEventTrack As TRACKMOUSEEVENTTYPE    With lpEventTrack        .cbSize = Len(lpEventTrack)        .dwFlags = &H2        .hwndTrack = hWnd    End With        If (m_bTrackHandler32) Then        TrackMouseEvent lpEventTrack    Else        TrackMouseEvent2 lpEventTrack    End IfEnd SubPrivate Sub pDrawMemDC(ByVal hWnd As Long)    Dim m_wRect       As RECTW    Dim m_wText       As String    Dim i           As Long    Dim m_hDC(3)    As Long    Call pGetWindowRectW(hWnd, m_wRect)    m_wText = pGetWindowText(hWnd)    For i = 0 To 3        m_hDC(i) = GetProp(hWnd, "HDC" & CStr(i))        SelectObject m_hDC(i), SendMessage(hWnd, WM_GETFONT, 0&, 0&)        SetBkMode m_hDC(i), 1        BitBlt m_hDC(i), 0, 0, 4, 5, m_SrcDC, 0, i * 21, vbSrcCopy        StretchBlt m_hDC(i), 4, 0, m_wRect.Width - 8, 5, m_SrcDC, 4, i * 21, 1, 5, vbSrcCopy        BitBlt m_hDC(i), m_wRect.Width - 4, 0, 4, 5, m_SrcDC, 5, i * 21, vbSrcCopy        StretchBlt m_hDC(i), 0, 5, 4, m_wRect.Height - 10, m_SrcDC, 0, i * 21 + 5, 4, 11, vbSrcCopy        StretchBlt m_hDC(i), m_wRect.Width - 4, 5, 4, m_wRect.Height - 10, m_SrcDC, 5, i * 21 + 5, 4, 11, vbSrcCopy        BitBlt m_hDC(i), 0, m_wRect.Height - 5, 4, 5, m_SrcDC, 0, i * 21 + 16, vbSrcCopy        BitBlt m_hDC(i), m_wRect.Width - 4, m_wRect.Height - 5, 4, 5, m_SrcDC, 5, i * 21 + 16, vbSrcCopy        StretchBlt m_hDC(i), 4, m_wRect.Height - 5, m_wRect.Width - 8, 5, m_SrcDC, 4, i * 21 + 16, 1, 5, vbSrcCopy        StretchBlt m_hDC(i), 4, 5, m_wRect.Width - 8, m_wRect.Height - 10, m_SrcDC, 4, i * 21 + 5, 1, 11, vbSrcCopy        SetTextColor m_hDC(i), IIf(i = 3, &H808080, 0&)        pDrawTextL m_hDC(i), m_wText, 2, 2, m_wRect.Width - 4, m_wRect.Height - 4, DT_CENTER Or DT_VCENTER Or DT_SINGLELINE Or DT_END_ELLIPSIS        If GetFocus = hWnd Then pDrawFocusRect m_hDC(i), 2, 2, m_wRect.Width - 4, m_wRect.Height - 4    NextEnd SubPrivate Sub pInit()Dim TmpDC   As LongDim TmpBMP  As Long    TmpDC = CreateDC("DISPLAY", "", "", ByVal 0&)    TmpBMP = CreateCompatibleBitmap(TmpDC, 9, 84)    m_SrcDC = CreateCompatibleDC(TmpDC)    DeleteObject SelectObject(m_SrcDC, TmpBMP)    DeleteObject TmpBMP    DeleteDC TmpDC        SetPixel m_SrcDC, 0, 0, 15121016        SetPixel m_SrcDC, 1, 0, 14922603        SetPixel m_SrcDC, 2, 0, 14194476        SetPixel m_SrcDC, 3, 0, 13995803        SetPixel m_SrcDC, 4, 0, 13995803        SetPixel m_SrcDC, 5, 0, 13995803        SetPixel m_SrcDC, 6, 0, 14194476        SetPixel m_SrcDC, 7, 0, 14922603        SetPixel m_SrcDC, 8, 0, 15121016        SetPixel m_SrcDC, 0, 1, 14856809        SetPixel m_SrcDC, 1, 1, 15188094        SetPixel m_SrcDC, 2, 1, 16511975        SetPixel m_SrcDC, 3, 1, 16777215        SetPixel m_SrcDC, 4, 1, 16777215        SetPixel m_SrcDC, 5, 1, 16777215        SetPixel m_SrcDC, 6, 1, 16511975        SetPixel m_SrcDC, 7, 1, 15188094        SetPixel m_SrcDC, 8, 1, 14856809        SetPixel m_SrcDC, 0, 2, 14128425        SetPixel m_SrcDC, 1, 2, 16578284        SetPixel m_SrcDC, 2, 2, 16777215        SetPixel m_SrcDC, 3, 2, 16777215        SetPixel m_SrcDC, 4, 2, 16777215        SetPixel m_SrcDC, 5, 2, 16777215        SetPixel m_SrcDC, 6, 2, 16777215        SetPixel m_SrcDC, 7, 2, 16578284        SetPixel m_SrcDC, 8, 2, 14128425        SetPixel m_SrcDC, 0, 3, 13995803        SetPixel m_SrcDC, 1, 3, 16644853        SetPixel m_SrcDC, 2, 3, 16578801        SetPixel m_SrcDC, 3, 3, 16578801        SetPixel m_SrcDC, 4, 3, 16578801        SetPixel m_SrcDC, 5, 3, 16578801        SetPixel m_SrcDC, 6, 3, 16578801        SetPixel m_SrcDC, 7, 3, 16644853        SetPixel m_SrcDC, 8, 3, 13995803        SetPixel m_SrcDC, 0, 4, 13995803        SetPixel m_SrcDC, 1, 4, 16579059        SetPixel m_SrcDC, 2, 4, 16512750        SetPixel m_SrcDC, 3, 4, 16512750        SetPixel m_SrcDC, 4, 4, 16512750        SetPixel m_SrcDC, 5, 4, 16512750        SetPixel m_SrcDC, 6, 4, 16512750        SetPixel m_SrcDC, 7, 4, 16579059        SetPixel m_SrcDC, 8, 4, 13995803        SetPixel m_SrcDC, 0, 5, 13995803        SetPixel m_SrcDC, 1, 5, 16578544        SetPixel m_SrcDC, 2, 5, 16512234        SetPixel m_SrcDC, 3, 5, 16512234        SetPixel m_SrcDC, 4, 5, 16512234        SetPixel m_SrcDC, 5, 5, 16512234        SetPixel m_SrcDC, 6, 5, 16512234        SetPixel m_SrcDC, 7, 5, 16578544        SetPixel m_SrcDC, 8, 5, 13995803        SetPixel m_SrcDC, 0, 6, 13995803        SetPixel m_SrcDC, 1, 6, 16578286        SetPixel m_SrcDC, 2, 6, 16511718        SetPixel m_SrcDC, 3, 6, 16511718        SetPixel m_SrcDC, 4, 6, 16511718        SetPixel m_SrcDC, 5, 6, 16511718        SetPixel m_SrcDC, 6, 6, 16511718        SetPixel m_SrcDC, 7, 6, 16578286        SetPixel m_SrcDC, 8, 6, 13995803        SetPixel m_SrcDC, 0, 7, 13995803        SetPixel m_SrcDC, 1, 7, 16578027        SetPixel m_SrcDC, 2, 7, 16445666        SetPixel m_SrcDC, 3, 7, 16445666        SetPixel m_SrcDC, 4, 7, 16445666        SetPixel m_SrcDC, 5, 7, 16445666        SetPixel m_SrcDC, 6, 7, 16445666        SetPixel m_SrcDC, 7, 7, 16578027        SetPixel m_SrcDC, 8, 7, 13995803        SetPixel m_SrcDC, 0, 8, 13995803        SetPixel m_SrcDC, 1, 8, 16577512        SetPixel m_SrcDC, 2, 8, 16445150        SetPixel m_SrcDC, 3, 8, 16445150        SetPixel m_SrcDC, 4, 8, 16445150        SetPixel m_SrcDC, 5, 8, 16445150        SetPixel m_SrcDC, 6, 8, 16445150        SetPixel m_SrcDC, 7, 8, 16577512        SetPixel m_SrcDC, 8, 8, 13995803        SetPixel m_SrcDC, 0, 9, 13995803        SetPixel m_SrcDC, 1, 9, 16511717        SetPixel m_SrcDC, 2, 9, 16379098        SetPixel m_SrcDC, 3, 9, 16379098        SetPixel m_SrcDC, 4, 9, 16379098        SetPixel m_SrcDC, 5, 9, 16379098        SetPixel m_SrcDC, 6, 9, 16379098        SetPixel m_SrcDC, 7, 9, 16511717        SetPixel m_SrcDC, 8, 9, 13995803        SetPixel m_SrcDC, 0, 10, 13995803        SetPixel m_SrcDC, 1, 10, 16511203        SetPixel m_SrcDC, 2, 10, 16378583        SetPixel m_SrcDC, 3, 10, 16378583        SetPixel m_SrcDC, 4, 10, 16378583        SetPixel m_SrcDC, 5, 10, 16378583        SetPixel m_SrcDC, 6, 10, 16378583        SetPixel m_SrcDC, 7, 10, 16511203        SetPixel m_SrcDC, 8, 10, 13995803        SetPixel m_SrcDC, 0, 11, 13995803        SetPixel m_SrcDC, 1, 11, 16313307        SetPixel m_SrcDC, 2, 11, 16114380        SetPixel m_SrcDC, 3, 11, 16114380        SetPixel m_SrcDC, 4, 11, 16114380        SetPixel m_SrcDC, 5, 11, 16114380        SetPixel m_SrcDC, 6, 11, 16114380        SetPixel m_SrcDC, 7, 11, 16313307        SetPixel m_SrcDC, 8, 11, 13995803        SetPixel m_SrcDC, 0, 12, 13995803        SetPixel m_SrcDC, 1, 12, 16247257        SetPixel m_SrcDC, 2, 12, 15982536        SetPixel m_SrcDC, 3, 12, 15982536        SetPixel m_SrcDC, 4, 12, 15982536        SetPixel m_SrcDC, 5, 12, 15982536        SetPixel m_SrcDC, 6, 12, 15982536        SetPixel m_SrcDC, 7, 12, 16247257        SetPixel m_SrcDC, 8, 12, 13995803        SetPixel m_SrcDC, 0, 13, 13995803        SetPixel m_SrcDC, 1, 13, 16115669        SetPixel m_SrcDC, 2, 13, 15850691        SetPixel m_SrcDC, 3, 13, 15850691        SetPixel m_SrcDC, 4, 13, 15850691        SetPixel m_SrcDC, 5, 13, 15850691        SetPixel m_SrcDC, 6, 13, 15850691        SetPixel m_SrcDC, 7, 13, 16115669        SetPixel m_SrcDC, 8, 13, 13995803        SetPixel m_SrcDC, 0, 14, 13995803        SetPixel m_SrcDC, 1, 14, 16049362        SetPixel m_SrcDC, 2, 14, 15718590        SetPixel m_SrcDC, 3, 14, 15718590        SetPixel m_SrcDC, 4, 14, 15718590        SetPixel m_SrcDC, 5, 14, 15718590        SetPixel m_SrcDC, 6, 14, 15718590        SetPixel m_SrcDC, 7, 14, 16049362        SetPixel m_SrcDC, 8, 14, 13995803        SetPixel m_SrcDC, 0, 15, 13995803        SetPixel m_SrcDC, 1, 15, 15917773        SetPixel m_SrcDC, 2, 15, 15586744        SetPixel m_SrcDC, 3, 15, 15586744        SetPixel m_SrcDC, 4, 15, 15586744        SetPixel m_SrcDC, 5, 15, 15586744        SetPixel m_SrcDC, 6, 15, 15586744        SetPixel m_SrcDC, 7, 15, 15917773        SetPixel m_SrcDC, 8, 15, 13995803        SetPixel m_SrcDC, 0, 16, 13995803        SetPixel m_SrcDC, 1, 16, 15851723        SetPixel m_SrcDC, 2, 16, 15454900        SetPixel m_SrcDC, 3, 16, 15454900        SetPixel m_SrcDC, 4, 16, 15454900        SetPixel m_SrcDC, 5, 16, 15454900        SetPixel m_SrcDC, 6, 16, 15454900        SetPixel m_SrcDC, 7, 16, 15851723        SetPixel m_SrcDC, 8, 16, 13995803        SetPixel m_SrcDC, 0, 17, 13995803        SetPixel m_SrcDC, 1, 17, 15785673        SetPixel m_SrcDC, 2, 17, 15388849        SetPixel m_SrcDC, 3, 17, 15388849        SetPixel m_SrcDC, 4, 17, 15388849        SetPixel m_SrcDC, 5, 17, 15388849        SetPixel m_SrcDC, 6, 17, 15388849        SetPixel m_SrcDC, 7, 17, 15785673        SetPixel m_SrcDC, 8, 17, 13995803        SetPixel m_SrcDC, 0, 18, 14128424        SetPixel m_SrcDC, 1, 18, 15652794        SetPixel m_SrcDC, 2, 18, 15521467        SetPixel m_SrcDC, 3, 18, 15323056        SetPixel m_SrcDC, 4, 18, 15323056        SetPixel m_SrcDC, 5, 18, 15323056        SetPixel m_SrcDC, 6, 18, 15521211        SetPixel m_SrcDC, 7, 18, 15652794        SetPixel m_SrcDC, 8, 18, 14128424        SetPixel m_SrcDC, 0, 19, 14856292        SetPixel m_SrcDC, 1, 19, 14791272        SetPixel m_SrcDC, 2, 19, 15653051        SetPixel m_SrcDC, 3, 19, 15851724        SetPixel m_SrcDC, 4, 19, 15851724        SetPixel m_SrcDC, 5, 19, 15851724        SetPixel m_SrcDC, 6, 19, 15653051        SetPixel m_SrcDC, 7, 19, 14791272        SetPixel m_SrcDC, 8, 19, 14790498        SetPixel m_SrcDC, 0, 20, 14988912        SetPixel m_SrcDC, 1, 20, 14790240        SetPixel m_SrcDC, 2, 20, 14194218        SetPixel m_SrcDC, 3, 20, 13995803        SetPixel m_SrcDC, 4, 20, 13995803        SetPixel m_SrcDC, 5, 20, 13995803        SetPixel m_SrcDC, 6, 20, 14194218        SetPixel m_SrcDC, 7, 20, 14790240        SetPixel m_SrcDC, 8, 20, 14988912        SetPixel m_SrcDC, 0, 21, 15121018        SetPixel m_SrcDC, 1, 21, 14922603        SetPixel m_SrcDC, 2, 21, 14194476        SetPixel m_SrcDC, 3, 21, 13995803        SetPixel m_SrcDC, 4, 21, 13995803        SetPixel m_SrcDC, 5, 21, 13995803        SetPixel m_SrcDC, 6, 21, 14194476        SetPixel m_SrcDC, 7, 21, 14922603        SetPixel m_SrcDC, 8, 21, 15121018        SetPixel m_SrcDC, 0, 22, 14856809        SetPixel m_SrcDC, 1, 22, 15115048        SetPixel m_SrcDC, 2, 22, 16300860        SetPixel m_SrcDC, 3, 22, 16565063        SetPixel m_SrcDC, 4, 22, 16499532        SetPixel m_SrcDC, 5, 22, 16499271        SetPixel m_SrcDC, 6, 22, 16300860        SetPixel m_SrcDC, 7, 22, 15115048        SetPixel m_SrcDC, 8, 22, 14856809        SetPixel m_SrcDC, 0, 23, 14128425        SetPixel m_SrcDC, 1, 23, 16366653        SetPixel m_SrcDC, 2, 23, 16702093        SetPixel m_SrcDC, 3, 23, 16771255        SetPixel m_SrcDC, 4, 23, 16772550        SetPixel m_SrcDC, 5, 23, 16771255        SetPixel m_SrcDC, 6, 23, 16702093        SetPixel m_SrcDC, 7, 23, 16366653        SetPixel m_SrcDC, 8, 23, 14128425        SetPixel m_SrcDC, 0, 24, 13995803        SetPixel m_SrcDC, 1, 24, 16499014        SetPixel m_SrcDC, 2, 24, 16638894        SetPixel m_SrcDC, 3, 24, 16640966        SetPixel m_SrcDC, 4, 24, 16576210        SetPixel m_SrcDC, 5, 24, 16640965        SetPixel m_SrcDC, 6, 24, 16704688        SetPixel m_SrcDC, 7, 24, 16499014        SetPixel m_SrcDC, 8, 24, 13995803        SetPixel m_SrcDC, 0, 25, 13995803        SetPixel m_SrcDC, 1, 25, 16499274        SetPixel m_SrcDC, 2, 25, 16639930        SetPixel m_SrcDC, 3, 25, 16642003        SetPixel m_SrcDC, 4, 25, 16577247        SetPixel m_SrcDC, 5, 25, 16642003        SetPixel m_SrcDC, 6, 25, 16639931        SetPixel m_SrcDC, 7, 25, 16499274        SetPixel m_SrcDC, 8, 25, 13995803        SetPixel m_SrcDC, 0, 26, 13995803        SetPixel m_SrcDC, 1, 26, 16499532        SetPixel m_SrcDC, 2, 26, 16640192        SetPixel m_SrcDC, 3, 26, 16642265        SetPixel m_SrcDC, 4, 26, 16577252        SetPixel m_SrcDC, 5, 26, 16642265        SetPixel m_SrcDC, 6, 26, 16640192        SetPixel m_SrcDC, 7, 26, 16499532        SetPixel m_SrcDC, 8, 26, 13995803        SetPixel m_SrcDC, 0, 27, 13995803        SetPixel m_SrcDC, 1, 27, 16499532        SetPixel m_SrcDC, 2, 27, 16639936        SetPixel m_SrcDC, 3, 27, 16642265        SetPixel m_SrcDC, 4, 27, 16577250        SetPixel m_SrcDC, 5, 27, 16642265        SetPixel m_SrcDC, 6, 27, 16639936        SetPixel m_SrcDC, 7, 27, 16499532        SetPixel m_SrcDC, 8, 27, 13995803        SetPixel m_SrcDC, 0, 28, 13995803        SetPixel m_SrcDC, 1, 28, 16499532        SetPixel m_SrcDC, 2, 28, 16574399        SetPixel m_SrcDC, 3, 28, 16576728        SetPixel m_SrcDC, 4, 28, 16511456        SetPixel m_SrcDC, 5, 28, 16576728        SetPixel m_SrcDC, 6, 28, 16574399        SetPixel m_SrcDC, 7, 28, 16499532        SetPixel m_SrcDC, 8, 28, 13995803        SetPixel m_SrcDC, 0, 29, 13995803        SetPixel m_SrcDC, 1, 29, 16499275        SetPixel m_SrcDC, 2, 29, 16574140        SetPixel m_SrcDC, 3, 29, 16576470        SetPixel m_SrcDC, 4, 29, 16511197        SetPixel m_SrcDC, 5, 29, 16576470        SetPixel m_SrcDC, 6, 29, 16574140        SetPixel m_SrcDC, 7, 29, 16499275        SetPixel m_SrcDC, 8, 29, 13995803        SetPixel m_SrcDC, 0, 30, 13995803        SetPixel m_SrcDC, 1, 30, 16499274        SetPixel m_SrcDC, 2, 30, 16573882        SetPixel m_SrcDC, 3, 30, 16576212        SetPixel m_SrcDC, 4, 30, 16510683        SetPixel m_SrcDC, 5, 30, 16576212        SetPixel m_SrcDC, 6, 30, 16573882        SetPixel m_SrcDC, 7, 30, 16499274        SetPixel m_SrcDC, 8, 30, 13995803        SetPixel m_SrcDC, 0, 31, 13995803        SetPixel m_SrcDC, 1, 31, 16499274        SetPixel m_SrcDC, 2, 31, 16573625        SetPixel m_SrcDC, 3, 31, 16575955        SetPixel m_SrcDC, 4, 31, 16510425        SetPixel m_SrcDC, 5, 31, 16575955        SetPixel m_SrcDC, 6, 31, 16573625        SetPixel m_SrcDC, 7, 31, 16499274        SetPixel m_SrcDC, 8, 31, 13995803        SetPixel m_SrcDC, 0, 32, 13995803        SetPixel m_SrcDC, 1, 32, 16432966        SetPixel m_SrcDC, 2, 32, 16375214        SetPixel m_SrcDC, 3, 32, 16443081        SetPixel m_SrcDC, 4, 32, 16245963        SetPixel m_SrcDC, 5, 32, 16443081        SetPixel m_SrcDC, 6, 32, 16375214        SetPixel m_SrcDC, 7, 32, 16432966        SetPixel m_SrcDC, 8, 32, 13995803        SetPixel m_SrcDC, 0, 33, 13995803        SetPixel m_SrcDC, 1, 33, 16432965        SetPixel m_SrcDC, 2, 33, 16243370        SetPixel m_SrcDC, 3, 33, 16311494        SetPixel m_SrcDC, 4, 33, 16114119        SetPixel m_SrcDC, 5, 33, 16311494        SetPixel m_SrcDC, 6, 33, 16243370        SetPixel m_SrcDC, 7, 33, 16432965        SetPixel m_SrcDC, 8, 33, 13995803        SetPixel m_SrcDC, 0, 34, 13995803        SetPixel m_SrcDC, 1, 34, 16367172        SetPixel m_SrcDC, 2, 34, 16177319        SetPixel m_SrcDC, 3, 34, 16245443        SetPixel m_SrcDC, 4, 34, 15982274        SetPixel m_SrcDC, 5, 34, 16245443        SetPixel m_SrcDC, 6, 34, 16177319        SetPixel m_SrcDC, 7, 34, 16367172        SetPixel m_SrcDC, 8, 34, 13995803        SetPixel m_SrcDC, 0, 35, 13995803        SetPixel m_SrcDC, 1, 35, 16301378        SetPixel m_SrcDC, 2, 35, 16045730        SetPixel m_SrcDC, 3, 35, 16113855        SetPixel m_SrcDC, 4, 35, 15915964        SetPixel m_SrcDC, 5, 35, 16113855        SetPixel m_SrcDC, 6, 35, 16045730        SetPixel m_SrcDC, 7, 35, 16301378        SetPixel m_SrcDC, 8, 35, 13995803        SetPixel m_SrcDC, 0, 36, 13995803        SetPixel m_SrcDC, 1, 36, 16301121        SetPixel m_SrcDC, 2, 36, 15979165        SetPixel m_SrcDC, 3, 36, 16113082        SetPixel m_SrcDC, 4, 36, 15849399        SetPixel m_SrcDC, 5, 36, 16113082        SetPixel m_SrcDC, 6, 36, 15979165        SetPixel m_SrcDC, 7, 36, 16301121        SetPixel m_SrcDC, 8, 36, 13995803        SetPixel m_SrcDC, 0, 37, 13995803        SetPixel m_SrcDC, 1, 37, 16300861        SetPixel m_SrcDC, 2, 37, 15978646        SetPixel m_SrcDC, 3, 37, 16046769        SetPixel m_SrcDC, 4, 37, 15717807        SetPixel m_SrcDC, 5, 37, 16046769        SetPixel m_SrcDC, 6, 37, 15978644        SetPixel m_SrcDC, 7, 37, 16300862        SetPixel m_SrcDC, 8, 37, 13995803        SetPixel m_SrcDC, 0, 38, 13995803        SetPixel m_SrcDC, 1, 38, 16300601        SetPixel m_SrcDC, 2, 38, 16109711        SetPixel m_SrcDC, 3, 38, 15979679        SetPixel m_SrcDC, 4, 38, 15914151        SetPixel m_SrcDC, 5, 38, 16045987        SetPixel m_SrcDC, 6, 38, 15977608        SetPixel m_SrcDC, 7, 38, 16300601        SetPixel m_SrcDC, 8, 38, 13995803        SetPixel m_SrcDC, 0, 39, 14128424        SetPixel m_SrcDC, 1, 39, 16168499        SetPixel m_SrcDC, 2, 39, 16238960        SetPixel m_SrcDC, 3, 39, 15977607        SetPixel m_SrcDC, 4, 39, 15979161        SetPixel m_SrcDC, 5, 39, 15911814        SetPixel m_SrcDC, 6, 39, 16239217        SetPixel m_SrcDC, 7, 39, 16168501        SetPixel m_SrcDC, 8, 39, 14128424        SetPixel m_SrcDC, 0, 40, 14856292        SetPixel m_SrcDC, 1, 40, 15048997        SetPixel m_SrcDC, 2, 40, 16168243        SetPixel m_SrcDC, 3, 40, 16366652        SetPixel m_SrcDC, 4, 40, 16300863        SetPixel m_SrcDC, 5, 40, 16300603        SetPixel m_SrcDC, 6, 40, 16168499        SetPixel m_SrcDC, 7, 40, 15048996        SetPixel m_SrcDC, 8, 40, 14790498        SetPixel m_SrcDC, 0, 41, 15055480        SetPixel m_SrcDC, 1, 41, 14790240        SetPixel m_SrcDC, 2, 41, 14194218        SetPixel m_SrcDC, 3, 41, 13995803        SetPixel m_SrcDC, 4, 41, 13995803        SetPixel m_SrcDC, 5, 41, 13995803        SetPixel m_SrcDC, 6, 41, 14194218        SetPixel m_SrcDC, 7, 41, 14790240        SetPixel m_SrcDC, 8, 41, 15055480        SetPixel m_SrcDC, 0, 42, 15121018        SetPixel m_SrcDC, 1, 42, 14922603        SetPixel m_SrcDC, 2, 42, 14194476        SetPixel m_SrcDC, 3, 42, 13995803        SetPixel m_SrcDC, 4, 42, 13995803        SetPixel m_SrcDC, 5, 42, 13995803        SetPixel m_SrcDC, 6, 42, 14194476        SetPixel m_SrcDC, 7, 42, 14922603        SetPixel m_SrcDC, 8, 42, 15121018        SetPixel m_SrcDC, 0, 43, 14856809        SetPixel m_SrcDC, 1, 43, 15114530        SetPixel m_SrcDC, 2, 43, 16299312        SetPixel m_SrcDC, 3, 43, 16497721        SetPixel m_SrcDC, 4, 43, 16432187        SetPixel m_SrcDC, 5, 43, 16431928        SetPixel m_SrcDC, 6, 43, 16233775        SetPixel m_SrcDC, 7, 43, 15114531        SetPixel m_SrcDC, 8, 43, 14856809        SetPixel m_SrcDC, 0, 44, 14128425        SetPixel m_SrcDC, 1, 44, 16299566        SetPixel m_SrcDC, 2, 44, 16304495        SetPixel m_SrcDC, 3, 44, 15977606        SetPixel m_SrcDC, 4, 44, 16110747        SetPixel m_SrcDC, 5, 44, 16043143        SetPixel m_SrcDC, 6, 44, 16304237        SetPixel m_SrcDC, 7, 44, 16233772        SetPixel m_SrcDC, 8, 44, 14128425        SetPixel m_SrcDC, 0, 45, 13995803        SetPixel m_SrcDC, 1, 45, 16365361        SetPixel m_SrcDC, 2, 45, 15911555        SetPixel m_SrcDC, 3, 45, 15979679        SetPixel m_SrcDC, 4, 45, 15650202        SetPixel m_SrcDC, 5, 45, 15978907        SetPixel m_SrcDC, 6, 45, 16043658        SetPixel m_SrcDC, 7, 45, 16365361        SetPixel m_SrcDC, 8, 45, 13995803        SetPixel m_SrcDC, 0, 46, 13995803        SetPixel m_SrcDC, 1, 46, 16365621        SetPixel m_SrcDC, 2, 46, 15912077        SetPixel m_SrcDC, 3, 46, 15980459        SetPixel m_SrcDC, 4, 46, 15650725        SetPixel m_SrcDC, 5, 46, 15980460        SetPixel m_SrcDC, 6, 46, 15912335        SetPixel m_SrcDC, 7, 46, 16365621        SetPixel m_SrcDC, 8, 46, 13995803        SetPixel m_SrcDC, 0, 47, 13995803        SetPixel m_SrcDC, 1, 47, 16365879        SetPixel m_SrcDC, 2, 47, 15847061        SetPixel m_SrcDC, 3, 47, 15980979        SetPixel m_SrcDC, 4, 47, 15651245        SetPixel m_SrcDC, 5, 47, 15980980        SetPixel m_SrcDC, 6, 47, 15912597        SetPixel m_SrcDC, 7, 47, 16365879        SetPixel m_SrcDC, 8, 47, 13995803        SetPixel m_SrcDC, 0, 48, 13995803        SetPixel m_SrcDC, 1, 48, 16365882        SetPixel m_SrcDC, 2, 48, 15913114        SetPixel m_SrcDC, 3, 48, 15981495        SetPixel m_SrcDC, 4, 48, 15717554        SetPixel m_SrcDC, 5, 48, 15981495        SetPixel m_SrcDC, 6, 48, 15913114        SetPixel m_SrcDC, 7, 48, 16365882        SetPixel m_SrcDC, 8, 48, 13995803        SetPixel m_SrcDC, 0, 49, 13995803        SetPixel m_SrcDC, 1, 49, 16366139        SetPixel m_SrcDC, 2, 49, 15979423        SetPixel m_SrcDC, 3, 49, 16113084        SetPixel m_SrcDC, 4, 49, 15849400        SetPixel m_SrcDC, 5, 49, 16113084        SetPixel m_SrcDC, 6, 49, 15979423        SetPixel m_SrcDC, 7, 49, 16366139        SetPixel m_SrcDC, 8, 49, 13995803        SetPixel m_SrcDC, 0, 50, 13995803        SetPixel m_SrcDC, 1, 50, 16431932        SetPixel m_SrcDC, 2, 50, 16111267        SetPixel m_SrcDC, 3, 50, 16179647        SetPixel m_SrcDC, 4, 50, 15915965        SetPixel m_SrcDC, 5, 50, 16179647        SetPixel m_SrcDC, 6, 50, 16111267        SetPixel m_SrcDC, 7, 50, 16431932        SetPixel m_SrcDC, 8, 50, 13995803        SetPixel m_SrcDC, 0, 51, 13995803        SetPixel m_SrcDC, 1, 51, 16432189        SetPixel m_SrcDC, 2, 51, 16177319        SetPixel m_SrcDC, 3, 51, 16310979        SetPixel m_SrcDC, 4, 51, 16047810        SetPixel m_SrcDC, 5, 51, 16310979        SetPixel m_SrcDC, 6, 51, 16177319        SetPixel m_SrcDC, 7, 51, 16432189        SetPixel m_SrcDC, 8, 51, 13995803        SetPixel m_SrcDC, 0, 52, 13995803        SetPixel m_SrcDC, 1, 52, 16497983        SetPixel m_SrcDC, 2, 52, 16308906        SetPixel m_SrcDC, 3, 52, 16377029        SetPixel m_SrcDC, 4, 52, 16179654        SetPixel m_SrcDC, 5, 52, 16377029        SetPixel m_SrcDC, 6, 52, 16308906        SetPixel m_SrcDC, 7, 52, 16497983        SetPixel m_SrcDC, 8, 52, 13995803        SetPixel m_SrcDC, 0, 53, 13995803        SetPixel m_SrcDC, 1, 53, 16564034        SetPixel m_SrcDC, 2, 53, 16507573        SetPixel m_SrcDC, 3, 53, 16509903        SetPixel m_SrcDC, 4, 53, 16444116        SetPixel m_SrcDC, 5, 53, 16509903        SetPixel m_SrcDC, 6, 53, 16507573        SetPixel m_SrcDC, 7, 53, 16564034        SetPixel m_SrcDC, 8, 53, 13995803        SetPixel m_SrcDC, 0, 54, 13995803        SetPixel m_SrcDC, 1, 54, 16564291        SetPixel m_SrcDC, 2, 54, 16507831        SetPixel m_SrcDC, 3, 54, 16510161        SetPixel m_SrcDC, 4, 54, 16444631        SetPixel m_SrcDC, 5, 54, 16510161        SetPixel m_SrcDC, 6, 54, 16507831        SetPixel m_SrcDC, 7, 54, 16564291        SetPixel m_SrcDC, 8, 54, 13995803        SetPixel m_SrcDC, 0, 55, 13995803        SetPixel m_SrcDC, 1, 55, 16564292        SetPixel m_SrcDC, 2, 55, 16573625        SetPixel m_SrcDC, 3, 55, 16575956        SetPixel m_SrcDC, 4, 55, 16510426        SetPixel m_SrcDC, 5, 55, 16575956        SetPixel m_SrcDC, 6, 55, 16573625        SetPixel m_SrcDC, 7, 55, 16564292        SetPixel m_SrcDC, 8, 55, 13995803        SetPixel m_SrcDC, 0, 56, 13995803        SetPixel m_SrcDC, 1, 56, 16564549        SetPixel m_SrcDC, 2, 56, 16573884        SetPixel m_SrcDC, 3, 56, 16576214        SetPixel m_SrcDC, 4, 56, 16510941        SetPixel m_SrcDC, 5, 56, 16576214        SetPixel m_SrcDC, 6, 56, 16573884        SetPixel m_SrcDC, 7, 56, 16564549        SetPixel m_SrcDC, 8, 56, 13995803        SetPixel m_SrcDC, 0, 57, 13995803        SetPixel m_SrcDC, 1, 57, 16564548        SetPixel m_SrcDC, 2, 57, 16574141        SetPixel m_SrcDC, 3, 57, 16576470        SetPixel m_SrcDC, 4, 57, 16511456        SetPixel m_SrcDC, 5, 57, 16576470        SetPixel m_SrcDC, 6, 57, 16574141        SetPixel m_SrcDC, 7, 57, 16564548        SetPixel m_SrcDC, 8, 57, 13995803        SetPixel m_SrcDC, 0, 58, 13995803        SetPixel m_SrcDC, 1, 58, 16564290        SetPixel m_SrcDC, 2, 58, 16574136        SetPixel m_SrcDC, 3, 58, 16576209        SetPixel m_SrcDC, 4, 58, 16511195        SetPixel m_SrcDC, 5, 58, 16576209        SetPixel m_SrcDC, 6, 58, 16574136        SetPixel m_SrcDC, 7, 58, 16564290        SetPixel m_SrcDC, 8, 58, 13995803        SetPixel m_SrcDC, 0, 59, 13995803        SetPixel m_SrcDC, 1, 59, 16564030        SetPixel m_SrcDC, 2, 59, 16704686        SetPixel m_SrcDC, 3, 59, 16640707        SetPixel m_SrcDC, 4, 59, 16576209        SetPixel m_SrcDC, 5, 59, 16640707        SetPixel m_SrcDC, 6, 59, 16638636        SetPixel m_SrcDC, 7, 59, 16564030        SetPixel m_SrcDC, 8, 59, 13995803        SetPixel m_SrcDC, 0, 60, 14128424        SetPixel m_SrcDC, 1, 60, 16431414        SetPixel m_SrcDC, 2, 60, 16701318        SetPixel m_SrcDC, 3, 60, 16639150        SetPixel m_SrcDC, 4, 60, 16705726        SetPixel m_SrcDC, 5, 60, 16639150        SetPixel m_SrcDC, 6, 60, 16701320        SetPixel m_SrcDC, 7, 60, 16431670        SetPixel m_SrcDC, 8, 60, 14128424        SetPixel m_SrcDC, 0, 61, 14856292        SetPixel m_SrcDC, 1, 61, 15115045        SetPixel m_SrcDC, 2, 61, 16366135        SetPixel m_SrcDC, 3, 61, 16630080        SetPixel m_SrcDC, 4, 61, 16564806        SetPixel m_SrcDC, 5, 61, 16564288        SetPixel m_SrcDC, 6, 61, 16366135        SetPixel m_SrcDC, 7, 61, 15115045        SetPixel m_SrcDC, 8, 61, 14790498        SetPixel m_SrcDC, 0, 62, 14988912        SetPixel m_SrcDC, 1, 62, 14790240        SetPixel m_SrcDC, 2, 62, 14194218        SetPixel m_SrcDC, 3, 62, 13995803        SetPixel m_SrcDC, 4, 62, 13995803        SetPixel m_SrcDC, 5, 62, 13995803        SetPixel m_SrcDC, 6, 62, 14194218        SetPixel m_SrcDC, 7, 62, 14790240        SetPixel m_SrcDC, 8, 62, 14988912        SetPixel m_SrcDC, 0, 63, 14474460        SetPixel m_SrcDC, 1, 63, 14211288        SetPixel m_SrcDC, 2, 63, 12895428        SetPixel m_SrcDC, 3, 63, 12566463        SetPixel m_SrcDC, 4, 63, 12566463        SetPixel m_SrcDC, 5, 63, 12566463        SetPixel m_SrcDC, 6, 63, 12895428        SetPixel m_SrcDC, 7, 63, 14211288        SetPixel m_SrcDC, 8, 63, 14474460        SetPixel m_SrcDC, 0, 64, 14145495        SetPixel m_SrcDC, 1, 64, 14540253        SetPixel m_SrcDC, 2, 64, 16119285        SetPixel m_SrcDC, 3, 64, 16777215        SetPixel m_SrcDC, 4, 64, 16777215        SetPixel m_SrcDC, 5, 64, 16777215        SetPixel m_SrcDC, 6, 64, 16119285        SetPixel m_SrcDC, 7, 64, 14540253        SetPixel m_SrcDC, 8, 64, 14145495        SetPixel m_SrcDC, 0, 65, 12829635        SetPixel m_SrcDC, 1, 65, 16250871        SetPixel m_SrcDC, 2, 65, 16777215        SetPixel m_SrcDC, 3, 65, 16777215        SetPixel m_SrcDC, 4, 65, 16777215        SetPixel m_SrcDC, 5, 65, 16777215        SetPixel m_SrcDC, 6, 65, 16777215        SetPixel m_SrcDC, 7, 65, 16250871        SetPixel m_SrcDC, 8, 65, 12829635        SetPixel m_SrcDC, 0, 66, 12566463        SetPixel m_SrcDC, 1, 66, 16514043        SetPixel m_SrcDC, 2, 66, 16316664        SetPixel m_SrcDC, 3, 66, 16316664        SetPixel m_SrcDC, 4, 66, 16316664        SetPixel m_SrcDC, 5, 66, 16316664        SetPixel m_SrcDC, 6, 66, 16316664        SetPixel m_SrcDC, 7, 66, 16514043        SetPixel m_SrcDC, 8, 66, 12566463        SetPixel m_SrcDC, 0, 67, 12566463        SetPixel m_SrcDC, 1, 67, 16382457        SetPixel m_SrcDC, 2, 67, 16250871        SetPixel m_SrcDC, 3, 67, 16250871        SetPixel m_SrcDC, 4, 67, 16250871        SetPixel m_SrcDC, 5, 67, 16250871        SetPixel m_SrcDC, 6, 67, 16250871        SetPixel m_SrcDC, 7, 67, 16382457        SetPixel m_SrcDC, 8, 67, 12566463        SetPixel m_SrcDC, 0, 68, 12566463        SetPixel m_SrcDC, 1, 68, 16316664        SetPixel m_SrcDC, 2, 68, 16119285        SetPixel m_SrcDC, 3, 68, 16119285        SetPixel m_SrcDC, 4, 68, 16119285        SetPixel m_SrcDC, 5, 68, 16119285        SetPixel m_SrcDC, 6, 68, 16119285        SetPixel m_SrcDC, 7, 68, 16316664        SetPixel m_SrcDC, 8, 68, 12566463        SetPixel m_SrcDC, 0, 69, 12566463        SetPixel m_SrcDC, 1, 69, 16316664        SetPixel m_SrcDC, 2, 69, 16053492        SetPixel m_SrcDC, 3, 69, 16053492        SetPixel m_SrcDC, 4, 69, 16053492        SetPixel m_SrcDC, 5, 69, 16053492        SetPixel m_SrcDC, 6, 69, 16053492        SetPixel m_SrcDC, 7, 69, 16316664        SetPixel m_SrcDC, 8, 69, 12566463        SetPixel m_SrcDC, 0, 70, 12566463        SetPixel m_SrcDC, 1, 70, 16185078        SetPixel m_SrcDC, 2, 70, 15921906        SetPixel m_SrcDC, 3, 70, 15921906        SetPixel m_SrcDC, 4, 70, 15921906        SetPixel m_SrcDC, 5, 70, 15921906        SetPixel m_SrcDC, 6, 70, 15921906        SetPixel m_SrcDC, 7, 70, 16185078        SetPixel m_SrcDC, 8, 70, 12566463        SetPixel m_SrcDC, 0, 71, 12566463        SetPixel m_SrcDC, 1, 71, 16119285        SetPixel m_SrcDC, 2, 71, 15856113        SetPixel m_SrcDC, 3, 71, 15856113        SetPixel m_SrcDC, 4, 71, 15856113        SetPixel m_SrcDC, 5, 71, 15856113        SetPixel m_SrcDC, 6, 71, 15856113        SetPixel m_SrcDC, 7, 71, 16119285        SetPixel m_SrcDC, 8, 71, 12566463        SetPixel m_SrcDC, 0, 72, 12566463        SetPixel m_SrcDC, 1, 72, 16053492        SetPixel m_SrcDC, 2, 72, 15724527        SetPixel m_SrcDC, 3, 72, 15724527        SetPixel m_SrcDC, 4, 72, 15724527        SetPixel m_SrcDC, 5, 72, 15724527        SetPixel m_SrcDC, 6, 72, 15724527        SetPixel m_SrcDC, 7, 72, 16053492        SetPixel m_SrcDC, 8, 72, 12566463        SetPixel m_SrcDC, 0, 73, 12566463        SetPixel m_SrcDC, 1, 73, 15987699        SetPixel m_SrcDC, 2, 73, 15658734        SetPixel m_SrcDC, 3, 73, 15658734        SetPixel m_SrcDC, 4, 73, 15658734        SetPixel m_SrcDC, 5, 73, 15658734        SetPixel m_SrcDC, 6, 73, 15658734        SetPixel m_SrcDC, 7, 73, 15987699        SetPixel m_SrcDC, 8, 73, 12566463        SetPixel m_SrcDC, 0, 74, 12566463        SetPixel m_SrcDC, 1, 74, 15724527        SetPixel m_SrcDC, 2, 74, 15263976        SetPixel m_SrcDC, 3, 74, 15263976        SetPixel m_SrcDC, 4, 74, 15263976        SetPixel m_SrcDC, 5, 74, 15263976        SetPixel m_SrcDC, 6, 74, 15263976        SetPixel m_SrcDC, 7, 74, 15724527        SetPixel m_SrcDC, 8, 74, 12566463        SetPixel m_SrcDC, 0, 75, 12566463        SetPixel m_SrcDC, 1, 75, 15658734        SetPixel m_SrcDC, 2, 75, 15066597        SetPixel m_SrcDC, 3, 75, 15066597        SetPixel m_SrcDC, 4, 75, 15066597        SetPixel m_SrcDC, 5, 75, 15066597        SetPixel m_SrcDC, 6, 75, 15066597        SetPixel m_SrcDC, 7, 75, 15658734        SetPixel m_SrcDC, 8, 75, 12566463        SetPixel m_SrcDC, 0, 76, 12566463        SetPixel m_SrcDC, 1, 76, 15527148        SetPixel m_SrcDC, 2, 76, 14935011        SetPixel m_SrcDC, 3, 76, 14935011        SetPixel m_SrcDC, 4, 76, 14935011        SetPixel m_SrcDC, 5, 76, 14935011        SetPixel m_SrcDC, 6, 76, 14935011        SetPixel m_SrcDC, 7, 76, 15527148        SetPixel m_SrcDC, 8, 76, 12566463        SetPixel m_SrcDC, 0, 77, 12566463        SetPixel m_SrcDC, 1, 77, 15395562        SetPixel m_SrcDC, 2, 77, 14737632        SetPixel m_SrcDC, 3, 77, 14737632        SetPixel m_SrcDC, 4, 77, 14737632        SetPixel m_SrcDC, 5, 77, 14737632        SetPixel m_SrcDC, 6, 77, 14737632        SetPixel m_SrcDC, 7, 77, 15395562        SetPixel m_SrcDC, 8, 77, 12566463        SetPixel m_SrcDC, 0, 78, 12566463        SetPixel m_SrcDC, 1, 78, 15198183        SetPixel m_SrcDC, 2, 78, 14540253        SetPixel m_SrcDC, 3, 78, 14540253        SetPixel m_SrcDC, 4, 78, 14540253        SetPixel m_SrcDC, 5, 78, 14540253        SetPixel m_SrcDC, 6, 78, 14540253        SetPixel m_SrcDC, 7, 78, 15198183        SetPixel m_SrcDC, 8, 78, 12566463        SetPixel m_SrcDC, 0, 79, 12566463        SetPixel m_SrcDC, 1, 79, 15132390        SetPixel m_SrcDC, 2, 79, 14408667        SetPixel m_SrcDC, 3, 79, 14408667        SetPixel m_SrcDC, 4, 79, 14408667        SetPixel m_SrcDC, 5, 79, 14408667        SetPixel m_SrcDC, 6, 79, 14408667        SetPixel m_SrcDC, 7, 79, 15132390        SetPixel m_SrcDC, 8, 79, 12566463        SetPixel m_SrcDC, 0, 80, 12566463        SetPixel m_SrcDC, 1, 80, 15066597        SetPixel m_SrcDC, 2, 80, 14277081        SetPixel m_SrcDC, 3, 80, 14277081        SetPixel m_SrcDC, 4, 80, 14277081        SetPixel m_SrcDC, 5, 80, 14277081        SetPixel m_SrcDC, 6, 80, 14277081        SetPixel m_SrcDC, 7, 80, 15066597        SetPixel m_SrcDC, 8, 80, 12566463        SetPixel m_SrcDC, 0, 81, 12829635        SetPixel m_SrcDC, 1, 81, 14671839        SetPixel m_SrcDC, 2, 81, 14606046        SetPixel m_SrcDC, 3, 81, 14211288        SetPixel m_SrcDC, 4, 81, 14211288        SetPixel m_SrcDC, 5, 81, 14211288        SetPixel m_SrcDC, 6, 81, 14606046        SetPixel m_SrcDC, 7, 81, 14671839        SetPixel m_SrcDC, 8, 81, 12829635        SetPixel m_SrcDC, 0, 82, 14013909        SetPixel m_SrcDC, 1, 82, 14079702        SetPixel m_SrcDC, 2, 82, 14671839        SetPixel m_SrcDC, 3, 82, 15132390        SetPixel m_SrcDC, 4, 82, 15132390        SetPixel m_SrcDC, 5, 82, 15132390        SetPixel m_SrcDC, 6, 82, 14671839        SetPixel m_SrcDC, 7, 82, 14079702        SetPixel m_SrcDC, 8, 82, 14013909        SetPixel m_SrcDC, 0, 83, 14211288        SetPixel m_SrcDC, 1, 83, 13948116        SetPixel m_SrcDC, 2, 83, 12895428        SetPixel m_SrcDC, 3, 83, 12566463        SetPixel m_SrcDC, 4, 83, 12566463        SetPixel m_SrcDC, 5, 83, 12566463        SetPixel m_SrcDC, 6, 83, 12895428        SetPixel m_SrcDC, 7, 83, 13948116        SetPixel m_SrcDC, 8, 83, 14211288End Sub


原创粉丝点击