Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Hwnd
Message
From
15/02/1999 01:24:33
 
General information
Forum:
Visual FoxPro
Category:
Windows API functions
Title:
Re: Hwnd
Miscellaneous
Thread ID:
00187513
Message ID:
00187598
Views:
19
Hi,
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...
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform