Here is a simpler example.

{curl 4.0 applet}
{curl-file-attributes character-encoding = "windows-latin-1"}
{MenuBar
   {VBox
       {SubMenu label = "hello"}
   }
}


The problem here is the presence of VBox around the MenuBar. If you
remove it things will be fine.
-- Kamal

----- Original Message ----- From: "Friedger" <[EMAIL PROTECTED]>
To: <curlbreaker-l@curl.com>
Sent: Thursday, December 08, 2005 5:56 PM
Subject: Re: MenuManager and MenuItem.get-prev


Hi,

I managed to extract the behaviour in a simple example as shown below.

There error does not occur when {MenuBar} is replaced by {MenuBar
{MenuAction}}

Friedger



{curl 4.0 applet}
{curl-file-attributes character-encoding = "windows-latin-1"}
{applet manifest = "manifest.mcurl"
}

{let m:MenuBar = {MenuBar}}
{do
   {(m.child.graphic asa VBox).replace-with
       {VBox
           {SubMenu
               menu-pane = {MenuPane
                               use-look-and-feel? = false,
                               {VBox {MenuAction label = "A"},
                                   {MenuAction label = "B"}}
                           },
               label = "Label"

           },
           "Some text"
       }
   }
}

{{Dialog m}.show}





*******************************************
To unsubscribe from this list, send a mail to:
mailto:[EMAIL PROTECTED]
To contact a human list administrator, send a mail to:
mailto:[EMAIL PROTECTED]
To recieve a list of other options for this list, send a mail to:
mailto:[EMAIL PROTECTED]



*******************************************
To unsubscribe from this list, send a mail to:
mailto:[EMAIL PROTECTED]
To contact a human list administrator, send a mail to:
mailto:[EMAIL PROTECTED]
To recieve a list of other options for this list, send a mail to:
mailto:[EMAIL PROTECTED]



*******************************************
To unsubscribe from this list, send a mail to:
mailto:[EMAIL PROTECTED]
To contact a human list administrator, send a mail to:
mailto:[EMAIL PROTECTED]
To recieve a list of other options for this list, send a mail to:
mailto:[EMAIL PROTECTED]

Reply via email to