Hello,
I would like to call the following API, how could I pass parameter to it??
The following API statements are in VB:
'Declarations
**************************
'Private Declare Function SetMenuItemBitmaps Lib "user32" (ByVal hMenu
As Long, ByVal nPosition As Long, ByVal wFlags As Long, ByVal
hBitmapUnchecked As Long, ByVal hBitmapChecked As Long) As Long
'Private Declare Function GetMenu Lib "user32" (ByVal hwnd As Long) As
Long
'Private Declare Function GetSubMenu Lib "user32" (ByVal hMenu As Long,
ByVal nPos As Long) As Long
SetMenuItemBitmaps _
GetSubMenu(GetMenu(Me.hwnd), 0), 1, _
&H400, Picture1.Picture, 0
How could I do call API as above which menu added in my Top Level form?
Regard
John
I am not the most powerful man in this world.
I am not the worst man in this world either.
I just as same as all of you.
I still need to learn from my mistakes...