PureBasic Forums - English

Posted: **Sat Jan 22, 2011 10:03 am**

gnozal wrote:
jassing wrote:
gnozal wrote:When you rename a gadget (enumeration constant) in gadget properties, the code you added manually via code infusion is now also updated
Awesome change! thanks.
An additional note : since the infused code is plain text, PureFORM is performing a simple ReplaceString().

Yikes. So #ComboBox_1 is changed to #cboDatabase
and #ComboBox_11 is changed to #cboDatabase1
good to know; but as a simple replace, I think it will cause more grief to the unsuspecting

Posted: **Sat Jan 22, 2011 11:05 am**

I have updated PureFORM.

It now does some additional checks before replacing constants in code infusion to avoid the situation you have described in your previous post.

Posted: **Sat Jan 22, 2011 11:26 am**

hi
How to implement the interface documentation in other languages
For example: Japanese Chinese Korean

Posted: **Sat Jan 22, 2011 11:41 am**

puer wrote:How to implement the interface documentation in other languages
For example: Japanese Chinese Korean

Hi,
PureFORM itself is currently only available in english.
You may enable 'multilanguage support' in Preferences to prepare multilanguage support for your project.
However, it may not work well with Japanese / Chinese / Korean as PureFORM is an old project written in PB3.94 with no unicode support.

Posted: **Sat Jan 22, 2011 10:49 pm**

In pureform, you have the help menu item right aligned; can this be done w/in the pureform menu designer?

Posted: **Sat Jan 22, 2011 11:21 pm**

Hi, I don't use a Visual Designer, but this is how I do it after I create a menu...
http://www.purebasic.fr/english/viewtop ... 57#p315457

Posted: **Sat Jan 22, 2011 11:29 pm**

Thanks -- I'm getting so much windows specific code in, I'm loosing grip/hopes of my ability to get out a linux version... So much that is normally 'standard faire' for a language/framework is ending up platform specific... Can't be the speed for delivery tho...

but thank you -- does exactly what's needed.
and it works with putting multiple menu's to the right.
Thank you for sharing.

Posted: **Sat Jan 22, 2011 11:41 pm**

Very true. The slightest departure from the most vanilla GUI winds up involving some platform specific API or a contrived collection of basic gadgets.

Posted: **Sat Jan 22, 2011 11:43 pm**

skywalk wrote:Very true. The slightest departure from the most vanilla GUI winds up involving some platform specific API or a contrived collection of basic gadgets.

Don't suppose you have a linux version of the rightmenu?

Yes, I'm finding that out, either very basic, or a bunch of compilerif's.

Posted: **Sat Jan 22, 2011 11:51 pm**

Sorry, no Linux development yet.

Posted: **Sun Jan 23, 2011 3:44 am**

Could you do it with fixed-length strings, padding the left hand side with spaces? The only snag there is that it limits you to fonts that work well in columns.

Posted: **Sun Jan 23, 2011 3:58 am**

Thank you for your reply.
look forward to the early support for Unicode.

Posted: **Mon Jan 24, 2011 8:52 am**

jassing wrote:In pureform, you have the help menu item right aligned; can this be done w/in the pureform menu designer?

I am using #MFT_RIGHTJUSTIFY, like in skywalk's post.
This is currently not supported by the PureFORM menu designer.

Posted: **Mon Jan 24, 2011 9:44 am**

from ; skywalk

; comment justifier une partie du menu a droite (ici le menu help)
Procedure menuRJustify(hwnd.l, menuindex.l)
         ; de skywalk
         ; menuindex is the index of the main menu, counting from 0.
        Define.l hMenu
        Define.MENUITEMINFO mnuIteminfo
        hMenu = GetMenu_ (hwnd)
         With mnuIteminfo
                \cbSize = sizeof (MENUITEMINFO)
                \fMask = #MIIM_FTYPE
                 GetMenuItemInfo_ (hMenu, menuindex, #True , mnuIteminfo)
                \fType = \fType | #MFT_RIGHTJUSTIFY
                 SetMenuItemInfo_ (hMenu, menuindex, #True , mnuIteminfo)
         EndWith
         ; This makes the changes stick!
         DrawMenuBar_ (hwnd) ; Repaint top level Menu
EndProcedure

If openwindow (0, 100, 200, 195, 260, "Help Menu Right Justified" , #PB_Window_SystemMenu | #PB_Window_SizeGadget )
        hwnd= windowid (0)
         If createmenu (0, windowid (0))
                 menutitle ( "Project" )
                 menuitem (0, "New" )
                 menuitem (1, "Open" )
                 menuitem (2, "Save" )
                 menutitle ( "Tool" )
                 menuitem (0, "1" )
                 menuitem (1, "2" )
                 menuitem (2, "3" )
                 menutitle ( "Help" )
                 menuitem (0, "1" )
                 menuitem (1, "2" )
                 menuitem (2, "3" )
         EndIf
        menuRJustify(hwnd, 2) ; 0-based index of main menu items to right justify
         Repeat
                Event = waitwindowevent ()
                 Select Event
                         Case #PB_Event_CloseWindow ; If the user has pressed on the close button
                                Quit = 1
                 EndSelect
         Until Quit = 1
EndIf
End

Posted: **Wed Jan 26, 2011 5:37 pm**

I have a formset where the main window has a menu. No problem.
On a child form, I wanted to add a menu;
I got as far as this: (note, I can't add another title, or menu item)

PureBasic Forums - English

PureFORM 1.99 (yet another FORM designer)

Re: PureFORM 1.99 (yet another FORM designer)

Re: PureFORM 1.99 (yet another FORM designer)

Re: PureFORM 1.99 (yet another FORM designer)

Re: PureFORM 1.99 (yet another FORM designer)

Right aligning a menu option?

Re: Right aligning a menu option?

Re: Right aligning a menu option?

Re: Right aligning a menu option?

Re: Right aligning a menu option?

Re: Right aligning a menu option?

Re: Right aligning a menu option?

Re: PureFORM 1.99 (yet another FORM designer)

Re: Right aligning a menu option?

Re: PureFORM 1.99 (yet another FORM designer)

Multiple menu's via menu builder?