Declare Function GetObjectA Lib "gdi32" Alias "GetObjectA" (ByVal hObject As IntPtr, ByVal nCount As Integer, ByVal lpObject As BITMAP) As Integer
Dim hDC As IntPtr = g.GetHdc()
ret = GetObjectA(hDC, Len(DdbInfo), DdbInfo)’ここがエラー!
エラー内容は「MDAに関する情報を取得します。」という。
エラーを回避する方法をご存知の方がいらしたら教えてください。
> 回避する方法
回避っていうか・・・
少なくとも、APIの宣言(第3引数)を間違ってますよね・・・
ツイート | ![]() |