Menu Bar Alignment

[Richard Kelly]

If you want to right align in a menu bar as I've seen "Help" right aligned many times, the following will do the trick.

Code Select Expand


Function MAIN_WM_CREATE ( _
                        hWndForm As Dword, _      ' handle of Form
                        ByVal UserData As Long _  ' optional user defined Long value
                        ) As Long

Local udtMenuItemInfo   As MENUITEMINFO

' Right align the menu Help item

    udtMenuItemInfo.cbsize = SizeOf(udtMenuItemInfo)
    udtMenuItemInfo.fmask = %MIIM_FTYPE
    GetMenuItemInfo (HWND_MAIN_TOPMENU, IDC_MAIN_MNUHELP, %FALSE, udtMenuItemInfo)
    udtMenuItemInfo.ftype = udtMenuItemInfo.ftype Or %MFT_RIGHTJUSTIFY
    SetMenuItemInfo (HWND_MAIN_TOPMENU, IDC_MAIN_MNUHELP, %FALSE, udtMenuItemInfo)


***Note posted to wrong forum

Rick Kelly

[Rolf Brandt]

Thanks for that one, Rick. I remember spending quite some time on that years ago until I got it achieved in VB6.

[José Roca]

Or you can call the AfxRightJustifyMenuItem wrapper function.

[Richard Kelly]

Or you can call the AfxRightJustifyMenuItem wrapper function.

I have to find or start a list of your functions. I've already spent several hours just opening up your *.inc files and browsing through them. I must have missed that one or, at my somewhat advanced age, the memory bank is just overloaded.....

Rick Kelly

[José Roca]

There is a huge help file available:
http://www.jose.it-berater.org/smfforum/index.php?topic=4425.msg15815#msg15815

[David Kenny]

Jose,

Both the 2.05 API headers and the help file downloaded as .PHP files.  I simply changed the extension to .RAR and was able to open and extract both.

[Richard Kelly]

There is a huge help file available:
http://www.jose.it-berater.org/smfforum/index.php?topic=4425.msg15815#msg15815

Wow! That baby gets a shortcut on my desktop....

[José Roca]

Both the 2.05 API headers and the help file downloaded as .PHP files.  I simply changed the extension to .RAR and was able to open and extract both.

It's a problem of FireFly 8. Try right clicking the link and using Save link as, or use another browser.

[Haakon Birkeland]

FireFly 8

I want that update too! 8oÞ

[José Roca]

I mean FireFox 8. Sorry.

[David Kenny]

Well,  that's what I get for blindly clicking OK on an "update ready" message.  Sorry to bother you with a problem I caused myself.