MenuBarのunderlineについて質問

[zrllch]

イメージ：
　Menu
----------------------------------------------------------------------------------------------
下記のソースによって、MenuBarを表示されると、underlineがついています。
どうやって除けますか？
{curl 7.0 applet}
{curl-file-attributes character-encoding = "shift-jis"}
{let menu-bar1:MenuBar=
{MenuBar
use-look-and-feel? = false,
font-weight = "normal",
font-size = 12px,
control-color = "beige",
margin = 0px,
background = "beige",
height = 20px,
{SubMenu
label = {localize "ズーム"}
}
}
}
{CommandButton
label="Show MenuBar",
{on Action do
{let view:View = {View menu-bar1}}
{view.show}
}
}
よろしくお願いします。

[ashimo]

スタイルシートを設定して消せます。
たとえば以下のようにしてみてください。

Code:

{curl 7.0 applet}
{curl-file-attributes character-encoding = "shift-jis"}
{install-style-sheet
    {StyleSheet
        {StyleRule
            "MenuBar/divider",
            border-style = BorderStyle.none
        }
    }
}
{let menu-bar1:MenuBar=
    {MenuBar
        use-look-and-feel? = false,
        font-weight = "normal",
        font-size = 12px,
        control-color = "beige",
        margin = 0px,
        background = "beige",
        height = 20px,
        {SubMenu
            label = {localize "ズーム"}
        }
    }
}
{CommandButton
    label="Show MenuBar",
    {on Action do
        {let view:View = {View menu-bar1}}
        {view.show}
    }
}