Declare Function RegisterClass Lib "Coredll" Alias "RegisterClassW" ( _ ByRef wc As WNDCLASS _ ) As Integer
Structure WNDCLASS Public style As Long Public lpfnWndProc As Long Public cbClsExtra As Integer Public cbWndExtra As Integer Public hInstance As Long Public hIcon As Long Public hCursor As Long Public hbrBackground As Long Public lpszMenuName As String Public lpszClassName As String End Structure
分類:[.NET]
こんにちわ。
win32apiのRegisterClass関数をVB.NETで使用したいのですが
以下のエラーが発生して動作しません。
対処方法をご存知の方、いらっしゃいましたらお教え下さい。
エラー内容:
System.NotSupportedException' のハンドルされていない例外が
SmartDeviceApplication1.exe で発生しました。
開発環境
Visual Basic .NET 2003
スマートデバイスアプリケーション開発
==== 以下、コード=======================================================
Declare Function RegisterClass Lib "Coredll" Alias "RegisterClassW" ( _
ByRef wc As WNDCLASS _
) As Integer
Structure WNDCLASS
Public style As Long
Public lpfnWndProc As Long
Public cbClsExtra As Integer
Public cbWndExtra As Integer
Public hInstance As Long
Public hIcon As Long
Public hCursor As Long
Public hbrBackground As Long
Public lpszMenuName As String
Public lpszClassName As String
End Structure
Dim wc As WNDCLASS
wc.style = 0
wc.lpfnWndProc = 0
wc.cbClsExtra = 0
wc.cbWndExtra = 4
wc.hInstance = hAppInstance
wc.hIcon = 0
wc.hCursor = 0
wc.hbrBackground = 0
wc.lpszMenuName = 0
wc.lpszClassName = "VideoWindow"
If RegisterClass(wc) = 0 Then
MessageBox.Show("エラー")
End If
==== 以上、コード=======================================================