#pragma message enable nosimpint
#endif
+#include "wx/motif/private.h"
+
IMPLEMENT_ABSTRACT_CLASS(wxControl, wxWindow)
BEGIN_EVENT_TABLE(wxControl, wxWindow)
return ret;
}
-wxControl::~wxControl()
+bool wxControl::CreateControl(wxWindow *parent,
+ wxWindowID id,
+ const wxPoint& pos,
+ const wxSize& size,
+ long style,
+ const wxValidator& validator,
+ const wxString& name)
{
- // If we delete an item, we should initialize the parent panel,
- // because it could now be invalid.
- if ( GetParent()->panel->GetDefaultItem() == this)
- panel->SetDefaultItem(NULL);
+ if( !wxControlBase::CreateControl( parent, id, pos, size, style,
+ validator, name ) )
+ return FALSE;
+
+ m_backgroundColour = parent->GetBackgroundColour();
+ m_foregroundColour = parent->GetForegroundColour();
+ m_font = parent->GetFont();
+
+ return TRUE;
}
void wxControl::SetLabel(const wxString& label)
if (!widget)
return;
- wxStripMenuCodes((char*) (const char*) label, wxBuffer);
+ wxString buf(wxStripMenuCodes(label));
+ wxXmString label_str(buf);
- XmString text = XmStringCreateSimple (wxBuffer);
XtVaSetValues (widget,
- XmNlabelString, text,
+ XmNlabelString, label_str(),
XmNlabelType, XmSTRING,
NULL);
- XmStringFree (text);
}
wxString wxControl::GetLabel() const
return wxEmptyString;
XmString text;
- char *s;
XtVaGetValues (widget,
XmNlabelString, &text,
NULL);
- if (XmStringGetLtoR (text, XmSTRING_DEFAULT_CHARSET, &s))
- {
- wxString str(s);
- XtFree (s);
- XmStringFree(text);
- return str;
- }
- else
- {
- // XmStringFree(text);
- return wxEmptyString;
- }
+ return wxXmStringToString( text );
}
bool wxControl::ProcessCommand(wxCommandEvent & event)