Ignore:
Timestamp:
Jul 26, 2007, 5:43:54 PM (17 years ago)
Author:
イグトランス (egtra)
Message:

wtypes.abを追加

File:
1 edited

Legend:

Unmodified
Added
Removed
  • Include/windows/WindowHandle.sbp

    r282 r285  
    4141Declare Function _System_SetScrollInfo Lib "user32" Alias "SetScrollInfo" (hWnd As HWND, fnBar As Long, ByRef lpsi As SCROLLINFO, bRedraw As Long) As BOOL
    4242Declare Function _System_GetSystemMenu Lib "user32" Alias "GetSystemMenu" (hWnd As HWND, bRevert As BOOL) As HMENU
     43Declare Function _System_GetDC Lib "gdi32" Alias "GetDC" (hwnd As HWND) As HDC
     44Declare Function _System_ReleaseDC Lib "gdi32" Alias "ReleaseDC" (hwnd As HWND, hdc As HDC) As BOOL
    4345
    4446Class WindowHandle
     
    147149
    148150    Function GetDC() As HDC
    149         Return GetDC(hwnd)
     151        Return _System_GetDC(hwnd)
    150152    End Function
    151153
     
    171173
    172174    Const Function GetParent() As WindowHandle
    173         Dim w As WindowHandle(_System_GetParent(hwnd))
    174         Return w
     175        Return New WindowHandle(_System_GetParent(hwnd))
    175176    End Function
    176177
     
    368369
    369370    Function ReleaseDC(hdc As HDC) As Boolean
    370         Return ReleaseDC(hwnd, hdc) As Boolean
     371        Return _System_ReleaseDC(hwnd, hdc) As Boolean
    371372    End Function
    372373
Note: See TracChangeset for help on using the changeset viewer.