#pragma implementation "filedlg.h"
#endif
+#ifdef __VMS
+#define XtDisplay XTDISPLAY
+#define XtParent XTPARENT
+#define XtWindow XTWINDOW
+#endif
+
#include "wx/defs.h"
#include "wx/utils.h"
#include "wx/dialog.h"
#include "wx/app.h"
#include "wx/settings.h"
+#ifdef __VMS__
+#pragma message disable nosimpint
+#endif
#include <Xm/Xm.h>
#include <Xm/MwmUtil.h>
#include <Xm/Label.h>
#include <Xm/FileSB.h>
#include <Xm/RowColumn.h>
#include <Xm/LabelG.h>
+#ifdef __VMS__
+#pragma message enable nosimpint
+#endif
+
+#include "wx/motif/private.h"
-#if !USE_SHARED_LIBRARY
IMPLEMENT_CLASS(wxFileDialog, wxDialog)
-#endif
#define DEFAULT_FILE_SELECTOR_SIZE 0
// Let Motif defines the size of File
m_pos = pos;
}
-static void wxChangeListBoxColours(wxWindow* win, Widget widget)
+static void wxChangeListBoxColours(wxWindow* WXUNUSED(win), Widget widget)
{
wxWindow::DoChangeBackgroundColour((WXWidget) widget, *wxWHITE);
/* TODO: should scrollbars be affected? Should probably have separate
* function to change them (by default, taken from wxSystemSettings)
*/
- wxColour backgroundColour = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DFACE);
+ wxColour backgroundColour = wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE);
wxWindow::DoChangeBackgroundColour((WXWidget) hsb, backgroundColour, TRUE);
wxWindow::DoChangeBackgroundColour((WXWidget) vsb, backgroundColour, TRUE);
}
else
parentWidget = (Widget) wxTheApp->GetTopLevelWidget();
+ // prepare the arg list
+ Arg args[10];
+ int ac = 0;
- Widget fileSel = XmCreateFileSelectionDialog(parentWidget, "file_selector", NULL, 0);
+ wxComputeColours (XtDisplay(parentWidget), & m_backgroundColour,
+ (wxColour*) NULL);
+
+ XtSetArg(args[ac], XmNbackground, g_itemColors[wxBACK_INDEX].pixel); ac++;
+ XtSetArg(args[ac], XmNtopShadowColor, g_itemColors[wxTOPS_INDEX].pixel); ac++;
+ XtSetArg(args[ac], XmNbottomShadowColor, g_itemColors[wxBOTS_INDEX].pixel); ac++;
+ XtSetArg(args[ac], XmNforeground, g_itemColors[wxFORE_INDEX].pixel); ac++;
+
+
+ Widget fileSel = XmCreateFileSelectionDialog(parentWidget, "file_selector", args, ac);
XtUnmanageChild(XmFileSelectionBoxGetChild(fileSel, XmDIALOG_HELP_BUTTON));
Widget filterWidget = XmFileSelectionBoxGetChild(fileSel, XmDIALOG_FILTER_TEXT);
XmNresizePolicy, XmRESIZE_NONE,
NULL);
#endif
- DoChangeBackgroundColour((WXWidget) fileSel, m_backgroundColour);
+ // DoChangeBackgroundColour((WXWidget) fileSel, m_backgroundColour);
DoChangeBackgroundColour((WXWidget) filterWidget, *wxWHITE);
DoChangeBackgroundColour((WXWidget) selectionWidget, *wxWHITE);
- // apparently, this provokes a crash
-#if 0
- DoChangeBackgroundColour((WXWidget) okWidget, m_backgroundColour, TRUE);
- DoChangeBackgroundColour((WXWidget) cancelWidget, m_backgroundColour, TRUE);
- DoChangeBackgroundColour((WXWidget) applyWidget, m_backgroundColour, TRUE);
-#endif
-
wxChangeListBoxColours(this, dirListWidget);
wxChangeListBoxColours(this, fileListWidget);