From c5d5ba1cf524f4da930bfd4bd77ba044ecf96e54 Mon Sep 17 00:00:00 2001 From: Greg Ercolano Date: Tue, 25 Feb 2014 04:24:41 +0000 Subject: Applying the etorres gleam patch. STR #2672. TODO: Xcode 4 ide needs fl_gleam.cxx added Test of Visual Studio IDE mods (which were hand-modified) git-svn-id: file:///fltk/svn/fltk/branches/branch-1.3@10113 ea41ed52-d2ee-0310-a9c1-e6b18d33e121 --- src/Fl_get_system_colors.cxx | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) (limited to 'src/Fl_get_system_colors.cxx') diff --git a/src/Fl_get_system_colors.cxx b/src/Fl_get_system_colors.cxx index 76beda545..617dd0ab4 100644 --- a/src/Fl_get_system_colors.cxx +++ b/src/Fl_get_system_colors.cxx @@ -295,6 +295,7 @@ int Fl::scheme(const char *s) { if (!fl_ascii_strcasecmp(s, "none") || !fl_ascii_strcasecmp(s, "base") || !*s) s = 0; else if (!fl_ascii_strcasecmp(s, "gtk+")) s = strdup("gtk+"); else if (!fl_ascii_strcasecmp(s, "plastic")) s = strdup("plastic"); + else if (!fl_ascii_strcasecmp(s, "gleam")) s = strdup("gleam"); else s = 0; } if (scheme_) free((void*)scheme_); @@ -379,6 +380,27 @@ int Fl::reload_scheme() { set_boxtype(_FL_ROUND_UP_BOX, FL_GTK_ROUND_UP_BOX); set_boxtype(_FL_ROUND_DOWN_BOX, FL_GTK_ROUND_DOWN_BOX); + // Use slightly thinner scrollbars... + Fl::scrollbar_size(15); + } else if (scheme_ && !fl_ascii_strcasecmp(scheme_, "gleam")) { + // Use a GTK+ inspired look-n-feel... + if (scheme_bg_) { + delete scheme_bg_; + scheme_bg_ = (Fl_Image *)0; + } + + set_boxtype(FL_UP_FRAME, FL_GLEAM_UP_FRAME); + set_boxtype(FL_DOWN_FRAME, FL_GLEAM_DOWN_FRAME); + set_boxtype(FL_THIN_UP_FRAME, FL_GLEAM_UP_FRAME); + set_boxtype(FL_THIN_DOWN_FRAME, FL_GLEAM_DOWN_FRAME); + + set_boxtype(FL_UP_BOX, FL_GLEAM_UP_BOX); + set_boxtype(FL_DOWN_BOX, FL_GLEAM_DOWN_BOX); + set_boxtype(FL_THIN_UP_BOX, FL_GLEAM_THIN_UP_BOX); + set_boxtype(FL_THIN_DOWN_BOX, FL_GLEAM_THIN_DOWN_BOX); + set_boxtype(_FL_ROUND_UP_BOX, FL_GLEAM_ROUND_UP_BOX); + set_boxtype(_FL_ROUND_DOWN_BOX, FL_GLEAM_ROUND_DOWN_BOX); + // Use slightly thinner scrollbars... Fl::scrollbar_size(15); } else { -- cgit v1.2.3