#pragma message disable nosimpint
#include "wx/vms_x_fix.h"
#endif
-#include <Xm/Xm.h>
+
#ifdef __VMS
#pragma message enable nosimpint
#endif
#include "wx/fontutil.h" // for wxNativeFontInfo
#include "wx/tokenzr.h"
#include "wx/settings.h"
+#include "wx/x11/private.h"
IMPLEMENT_DYNAMIC_CLASS(wxFont, wxGDIObject)
~wxXFont();
WXFontStructPtr m_fontStruct; // XFontStruct
- WXFontList m_fontList; // Motif XmFontList
WXDisplay* m_display; // XDisplay
int m_scale; // Scale * 100
};
wxXFont::wxXFont()
{
m_fontStruct = (WXFontStructPtr) 0;
- m_fontList = (WXFontList) 0;
m_display = (WXDisplay*) 0;
m_scale = 100;
}
wxXFont::~wxXFont()
{
- XmFontList fontList = (XmFontList) m_fontList;
-
- XmFontListFree (fontList);
-
// TODO: why does freeing the font produce a segv???
// Note that XFreeFont wasn't called in wxWin 1.68 either.
// XFontStruct* fontStruct = (XFontStruct*) m_fontStruct;
f->m_fontStruct = (WXFontStructPtr)font;
f->m_display = ( display ? display : wxGetDisplay() );
f->m_scale = intScale;
- f->m_fontList = XmFontListCreate ((XFontStruct*) font, XmSTRING_DEFAULT_CHARSET);
M_FONTDATA->m_fonts.Append(f);
return f;
return (f ? f->m_fontStruct : (WXFontStructPtr) 0);
}
-WXFontList wxFont::GetFontList(double scale, WXDisplay* display) const
-{
- wxXFont* f = GetInternalFont(scale, display);
-
- return (f ? f->m_fontList : (WXFontList) 0);
-}
-