1 files changed, 164 insertions, 0 deletions
diff --git a/iup/src/win/iupwin_progressbar.c b/iup/src/win/iupwin_progressbar.c
new file mode 100755
index 0000000..9038d79
--- /dev/null
+++ b/iup/src/win/iupwin_progressbar.c
@@ -0,0 +1,164 @@
+/** \file
+ * \brief Progress bar Control
+ *
+ * See Copyright Notice in "iup.h"
+ */
+
+#include <windows.h>
+#include <commctrl.h>
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <memory.h>
+#include <stdarg.h>
+
+#include "iup.h"
+#include "iupcbs.h"
+
+#include "iup_object.h"
+#include "iup_attrib.h"
+#include "iup_str.h"
+#include "iup_progressbar.h"
+#include "iup_drv.h"
+
+#include "iupwin_drv.h"
+#include "iupwin_handle.h"
+
+
+#ifndef PBS_MARQUEE             /* it is defined only when _WIN32_WINNT >= 0x0501 */
+#define PBS_MARQUEE             0x08
+#define PBM_SETMARQUEE          (WM_USER+10)
+#endif
+
+#define IUP_PB_MAX 32000
+
+
+static int winProgressBarSetMarqueeAttrib(Ihandle* ih, const char* value)
+{
+  /* MARQUEE only works when using XP Styles */
+  if (!iupwin_comctl32ver6)
+    return 0;
+
+  if (iupStrBoolean(value))
+    SendMessage(ih->handle, PBM_SETMARQUEE, TRUE, 100);
+  else
+    SendMessage(ih->handle, PBM_SETMARQUEE, FALSE, 0);
+
+  return 1;
+}
+
+static int winProgressBarSetValueAttrib(Ihandle* ih, const char* value)
+{
+  if (!value)
+    ih->data->value = 0;
+  else
+    ih->data->value = atof(value);
+
+  iProgressBarCropValue(ih);
+
+  /* Shows when the marquee style is not set */
+  if (!ih->data->marquee)
+  {
+    double factor = (ih->data->value - ih->data->vmin) / (ih->data->vmax - ih->data->vmin);
+    int val = (int)(IUP_PB_MAX * factor);
+    SendMessage(ih->handle, PBM_SETPOS, (WPARAM)val, 0);
+  }
+
+  return 0;
+}
+
+static int winProgressBarSetBgColorAttrib(Ihandle* ih, const char* value)
+{
+  unsigned char r, g, b;
+
+  /* Only works when using Classic style */
+  if (iupwin_comctl32ver6)
+    return 0;
+
+  if (iupStrToRGB(value, &r, &g, &b))
+  {
+    COLORREF color = RGB(r,g,b);
+    SendMessage(ih->handle, PBM_SETBKCOLOR, 0, (LPARAM)color);
+  }
+  else
+    SendMessage(ih->handle, PBM_SETBKCOLOR, 0, (LPARAM)CLR_DEFAULT);
+  return 1;
+}
+
+static int winProgressBarSetFgColorAttrib(Ihandle* ih, const char* value)
+{
+  unsigned char r, g, b;
+
+  /* Only works when using Classic style */
+  if (iupwin_comctl32ver6)
+    return 0;
+
+  if (iupStrToRGB(value, &r, &g, &b))
+  {
+    COLORREF color = RGB(r,g,b);
+    SendMessage(ih->handle, PBM_SETBARCOLOR, 0, (LPARAM)color);
+  }
+  else
+    SendMessage(ih->handle, PBM_SETBARCOLOR, 0, (LPARAM)CLR_DEFAULT);
+  return 1;
+}
+
+static int winProgressBarMapMethod(Ihandle* ih)
+{
+  DWORD dwStyle = WS_CHILD;
+
+  if (!ih->parent)
+    return IUP_ERROR;
+
+  if (iupStrEqualNoCase(iupAttribGetStr(ih, "ORIENTATION"), "VERTICAL"))
+  {
+    dwStyle |= PBS_VERTICAL;
+
+    if (ih->currentheight < ih->currentwidth)
+    {
+      int tmp = ih->currentheight;
+      ih->currentheight = ih->currentwidth;
+      ih->currentwidth = tmp;
+    }
+  }
+
+  if (!iupwin_comctl32ver6 && !iupAttribGetBoolean(ih, "DASHED"))
+    dwStyle |= PBS_SMOOTH;
+
+  if (iupwin_comctl32ver6 && iupAttribGetBoolean(ih, "MARQUEE"))
+  {
+    dwStyle |= PBS_MARQUEE;
+    ih->data->marquee = 1;
+  }
+
+  if (!iupwinCreateWindowEx(ih, PROGRESS_CLASS, 0, dwStyle))
+    return IUP_ERROR;
+
+  /* configure the native range */
+  SendMessage(ih->handle, PBM_SETRANGE, 0, MAKELPARAM(0, IUP_PB_MAX));
+
+  return IUP_NOERROR;
+}
+
+void iupdrvProgressBarInitClass(Iclass* ic)
+{
+  /* Driver Dependent Class functions */
+  ic->Map = winProgressBarMapMethod;
+
+  /* Visual */
+  iupClassRegisterAttribute(ic, "BGCOLOR", NULL, winProgressBarSetBgColorAttrib, IUPAF_SAMEASSYSTEM, "DLGBGCOLOR", IUPAF_DEFAULT);  
+
+  /* Special */
+  /* Only works when using Classic style */
+  if (iupwin_comctl32ver6)
+    iupClassRegisterAttribute(ic, "FGCOLOR", NULL, winProgressBarSetFgColorAttrib, IUPAF_SAMEASSYSTEM, "DLGFGCOLOR", IUPAF_DEFAULT);
+  else
+    iupClassRegisterAttribute(ic, "FGCOLOR", NULL, NULL, NULL, NULL, IUPAF_NOT_MAPPED);
+
+  /* IupProgressBar only */
+  iupClassRegisterAttribute(ic, "VALUE",  iProgressBarGetValueAttrib,  winProgressBarSetValueAttrib,  NULL, NULL, IUPAF_NO_DEFAULTVALUE|IUPAF_NO_INHERIT);
+  iupClassRegisterAttribute(ic, "ORIENTATION", NULL, NULL, IUPAF_SAMEASSYSTEM, "HORIZONTAL", IUPAF_NO_INHERIT);
+  iupClassRegisterAttribute(ic, "MARQUEE",     NULL, winProgressBarSetMarqueeAttrib, NULL, NULL, IUPAF_NO_INHERIT);
+  iupClassRegisterAttribute(ic, "DASHED",      NULL, NULL, NULL, NULL, IUPAF_NO_INHERIT);
+}