【N88互換ﾓｰﾄﾞ】ActiveBasicその10【ｲﾗﾈ】

【N88互換ﾓｰﾄﾞ】ActiveBasicその10【ｲﾗﾈ】 at TECH

652:デフォルトの名無しさん
08/10/18 21:12:13
>>646-650
どういうやり方でもいいが、それを関数にまとめようぜ。
Function　ScreenToClientRECT(hwnd　As　HWND,　ByRef　rc　As　RECT)　As　BOOL
　　　　If　ScreenToClient(hwnd,　ByVal　VarPtr(Rect.left))　Then
　　　　　　　　ScreenToClientRECT　=　ScreenToClient(hwnd,　ByVal　VarPtr(Rect.right))
　　　　End　If
End　Function

次ページ

続きを表示

1を表示