- Widget borderWidget = NULL;
-
- // Decorate the label widget if a border style is specified.
- if (style & wxSIMPLE_BORDER)
- {
- borderWidget = XtVaCreateManagedWidget
- (
- "simpleBorder",
- xmFrameWidgetClass, parentWidget,
- XmNshadowType, XmSHADOW_ETCHED_IN,
- XmNshadowThickness, 1,
- NULL
- );
- } else if (style & wxSUNKEN_BORDER)
- {
- borderWidget = XtVaCreateManagedWidget
- (
- "sunkenBorder",
- xmFrameWidgetClass, parentWidget,
- XmNshadowType, XmSHADOW_IN,
- NULL
- );
- } else if (style & wxRAISED_BORDER)
- {
- borderWidget = XtVaCreateManagedWidget
- (
- "raisedBorder",
- xmFrameWidgetClass, parentWidget,
- XmNshadowType, XmSHADOW_OUT,
- NULL
- );
- }
-
-#if 0 // gcc 2.95 doesn't like this apparently
- // Use XmStringCreateLtoR(), since XmStringCreateSimple
- // doesn't obey separators.
-// XmString text = XmStringCreateSimple (label1);
- wxXmString text( label1 );
-#endif // 0
-
- wxXmString text( label );
-
- WXFontType fontType = m_font.GetFontType(XtDisplay(parentWidget));
-
- m_labelWidget = XtVaCreateManagedWidget (wxConstCast(name.c_str(), char),
- xmLabelWidgetClass,
- borderWidget ? borderWidget : parentWidget,
- wxFont::GetFontTag(), fontType,
- XmNlabelString, text(),
- XmNalignment,
- ((style & wxALIGN_RIGHT) ? XmALIGNMENT_END :
- ((style & wxALIGN_CENTRE) ? XmALIGNMENT_CENTER :
- XmALIGNMENT_BEGINNING)),
- NULL);
+ Widget borderWidget =
+ (Widget) wxCreateBorderWidget( (WXWidget)parentWidget, style );
+ wxXmString text( wxStripMenuCodes( label ) );
+
+ m_labelWidget =
+ XtVaCreateManagedWidget (wxConstCast(name.c_str(), char),
+ xmLabelWidgetClass,
+ borderWidget ? borderWidget : parentWidget,
+ wxFont::GetFontTag(), m_font.GetFontTypeC(XtDisplay(parentWidget)),
+ XmNlabelString, text(),
+ XmNalignment, ((style & wxALIGN_RIGHT) ? XmALIGNMENT_END :
+ ((style & wxALIGN_CENTRE) ? XmALIGNMENT_CENTER :
+ XmALIGNMENT_BEGINNING)),
+ NULL);