>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?
>

John, VFP's menus don't use the standard Windows menuing calls. If you decide to implement Windows menus in VFP (which will be difficult, since VFP forms aren't standard windows, either), you'll have a considerable amount of work to do. I haven't done it, and don't have the time to spend working out how to do it. I unfortunately have a job with significant time requirements, which I have to do to pay my bills.

Ed