/////////////////////////////////////////////////////////////////////////////
// Name: gauge.cpp
// Purpose: wxGauge class
-// Author: AUTHOR
+// Author: David Webster
// Modified by:
-// Created: ??/??/98
+// Created: 10/06/99
// RCS-ID: $Id$
-// Copyright: (c) AUTHOR
-// Licence: wxWindows licence
+// Copyright: (c) David Webster
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
-#ifdef __GNUG__
-#pragma implementation "gauge.h"
+#include "wx/wxprec.h"
+
+#ifndef WX_PRECOMP
+#include "wx/defs.h"
+#include "wx/utils.h"
#endif
+#include "wx/os2/private.h"
#include "wx/gauge.h"
-#if !USE_SHARED_LIBRARY
+/* gas gauge graph control messages--class "zYzGauge" */
+#define ZYZG_SETRANGE (WM_USER + 0)
+#define ZYZG_GETRANGE (WM_USER + 1)
+#define ZYZG_SETPOSITION (WM_USER + 2)
+#define ZYZG_GETPOSITION (WM_USER + 3)
+#define ZYZG_SETORIENTATION (WM_USER + 4)
+#define ZYZG_GETORIENTATION (WM_USER + 5)
+#define ZYZG_SETFGCOLOR (WM_USER + 6)
+#define ZYZG_GETFGCOLOR (WM_USER + 7)
+#define ZYZG_SETBKCOLOR (WM_USER + 8)
+#define ZYZG_GETBKCOLOR (WM_USER + 9)
+#define ZYZG_SETWIDTH3D (WM_USER + 10)
+#define ZYZG_GETWIDTH3D (WM_USER + 11)
+#define ZYZG_SETBEZELFACE (WM_USER + 12)
+#define ZYZG_GETBEZELFACE (WM_USER + 13)
+#define ZYZG_SETDELTAPOS (WM_USER + 14)
+
+/* orientations for ZYZG_WW_ORIENTATION */
+#define ZYZG_ORIENT_LEFTTORIGHT 0
+#define ZYZG_ORIENT_RIGHTTOLEFT 1
+#define ZYZG_ORIENT_BOTTOMTOTOP 2
+#define ZYZG_ORIENT_TOPTOBOTTOM 3
+
+/* gauge styles */
+#define ZYZGS_3D 0x8000L /* control will be 3D */
+
+/* public function prototypes */
+// BOOL _Optlink gaugeInit(HINSTANCE hInstance);
+
IMPLEMENT_DYNAMIC_CLASS(wxGauge, wxControl)
-#endif
bool wxGauge::Create(wxWindow *parent, wxWindowID id,
int range,
const wxPoint& pos,
const wxSize& size,
long style,
+#if wxUSE_VALIDATORS
const wxValidator& validator,
+#endif
const wxString& name)
{
+ static bool wxGaugeOS2Initialised = FALSE;
+
+ if ( !wxGaugeOS2Initialised )
+ {
+//TODO:
+/*
+ if (!gaugeInit((HINSTANCE) wxGetInstance()))
+ wxFatalError("Cannot initalize Gauge library");
+*/
+ wxGaugeOS2Initialised = TRUE;
+ }
+
SetName(name);
+#if wxUSE_VALIDATORS
SetValidator(validator);
+#endif
+ if (parent) parent->AddChild(this);
m_rangeMax = range;
- m_windowStyle = style;
+ m_gaugePos = 0;
- if (parent) parent->AddChild(this);
+ m_windowStyle = style;
if ( id == -1 )
- m_windowId = (int)NewControlId();
+ m_windowId = (int)NewControlId();
else
- m_windowId = id;
+ m_windowId = id;
+ int x = pos.x;
+ int y = pos.y;
+ int width = size.x;
+ int height = size.y;
// TODO
- return FALSE;
-}
+/*
+ int x = pos.x;
+ int y = pos.y;
+ int width = size.x;
+ int height = size.y;
-void wxGauge::SetSize(int x, int y, int width, int height, int sizeFlags)
-{
- // TODO
+ long msFlags = WS_CHILD | WS_VISIBLE | WS_TABSTOP;
+ msFlags |= ZYZGS_3D;
+
+ HWND wx_button =
+ CreateWindowEx(MakeExtendedStyle(m_windowStyle), wxT("zYzGauge"), NULL, msFlags,
+ 0, 0, 0, 0, (HWND) parent->GetHWND(), (HMENU)m_windowId,
+ wxGetInstance(), NULL);
+
+ m_hWnd = (WXHWND)wx_button;
+
+ // Subclass again for purposes of dialog editing mode
+ SubclassWin((WXHWND)wx_button);
+
+ int wOrient = 0;
+
+ if (m_windowStyle & wxGA_HORIZONTAL)
+ wOrient = ZYZG_ORIENT_LEFTTORIGHT;
+ else
+ wOrient = ZYZG_ORIENT_BOTTOMTOTOP;
+
+ SendMessage(wx_button, ZYZG_SETORIENTATION, wOrient, 0);
+ SendMessage(wx_button, ZYZG_SETRANGE, range, 0);
+
+ SendMessage(GetHwnd(), ZYZG_SETFGCOLOR, 0, RGB(GetForegroundColour().Red(), GetForegroundColour().Green(), GetForegroundColour().Blue()));
+ SendMessage(GetHwnd(), ZYZG_SETBKCOLOR, 0, RGB(GetBackgroundColour().Red(), GetBackgroundColour().Green(), GetBackgroundColour().Blue()));
+
+ SetFont(parent->GetFont());
+
+ if (width == -1)
+ width = 50;
+ if (height == -1)
+ height = 50;
+ SetSize(x, y, width, height);
+
+ ShowWindow(GetHwnd(), SW_SHOW);
+*/
+ return TRUE;
}
void wxGauge::SetShadowWidth(int w)
{
- // TODO optional
+ // TODO optional ::SendMessage(GetHwnd(), ZYZG_SETWIDTH3D, w, 0);
}
void wxGauge::SetBezelFace(int w)
{
- // TODO optional
+ // TODO optional ::SendMessage(GetHwnd(), ZYZG_SETBEZELFACE, w, 0);
}
void wxGauge::SetRange(int r)
{
m_rangeMax = r;
- // TODO
+ // TODO ::SendMessage(GetHwnd(), ZYZG_SETRANGE, r, 0);
}
void wxGauge::SetValue(int pos)
{
m_gaugePos = pos;
- // TODO
+ // TODO ::SendMessage(GetHwnd(), ZYZG_SETPOSITION, pos, 0);
}
int wxGauge::GetShadowWidth() const
{
- // TODO optional
+ // TODO return (int) ::SendMessage(GetHwnd(), ZYZG_GETWIDTH3D, 0, 0);
return 0;
}
int wxGauge::GetBezelFace() const
{
- // TODO optional
+ // TODO return (int) ::SendMessage(GetHwnd(), ZYZG_GETBEZELFACE, 0, 0);
return 0;
}
int wxGauge::GetRange() const
{
+ // TODO return (int) ::SendMessage(GetHwnd(), ZYZG_GETRANGE, 0, 0);
return m_rangeMax;
}
int wxGauge::GetValue() const
{
+ // TODO return (int) ::SendMessage(GetHwnd(), ZYZG_GETPOSITION, 0, 0);
return m_gaugePos;
}
+bool wxGauge::SetForegroundColour(const wxColour& col)
+{
+ if ( !wxControl::SetForegroundColour(col) )
+ return FALSE;
+
+ // TODO ::SendMessage(GetHwnd(), ZYZG_SETFGCOLOR, 0, RGB(col.Red(), col.Green(), col.Blue()));
+
+ return TRUE;
+}
+
+bool wxGauge::SetBackgroundColour(const wxColour& col)
+{
+ if ( !wxControl::SetBackgroundColour(col) )
+ return FALSE;
+
+ // TODO ::SendMessage(GetHwnd(), ZYZG_SETBKCOLOR, 0, RGB(col.Red(), col.Green(), col.Blue()));
+
+ return TRUE;
+}
+
+///** zyz3d.c
+// *
+// * DESCRIPTION:
+// * This module contains functions for creating nifty 3D borders
+// * around controls like zYzGauge.
+// *
+// * HISTORY:
+// * 3/14/91 cjp put in this comment
+// * 6/19/92 cjp touched it a bit
+// *
+// ** cjp */
+// COPYRIGHT:
+//
+// (C) Copyright Microsoft Corp. 1992. All rights reserved.
+//
+// You have a royalty-free right to use, modify, reproduce and
+// distribute the Sample Files (and/or any modified version) in
+// any way you find useful, provided that you agree that
+// Microsoft has no warranty obligations or liability for any
+// Sample Application Files which are modified.
+//
+
+
+///* get the includes we need */
+//#define INCL_PM
+//#include <os2.h>
+
+///* misc. control flag defines */
+//#define DRAW3D_IN 0x0001
+//#define DRAW3D_OUT 0x0002
+
+//#define DRAW3D_TOPLINE 0x0004
+//#define DRAW3D_BOTTOMLINE 0x0008
+//#define DRAW3D_LEFTLINE 0x0010
+//#define DRAW3D_RIGHTLINE 0x0020
+
+
+///* public function prototypes */
+//void _Optlink Draw3DFaceFrame(HDC, LPRECT, WORD);
+//void _Optlink Draw3DRect(HDC, LPRECT, WORD, WORD);
+//void _Optlink Draw3DLine(HDC, WORD, WORD, WORD, WORD, WORD);
+
+
+///** void _Optlink Draw3DFaceFrame(HDC hdc, LPRECT rc, WORD wWidth)
+// *
+// * DESCRIPTION:
+// * This function draws a flat frame with the current button-face
+// * color.
+// *
+// * ARGUMENTS:
+// * HDC hdc : The DC to draw into.
+// *
+// * LPRECT rc : The containing rect for the new frame.
+// *
+// * WORD wWidth : The width of the frame to draw.
+// *
+// * RETURN (void _Optlink):
+// * The frame will have been drawn into the DC.
+// *
+// * NOTES:
+// *
+// ** cjp */
+
+//void _Optlink Draw3DFaceFrame(HDC hdc, RECTL* rc, WORD wWidth)
+//{
+// RECTL rc1;
+// DWORD rgbOld;
+
+// /* don't go through a bunch of work if we don't have to */
+// if (!wWidth)
+// return;
+
+// /* set up color to be button-face color--so it may not be gray */
+// rgbOld = SetBkColor(hdc, GetSysColor(COLOR_BTNFACE));
+
+// /* perform CopyRect w/o bloody windows style overhead */
+// rc1 = *rc;
+
+ /* top */
+// rc1.top = rc->top;
+// rc1.left = rc->left;
+// rc1.bottom = rc->top + wWidth;
+// rc1.right = rc->right;
+
+ /* blast it out */
+// ExtTextOut(hdc, rc1.left, rc1.top, ETO_OPAQUE, &rc1, NULL, 0, NULL);
+
+ /* right */
+// rc1.left = rc->right - wWidth;
+// rc1.bottom = rc->bottom;
+
+ /* blast this part now */
+// ExtTextOut(hdc, rc1.left, rc1.top, ETO_OPAQUE, &rc1, NULL, 0, NULL);
+
+ /* left */
+// rc1.left = rc->left;
+// rc1.right = rc->left + wWidth;
+
+ /* and another part */
+// ExtTextOut(hdc, rc1.left, rc1.top, ETO_OPAQUE, &rc1, NULL, 0, NULL);
+
+ /* bottom */
+// rc1.right = rc->right;
+// rc1.top = rc->bottom - wWidth;
+
+ /* finish it off */
+// ExtTextOut(hdc, rc1.left, rc1.top, ETO_OPAQUE, &rc1, NULL, 0, NULL);
+
+ /* restore the old bk color */
+// SetBkColor(hdc, rgbOld);
+//} /* Draw3DFaceFrame() */
+
+
+///** void _Optlink Draw3DRect(HDC, LPRECT, WORD, WORD)
+// *
+// * DESCRIPTION:
+// * Draws a 3D rectangle that is shaded. wFlags can be used to
+// * control how the rectangle looks.
+// *
+// * ARGUMENTS:
+// * HDC hdc : Handle to the device context that will be
+// * used to display the rectangle.
+// *
+// * RECT rect : A rectangle describing the dimensions of
+// * the rectangle in device coordinates.
+// *
+// * WORD wShadowWidth : Width of the shadow in device coordinates.
+// *
+// * WORD wFlags : The following flags may be passed to describe
+// * the style of the rectangle:
+// *
+// * DRAW3D_IN : The shadow is drawn such that
+// * the box appears to be sunk in to the screen.
+// * This is default if 0 is passed.
+// *
+// * DRAW3D_OUT : The shadow is drawn such that
+// * the box appears to be sticking out of the
+// * screen.
+// *
+// * RETURN (void _Optlink):
+// * The 3D looking rectangle will have been drawn into the DC.
+// *
+// * NOTES:
+// *
+// ** cjp */
+
+//void _Optlink Draw3DRect(HDC hdc, LPRECT lpRect,
+// WORD wShadowWidth, WORD wFlags)
+//{
+// /* sanity check--don't work if you don't have to! */
+// if (!wShadowWidth || !RectVisible(hdc, lpRect))
+// return;
+
+ /* draw the top line */
+// Draw3DLine(hdc, lpRect->left, lpRect->top,
+// lpRect->right - lpRect->left,
+// wShadowWidth, DRAW3D_TOPLINE | wFlags);
+
+ /* right line */
+// Draw3DLine(hdc, lpRect->right, lpRect->top,
+// lpRect->bottom - lpRect->top,
+// wShadowWidth, DRAW3D_RIGHTLINE | wFlags);
+
+ /* bottom line */
+// Draw3DLine(hdc, lpRect->left, lpRect->bottom,
+// lpRect->right - lpRect->left,
+// wShadowWidth, DRAW3D_BOTTOMLINE | wFlags);
+
+ /* left line */
+// Draw3DLine(hdc, lpRect->left, lpRect->top,
+// lpRect->bottom - lpRect->top,
+// wShadowWidth, DRAW3D_LEFTLINE | wFlags);
+//} /* Draw3DRect() */
+
+
+///** void _Optlink Draw3DLine(HDC hdc, WORD x, WORD y, WORD nLen,
+// *
+// * DESCRIPTION:
+// * Draws a 3D line that can be used to make a 3D box.
+// *
+// * ARGUMENTS:
+// * HDC hdc : Handle to the device context that will be
+// * used to display the 3D line.
+// *
+// * WORD x, y : Coordinates of the beginning of the line.
+// * These coordinates are in device units and
+// * represent the _outside_ most point. Horiz-
+// * ontal lines are drawn from left to right and
+// * vertical lines are drawn from top to bottom.
+// *
+// * WORD wShadowWidth : Width of the shadow in device coordinates.
+// *
+// * WORD wFlags : The following flags may be passed to
+// * describe the style of the 3D line:
+// *
+// * DRAW3D_IN : The shadow is drawn such that
+// * the box appears to be sunk in to the screen.
+// * This is default if 0 is passed.
+// *
+// * DRAW3D_OUT : The shadow is drawn such that
+// * the box appears to be sticking out of the
+// * screen.
+// *
+// * DRAW3D_TOPLINE, _BOTTOMLINE, _LEFTLINE, and
+// * _RIGHTLINE : Specifies that a "top",
+// * "Bottom", "Left", or"Right" line is to be
+// * drawn.
+// *
+// * RETURN (void _Optlink):
+// * The line will have been drawn into the DC.
+// *
+// * NOTES:
+// *
+// ** cjp */
+
+//void _Optlink Draw3DLine(HDC hdc, WORD x, WORD y, WORD nLen,
+// WORD wShadowWidth, WORD wFlags)
+//{
+// HBRUSH hOldBrush;
+// HPEN hOldPen;
+// BOOL fDark;
+// POINT Point[ 4 ]; /* define a polgon with 4 points */
+
+// /* if width is zero, don't do nothin'! */
+// if (!wShadowWidth)
+// return;
+
+ /* define shape of polygon--origin is always the same */
+// Point[0].x = x;
+// Point[0].y = y;
+
+// /* To do this we'll simply draw a polygon with four sides, using
+// * the appropriate brush. I dare you to ask me why this isn't a
+// * switch/case!
+// */
+// if (wFlags & DRAW3D_TOPLINE)
+// {
+// /* across to right */
+// Point[1].x = x + nLen - (wShadowWidth == 1 ? 1 : 0);
+// Point[1].y = y;
+
+ /* down/left */
+// Point[2].x = x + nLen - wShadowWidth;
+// Point[2].y = y + wShadowWidth;
+
+ /* accross to left */
+// Point[3].x = x + wShadowWidth;
+// Point[3].y = y + wShadowWidth;
+
+ /* select 'dark' brush if 'in'--'light' for 'out' */
+// fDark = (wFlags & DRAW3D_IN) ? TRUE : FALSE;
+// }
+
+ /* possibly the bottom? */
+// else if (wFlags & DRAW3D_BOTTOMLINE)
+// {
+ /* across to right */
+// Point[1].x = x + nLen;
+// Point[1].y = y;
+
+ /* up/left */
+// Point[2].x = x + nLen - wShadowWidth;
+// Point[2].y = y - wShadowWidth;
+
+ /* accross to left */
+// Point[3].x = x + wShadowWidth;
+// Point[3].y = y - wShadowWidth;
+
+ /* select 'light' brush if 'in' */
+// fDark = (wFlags & DRAW3D_IN) ? FALSE : TRUE;
+// }
+
+ /* ok, it's gotta be left? */
+// else if (wFlags & DRAW3D_LEFTLINE)
+// {
+ /* down */
+// Point[1].x = x;
+// Point[1].y = y + nLen - (wShadowWidth == 1 ? 1 : 0);
+
+ /* up/right */
+// Point[2].x = x + wShadowWidth;
+// Point[2].y = y + nLen - wShadowWidth;
+
+ /* down */
+// Point[3].x = x + wShadowWidth;
+// Point[3].y = y + wShadowWidth;
+
+ /* select 'dark' brush if 'in'--'light' for 'out' */
+// fDark = (wFlags & DRAW3D_IN) ? TRUE : FALSE;
+// }
+
+ /* well maybe it's for the right side? */
+// else if (wFlags & DRAW3D_RIGHTLINE)
+// {
+ /* down */
+// Point[1].x = x;
+// Point[1].y = y + nLen;
+
+ /* up/left */
+// Point[2].x = x - wShadowWidth;
+// Point[2].y = y + nLen - wShadowWidth;
+
+ /* up */
+// Point[3].x = x - wShadowWidth;
+// Point[3].y = y + wShadowWidth;
+
+ /* select 'light' brush if 'in' */
+// fDark = (wFlags & DRAW3D_IN) ? FALSE : TRUE;
+// }
+
+ /* bad drugs? */
+// else return;
+
+ /* select NULL_PEN for no borders */
+// hOldPen = (HPEN) SelectObject(hdc, GetStockObject(NULL_PEN));
+
+ /* select the appropriate color for the fill */
+// if (fDark)
+// hOldBrush = (HBRUSH) SelectObject(hdc, GetStockObject(GRAY_BRUSH));
+// else
+// hOldBrush = (HBRUSH) SelectObject(hdc, GetStockObject(WHITE_BRUSH));
+
+ /* finally, draw the dern thing */
+// Polygon(hdc, (LPPOINT)&Point, 4);
+
+ /* restore what we killed */
+// SelectObject(hdc, hOldBrush);
+// SelectObject(hdc, hOldPen);
+//} /* Draw3DLine() */
+
+/** EOF: zyz3d.c **/
+
+///** zyzgauge.c
+// *
+// * DESCRIPTION:
+// * Yet another 'Gas Gauge Custom Control.' This control gives you
+// * a 'progress bar' class (named zYzGauge) for use in your applications.
+// * You can set the range, position, font, color, orientation, and 3d
+// * effect of the gauge by sending messages to the control.
+// *
+// * Before you can use this control, you MUST first export the window
+// * procedure for the control (or define it with the _export keyword):
+// *
+// * EXPORTS gaugeWndProc
+// *
+// * You then need initialize the class before you use it:
+// *
+// * if (!gaugeInit(hInstance))
+// * die a horrible death
+// * else
+// * you are good to go
+// *
+// * The colors used by the control default to black and white if you
+// * are running on a mono-display. They default to blue and white
+// * if you are on a color display. You enable the 3D effect by setting
+// * the ZYZGS_3D style flag in the styles field of the control (like
+// * any other control).
+// *
+// * To select your own colors, you can send the ZYZG_SETFGCOLOR and
+// * ZYZG_SETBKCOLOR messages to set the foreground (percent done) and
+// * background (percent not done) colors. The lParam is the RGB()
+// * value--wParam is ignored.
+// *
+// * In all of the following ZYZG_??? messages, the arguments are
+// * WORDS. If you are setting parameters, the value is sent as
+// * the wParam (lParam is ignored). If you are getting parameters,
+// * the value is returned as a LONG and should be cast to a *signed*
+// * integer.
+// *
+// * To set the depth of the 3D effect (if enabled), you can send the
+// * ZYZG_SETBEZELFACE and ZYZG_SETWIDTH3D messages. The bezel face
+// * is the flat top on the 3D border--its color will be that of the
+// * button-face. The 3D width is the width of the bezel itself; inside
+// * and outside. The light color is white, the dark color is gray.
+// * Both widths *can* be zero--both default to 2 which looks to me.
+// *
+// * The range of the control can be set by sending the ZYZG_SETRANGE
+// * message to the control. It can be any integer from 1 to 32767.
+// * What this specifies is the number of pieces that create a whole.
+// * The default is 100. You can get the current range setting by
+// * sending the ZYZG_GETRANGE message to the control.
+// *
+// * The position (number of pieces out of the whole have been used) is
+// * set with the ZYZG_SETPOSITION message. It can be any integer from
+// * 0 to the current range setting of the control--it will be clipped
+// * if the position is out of bounds. The default position is 0. You
+// * can get the current position at any time with the ZYZG_GETPOSITION
+// * message.
+// *
+// * You can also set the range using a delta from the current range.
+// * This is done by sending the ZYZG_SETDELTAPOS message with wParam
+// * set to a _signed_ integer value within the range of the control.
+// *
+// * The font used for the percentage text can be set using the standard
+// * WM_SETFONT message. You can get the current font at any time with
+// * the WM_GETFONT message.
+// *
+// * The orientation can be left to right, right to left, bottom to top,
+// * or top to bottom. Whatever suits your needs. You set this by
+// * sending the ZYZG_ORIENTATION message to the control with one of
+// * the following values (default is ZYZG_ORIENT_LEFTTORIGHT):
+// *
+// * ZYZG_ORIENT_LEFTTORIGHT (0)
+// * ZYZG_ORIENT_RIGHTTOLEFT (1)
+// * ZYZG_ORIENT_BOTTOMTOTOP (2)
+// * ZYZG_ORIENT_TOPTOBOTTOM (3)
+// *
+// * HISTORY:
+// * 3/12/91 cjp put in this comment
+// * 6/19/92 cjp touched it a bit
+// *
+// ** cjp */
+// COPYRIGHT:
+//
+// (C) Copyright Microsoft Corp. 1992. All rights reserved.
+//
+// You have a royalty-free right to use, modify, reproduce and
+// distribute the Sample Files (and/or any modified version) in
+// any way you find useful, provided that you agree that
+// Microsoft has no warranty obligations or liability for any
+// Sample Application Files which are modified.
+//
+
+
+/* get the includes we need */
+//#if !defined(__GNUWIN32__) && !defined(__SALFORDC__)
+//#include <malloc.h>
+//#endif
+//#include <stdio.h>
+//#include <string.h>
+//#include <stdlib.h>
+// #include "zyz3d.h"
+// #include "zyzgauge.h"
+
+
+/* static global variables */
+//static wxChar gszzYzGaugeClass[] = wxT("zYzGauge");
+
+
+/* window word position definitions */
+//#define ZYZG_WW_PZYZGAUGE 0
+/* #define ZYZG_WW_EXTRABYTES 2 */
+//#define ZYZG_WW_EXTRABYTES 4
+
+
+/* control block structure typedef */
+//typedef struct tZYZGAUGE
+//{
+// WORD wRange;
+// WORD wPosition;
+// WORD wOrientation;
+// WORD wWidth3D;
+// WORD wWidthBezelFace;
+// HFONT hFont;
+// DWORD rgbTextColor;
+// DWORD rgbBkColor;
+
+//} ZYZGAUGE, *PZYZGAUGE, FAR *LPZYZGAUGE;
+
+
+/* some default values for the control */
+//#define ZYZG_DEF_RANGE 100
+//#define ZYZG_DEF_POSITION 0
+//#define ZYZG_DEF_ORIENTATION ZYZG_ORIENT_LEFTTORIGHT
+//#define ZYZG_DEF_WIDTH3D 2
+//#define ZYZG_DEF_BEZELFACE 2
+
+
+
+/* the default settings for drawing colors--display dependent */
+//static DWORD rgbDefTextColor;
+//static DWORD rgbDefBkColor;
+//static BOOL fSupport3D;
+
+//#if !defined(APIENTRY) // NT defines APIENTRY, 3.x not
+//#define APIENTRY _Optlink
+//#endif
+
+//#ifdef __WIN32__
+//#define _EXPORT /**/
+//#else
+//#define _EXPORT _export
+//typedef signed short int SHORT ;
+//#endif
+
+/* internal function prototypes */
+//static void PASCAL gaugePaint(HWND, HDC);
+/* LRESULT _Optlink */
+//LRESULT APIENTRY _EXPORT gaugeWndProc(HWND, UINT, WPARAM, LPARAM);
+
+
+
+///** BOOL _Optlink gaugeInit(HINSTANCE hInstance)
+// *
+// * DESCRIPTION:
+// * Registers the window class for the zYzGauge control. Performs
+// * other initialization for the zYzGauge text control. This must
+// * be done before the zYzGauge control is used--or it will fail
+// * and your dialog box will not open!
+// *
+// * ARGUMENTS:
+// * HINSTANCE hInstance : Instance handle to register class with.
+// *
+// * RETURN (BOOL FAR):
+// * The return value is TRUE if the zYzGauge class was successfully
+// * registered. It is FALSE if the initialization fails.
+// *
+// * NOTES:
+// *
+// ** cjp */
+
+//#pragma alloc_text(init, gaugeInit)
+
+//BOOL _Optlink gaugeInit(HINSTANCE hInstance)
+//{
+// static BOOL fRegistered = FALSE;
+// WNDCLASS wc;
+// HDC hdc;
+
+ /* assume already registered if not first instance */
+// if (fRegistered)
+// return (TRUE);
+
+ /* fill in the class structure for the zyzgauge control */
+// wc.hCursor = LoadCursor(NULL, IDC_ARROW);
+// wc.hIcon = NULL;
+// wc.lpszMenuName = NULL;
+// wc.lpszClassName = gszzYzGaugeClass;
+// wc.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
+// wc.hInstance = hInstance;
+
+//#ifdef ZYZGAUGE_DLL
+// wc.style = CS_GLOBALCLASS | CS_HREDRAW | CS_VREDRAW;
+//#else
+// wc.style = CS_HREDRAW | CS_VREDRAW;
+//#endif
+
+// wc.lpfnWndProc = gaugeWndProc;
+// wc.cbClsExtra = 0;
+// wc.cbWndExtra = ZYZG_WW_EXTRABYTES;
+
+ /* attempt to register it--return FALSE if fail */
+// if (!RegisterClass(&wc))
+// return (FALSE);
+
+ /* Get a DC to determine whether device is mono or not, and set
+ * default foreground/background colors as appropriate.
+ */
+// hdc = CreateIC(wxT("DISPLAY"), NULL, NULL, 0L) ;
+// if (hdc)
+// {
+ /* check for mono-display */
+// if ((GetDeviceCaps(hdc, BITSPIXEL) == 1) &&
+// (GetDeviceCaps(hdc, PLANES) == 1))
+// {
+ /* using a mono DC--white foreground, black background */
+// rgbDefTextColor = RGB(255, 255, 255);
+// rgbDefBkColor = RGB(0, 0, 0);
+// }
+
+ /* good! we have color: blue foreground, white background */
+// else
+// {
+// rgbDefTextColor = RGB(0, 0, 255);
+// rgbDefBkColor = RGB(255, 255, 255);
+// }
+
+ /* need at _least_ 8 for two shades of gray (>=VGA) */
+// fSupport3D = (GetDeviceCaps(hdc, NUMCOLORS) >= 8) ? TRUE : FALSE;
+
+ /* get rid of the DC (IC) */
+// DeleteDC(hdc);
+// }
+
+ /* uh-oh... can't get DC (IC)... fail */
+// else
+// {
+ /* unregister the class */
+// UnregisterClass(gszzYzGaugeClass, hInstance);
+// return (FALSE);
+// }
+
+ /* return success */
+// return (fRegistered = TRUE);
+//} /* gaugeInit() */
+
+
+/** static void PASCAL gaugePaint(HWND hwnd, HDC hdc)
+// *
+// * DESCRIPTION:
+// * This function is responsible for painting the zYzGauge control.
+// *
+// * ARGUMENTS:
+// * HWND hwnd : The window handle for the gauge.
+// *
+// * HDC hdc : The DC for the gauge's window.
+// *
+// * RETURN (void):
+// * The control will have been painted.
+// *
+// * NOTES:
+// *
+// ** cjp */
+
+//static void PASCAL gaugePaint(HWND hwnd, HDC hdc)
+//{
+// PZYZGAUGE pgauge;
+// WORD iRange, iPos;
+// WORD Offset = 1;
+// DWORD dwExtent;
+// RECT rc1, rc2;
+// HFONT hFont;
+// wxChar ach[ 6 ];
+// WORD dx, dy, wGomerX, wGomerY;
+///* Win32s has no GetTextExtent(); let's try GetTextExtentPoint() instead,
+// * which needs a SIZE* parameter */
+//#if defined(__WIN32__)
+// SIZE size;
+//#endif
+
+// /* get pointer to the control's control block */
+// pgauge = (PZYZGAUGE)GetWindowWord(hwnd, ZYZG_WW_PZYZGAUGE);
+// pgauge = (PZYZGAUGE)GetWindowLong(hwnd, ZYZG_WW_PZYZGAUGE);
+
+ /* set the colors into for the gauge into the control */
+// SetTextColor(hdc, pgauge->rgbTextColor);
+// SetBkColor(hdc, pgauge->rgbBkColor);
+
+ /* draw black rectangle for gauge */
+// GetClientRect(hwnd, &rc1);
+
+ /* draw a black border on the _outside_ */
+// FrameRect(hdc, &rc1, (HBRUSH) GetStockObject(BLACK_BRUSH));
+
+ /* we want to draw _just inside_ the black border */
+// InflateRect(&rc1, -1, -1);
+
+ /* one line thick so far... */
+// Offset = (WORD) 1;
+
+ /* for 3D stuff, we need to have at least two shades of gray */
+// if ((GetWindowLong(hwnd, GWL_STYLE) & ZYZGS_3D) && fSupport3D)
+// {
+// Draw3DRect(hdc, &rc1, pgauge->wWidth3D, DRAW3D_OUT);
+// InflateRect(&rc1, ~(pgauge->wWidth3D), ~(pgauge->wWidth3D));
+
+// Draw3DFaceFrame(hdc, &rc1, pgauge->wWidthBezelFace);
+// InflateRect(&rc1, ~(pgauge->wWidthBezelFace), ~(pgauge->wWidthBezelFace));
+
+// Draw3DRect(hdc, &rc1, pgauge->wWidth3D, DRAW3D_IN);
+// InflateRect(&rc1, ~(pgauge->wWidth3D), ~(pgauge->wWidth3D));
+
+ /* draw a black border on the _inside_ */
+// FrameRect(hdc, &rc1, (HBRUSH) GetStockObject(BLACK_BRUSH));
+
+ /* we want to draw _just inside_ the black border */
+// InflateRect(&rc1, -1, -1);
+
+ /* add all the other pixels into the border width */
+// Offset += (2 * pgauge->wWidth3D) + pgauge->wWidthBezelFace + 1;
+// }
+
+ /* dup--one rc for 'how much filled', one rc for 'how much empty' */
+// rc2 = rc1;
+
+ /* get the range--make sure it's a valid range */
+// if ((iRange = pgauge->wRange) <= 0)
+// iRange = 1;
+
+ /* get the position--greater than 100% would be bad */
+// if ((iPos = pgauge->wPosition) > iRange)
+// iPos = iRange;
+
+ /* compute the actual size of the gauge */
+// dx = rc1.right - rc1.left;
+// dy = rc1.bottom - rc1.top;
+// wGomerX = (WORD)((DWORD)iPos * dx / iRange);
+// wGomerY = (WORD)((DWORD)iPos * dy / iRange);
+
+ /* get the orientation and munge rects accordingly */
+// switch (pgauge->wOrientation)
+// {
+// case ZYZG_ORIENT_RIGHTTOLEFT:
+// rc1.left = rc2.right = rc1.right - wGomerX;
+// break;
+
+// case ZYZG_ORIENT_BOTTOMTOTOP:
+// rc1.top = rc2.bottom = rc1.bottom - wGomerY;
+// break;
+
+// case ZYZG_ORIENT_TOPTOBOTTOM:
+// rc1.bottom = rc2.top += wGomerY;
+// break;
+
+// default:
+// rc1.right = rc2.left += wGomerX;
+// break;
+// } /* switch () */
+
+ /* select the correct font */
+// hFont = (HFONT) SelectObject(hdc, pgauge->hFont);
+
+ /* build up a string to blit out--ie the meaning of life: "42%" */
+// wsprintf(ach, wxT("%3d%%"), (WORD)((DWORD)iPos * 100 / iRange));
+/* Win32s has no GetTextExtent(); let's try GetTextExtentPoint() instead */
+//#if defined(__WIN32__)
+// GetTextExtentPoint(hdc, ach, wGomerX = lstrlen(ach), &size);
+// dwExtent = size.cx;
+//#else
+// dwExtent = GetTextExtent(hdc, ach, wGomerX = lstrlen(ach));
+//#endif
+
+
+ /* Draw the finished (ie the percent done) side of box. If
+ * ZYZG_WW_POSITION is 42, (in range of 0 to 100) this ExtTextOut
+ * draws the meaning of life (42%) bar.
+ */
+// ExtTextOut(hdc, (dx - LOWORD(dwExtent)) / 2 + Offset,
+// (dy - HIWORD(dwExtent)) / 2 + Offset,
+// ETO_OPAQUE | ETO_CLIPPED, &rc2, ach, wGomerX, NULL);
+
+ /* Reverse fore and back colors for drawing the undone (ie the non-
+ * finished) side of the box.
+ */
+// SetBkColor(hdc, pgauge->rgbTextColor);
+// SetTextColor(hdc, pgauge->rgbBkColor);
+
+// ExtTextOut(hdc, (dx - LOWORD(dwExtent)) / 2 + Offset,
+// (dy - HIWORD(dwExtent)) / 2 + Offset,
+// ETO_OPAQUE | ETO_CLIPPED, &rc1, ach, wGomerX, NULL);
+
+ /* unselect the font */
+// SelectObject(hdc, hFont);
+//} /* gaugePaint() */
+
+
+/** LRESULT _Optlink gaugeWndProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
+// *
+// * DESCRIPTION:
+// * This is the control's window procedure. Its purpose is to handle
+// * special messages for this custom control.
+// *
+// * The special control messages for the gauge control are:
+// *
+// * ZYZG_SETRANGE : Sets the range of the gauge. In other
+// * words, the number of parts that make a
+// * whole.
+// *
+// * ZYZG_GETRANGE : Returns the current range of the gauge.
+// *
+// * ZYZG_SETORIENTATION : Sets the orientation of the gauge. This
+// * can be one of the ZYZG_ORIENT_?? msgs.
+// *
+// * ZYZG_GETORIENTATION : Gets the current orientation of the
+// * gauge.
+// *
+// * ZYZG_SETPOSITION : Sets the current position of the gauge.
+// * In other words, how many pieces of the
+// * whole have been used.
+// *
+// * ZYZG_GETPOSITION : Gets the current position of the gauge.
+// *
+// * ZYZG_SETDELTAPOS : Sets the position of the gauge +/- the
+// * specified amount.
+// *
+// * ZYZG_SETFGCOLOR : Sets the foreground (percent done) color.
+// *
+// * ZYZG_GETFGCOLOR : Gets the foreground (percent done) color.
+// *
+// * ZYZG_SETBKCOLOR : Sets the background (percent not done)
+// * color.
+// *
+// * ZYZG_GETBKCOLOR : Gets the background (percent not done)
+// * color.
+// *
+// * WM_SETFONT : Sets the font to use for the percentage
+// * text of the gauge.
+// *
+// * WM_GETFONT : Gets the current font in use by the
+// * gauge.
+// *
+// * NOTES:
+// *
+// ** cjp */
+
+/* LRESULT _Optlink */
+
+//LRESULT APIENTRY _EXPORT gaugeWndProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
+//{
+// HFONT hFont;
+// PAINTSTRUCT ps;
+// PZYZGAUGE pgauge;
+// RECT rc;
+
+// pgauge = (PZYZGAUGE)GetWindowWord(hwnd, ZYZG_WW_PZYZGAUGE);
+// pgauge = (PZYZGAUGE)GetWindowLong(hwnd, ZYZG_WW_PZYZGAUGE);
+
+ /* break to get DefWindowProc() */
+// switch (uMsg)
+// {
+// case WM_CREATE:
+ /* need to allocate a control block */
+// pgauge = (PZYZGAUGE)LocalAlloc(LPTR, sizeof(ZYZGAUGE));
+// pgauge = (PZYZGAUGE)malloc(sizeof(ZYZGAUGE));
+// if (!pgauge)
+// return (0L);
+
+ /* hang on to this control block */
+// SetWindowWord(hwnd, ZYZG_WW_PZYZGAUGE, (WORD)pgauge);
+// SetWindowLong(hwnd, ZYZG_WW_PZYZGAUGE, (LONG)pgauge);
+
+ /* fill control block with defaults */
+// pgauge->wRange = ZYZG_DEF_RANGE;
+// pgauge->wPosition = ZYZG_DEF_POSITION;
+// pgauge->wOrientation = ZYZG_DEF_ORIENTATION;
+// pgauge->wWidth3D = ZYZG_DEF_WIDTH3D;
+// pgauge->wWidthBezelFace = ZYZG_DEF_BEZELFACE;
+// pgauge->rgbTextColor = rgbDefTextColor;
+// pgauge->rgbBkColor = rgbDefBkColor;
+
+ /* use system font */
+// SendMessage(hwnd, WM_SETFONT, (WPARAM)NULL, 0L);
+
+ /* go to DefWindowProc() to finish the job */
+// break;
+
+// case WM_DESTROY:
+ /* get rid of the control's memory */
+// if (pgauge)
+// LocalFree((HANDLE)pgauge);
+// free(pgauge);
+// break;
+
+// case ZYZG_GETPOSITION:
+// return (pgauge->wPosition);
+
+// case ZYZG_GETRANGE:
+// return (pgauge->wRange);
+
+// case ZYZG_GETORIENTATION:
+// return (pgauge->wOrientation);
+
+// case ZYZG_GETWIDTH3D:
+// return (pgauge->wWidth3D);
+
+// case ZYZG_GETBEZELFACE:
+// return (pgauge->wWidthBezelFace);
+
+// case ZYZG_GETBKCOLOR:
+// return (pgauge->rgbTextColor);
+
+// case ZYZG_GETFGCOLOR:
+// return (pgauge->rgbBkColor);
+
+// case ZYZG_SETBKCOLOR:
+// pgauge->rgbBkColor = lParam;
+// return (0L);
+
+// case ZYZG_SETFGCOLOR:
+// pgauge->rgbTextColor = lParam;
+// return (0L);
+
+
+// case ZYZG_SETPOSITION:
+// pgauge->wPosition = wParam;
+
+//zyzgForceRepaint:
+// GetClientRect(hwnd, &rc);
+// if ((GetWindowLong(hwnd, GWL_STYLE) & ZYZGS_3D) && fSupport3D)
+// {
+// wParam = (2 * pgauge->wWidth3D) +
+// pgauge->wWidthBezelFace + 2;
+// }
+
+// else
+// wParam = 1;
+
+// InflateRect(&rc, ~(wParam), ~(wParam));
+// InvalidateRect(hwnd, &rc, FALSE);
+// UpdateWindow(hwnd);
+// return (0L);
+
+// case ZYZG_SETRANGE:
+// pgauge->wRange = wParam;
+// goto zyzgForceRepaint;
+
+// case ZYZG_SETORIENTATION:
+// pgauge->wOrientation = wParam;
+// goto zyzgForceRepaint;
+
+// case ZYZG_SETWIDTH3D:
+// pgauge->wWidth3D = wParam;
+
+//zyzgForceRepaint3D:
+// InvalidateRect(hwnd, NULL, FALSE);
+// UpdateWindow(hwnd);
+// return (0L);
+
+// case ZYZG_SETBEZELFACE:
+// pgauge->wWidthBezelFace = wParam;
+// goto zyzgForceRepaint3D;
+
+// case ZYZG_SETDELTAPOS:
+///* Watcom doesn't like the following line so removing typecasts */
+///* (int)pgauge->wPosition += (int)wParam; */
+// pgauge->wPosition += wParam;
+// goto zyzgForceRepaint;
+
+// case WM_PAINT:
+// BeginPaint(hwnd, &ps);
+// gaugePaint(hwnd, ps.hdc);
+// EndPaint(hwnd, &ps);
+// return (0L);
+
+// case WM_GETFONT:
+// hFont = pgauge->hFont;
+
+// /* if system font, then return NULL handle */
+// return (long)((hFont == GetStockObject(SYSTEM_FONT)) ? NULL : hFont);
+
+// case WM_SETFONT:
+ /* if NULL hFont, use system font */
+// hFont = (HFONT)wParam ;
+// if (!hFont)
+// hFont = (HFONT) GetStockObject(SYSTEM_FONT);
+
+// pgauge->hFont = hFont;
+
+ /* redraw if indicated in message */
+// if ((BOOL)lParam)
+// {
+// InvalidateRect(hwnd, NULL, TRUE);
+// UpdateWindow(hwnd);
+// }
+// return (0L);
+// } /* switch () */
+
+ /* let the dialog mangler take care of this message */
+// return (DefWindowProc(hwnd, uMsg, wParam, lParam));
+//} /* gaugeWndProc() */
+
+
+/** EOF: zyzgauge.c **/
+
+