3f66f6a5b3
This keyword is not expanded by Git which means it's not replaced with the correct revision value in the releases made using git-based scripts and it's confusing to have lines with unexpanded "$Id$" in the released files. As expanding them with Git is not that simple (it could be done with git archive and export-subst attribute) and there are not many benefits in having them in the first place, just remove all these lines. If nothing else, this will make an eventual transition to Git simpler. Closes #14487. git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@74602 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
298 lines
10 KiB
C++
298 lines
10 KiB
C++
/////////////////////////////////////////////////////////////////////////////
|
|
// Name: src/os2/gauge.cpp
|
|
// Purpose: wxGauge class
|
|
// Author: David Webster
|
|
// Modified by:
|
|
// Created: 10/06/99
|
|
// Copyright: (c) David Webster
|
|
// Licence: wxWindows licence
|
|
/////////////////////////////////////////////////////////////////////////////
|
|
|
|
#include "wx/wxprec.h"
|
|
|
|
#if wxUSE_GAUGE
|
|
|
|
#include "wx/gauge.h"
|
|
|
|
#ifndef WX_PRECOMP
|
|
#include "wx/utils.h"
|
|
#include "wx/scrolwin.h"
|
|
#endif
|
|
|
|
#include "wx/os2/private.h"
|
|
|
|
static WXFARPROC fnWndProcGauge = (WXFARPROC)NULL;
|
|
extern void wxAssociateWinWithHandle( HWND hWnd
|
|
,wxWindowOS2* pWin
|
|
);
|
|
|
|
MRESULT EXPENTRY wxGaugeWndProc( HWND hWnd,
|
|
UINT uMessage,
|
|
MPARAM wParam,
|
|
MPARAM lParam )
|
|
{
|
|
wxGauge* pGauge = (wxGauge *)::WinQueryWindowULong( hWnd
|
|
,QWL_USER
|
|
);
|
|
HPS hPS;
|
|
RECTL vRect;
|
|
RECTL vRect2;
|
|
RECTL vRect3;
|
|
double dPixelToRange = 0.0;
|
|
double dRange = 0.0;
|
|
|
|
switch (uMessage )
|
|
{
|
|
case WM_PAINT:
|
|
hPS = ::WinBeginPaint( hWnd
|
|
,NULLHANDLE
|
|
,&vRect
|
|
);
|
|
if(hPS)
|
|
{
|
|
::WinQueryWindowRect(hWnd, &vRect);
|
|
::GpiCreateLogColorTable( hPS
|
|
,0L
|
|
,LCOLF_CONSECRGB
|
|
,0L
|
|
,(LONG)wxTheColourDatabase->m_nSize
|
|
,(PLONG)wxTheColourDatabase->m_palTable
|
|
);
|
|
::GpiCreateLogColorTable( hPS
|
|
,0L
|
|
,LCOLF_RGB
|
|
,0L
|
|
,0L
|
|
,NULL
|
|
);
|
|
//
|
|
// Draw the guage box
|
|
//
|
|
LONG lColor = 0x00FFFFFF; // White
|
|
POINTL vPoint = {vRect.xLeft + 1, vRect.yBottom + 1};
|
|
|
|
::GpiSetColor(hPS, lColor);
|
|
::GpiMove(hPS, &vPoint);
|
|
vPoint.x = vRect.xRight - 1;
|
|
::GpiLine(hPS, &vPoint);
|
|
vPoint.y = vRect.yTop - 1;
|
|
::GpiLine(hPS, &vPoint);
|
|
lColor = 0x000C0C0C; // Darkish Grey to give depth feel
|
|
::GpiSetColor(hPS, lColor);
|
|
vPoint.x = vRect.xLeft + 1;
|
|
::GpiLine(hPS, &vPoint);
|
|
vPoint.y = vRect.yBottom + 1;
|
|
::GpiLine(hPS, &vPoint);
|
|
vRect3.xLeft = vRect.xLeft + 2;
|
|
vRect3.xRight = vRect.xRight - 2;
|
|
vRect3.yTop = vRect.yTop - 2;
|
|
vRect3.yBottom = vRect.yBottom + 2;
|
|
|
|
if (pGauge->GetWindowStyleFlag() & wxGA_VERTICAL)
|
|
{
|
|
dRange = (double)(vRect3.yTop - vRect3.yBottom);
|
|
dPixelToRange = dRange/(double)pGauge->GetRange();
|
|
vRect2.yTop = (int)(pGauge->GetValue() * dPixelToRange);
|
|
vRect2.yBottom = vRect3.yBottom;
|
|
vRect2.xLeft = vRect3.xLeft;
|
|
vRect2.xRight = vRect3.xRight;
|
|
vRect3.yBottom = vRect2.yTop;
|
|
if (vRect3.yBottom <= 1)
|
|
vRect3.yBottom = 2;
|
|
::WinFillRect(hPS, &vRect3, pGauge->GetBackgroundColour().GetPixel());
|
|
::WinFillRect(hPS, &vRect2, pGauge->GetForegroundColour().GetPixel());
|
|
}
|
|
else
|
|
{
|
|
dRange = (double)(vRect3.xRight - vRect3.xLeft);
|
|
dPixelToRange = dRange/(double)pGauge->GetRange();
|
|
vRect2.yTop = vRect3.yTop;
|
|
vRect2.yBottom = vRect3.yBottom;
|
|
vRect2.xLeft = vRect3.xLeft;
|
|
vRect2.xRight = (int)(pGauge->GetValue() * dPixelToRange);
|
|
vRect3.xLeft = vRect2.xRight;
|
|
if (vRect3.xLeft <= 1)
|
|
vRect3.xLeft = 2;
|
|
::WinFillRect(hPS, &vRect3, pGauge->GetBackgroundColour().GetPixel());
|
|
::WinFillRect(hPS, &vRect2, pGauge->GetForegroundColour().GetPixel());
|
|
}
|
|
::WinEndPaint(hPS);
|
|
}
|
|
}
|
|
return (fnWndProcGauge( hWnd
|
|
,(ULONG)uMessage
|
|
,(MPARAM)wParam
|
|
,(MPARAM)lParam
|
|
)
|
|
);
|
|
} // end of wxGaugeWndProc
|
|
|
|
bool wxGauge::Create( wxWindowOS2* pParent,
|
|
wxWindowID vId,
|
|
int nRange,
|
|
const wxPoint& rPos,
|
|
const wxSize& rSize,
|
|
long lStyle,
|
|
const wxValidator& rValidator,
|
|
const wxString& rsName )
|
|
{
|
|
int nX = rPos.x;
|
|
int nY = rPos.y;
|
|
int nWidth = rSize.x;
|
|
int nHeight = rSize.y;
|
|
long lMsStyle = 0L;
|
|
SWP vSwp;
|
|
|
|
SetName(rsName);
|
|
#if wxUSE_VALIDATORS
|
|
SetValidator(rValidator);
|
|
#endif
|
|
if (pParent)
|
|
pParent->AddChild(this);
|
|
m_backgroundColour.Set(wxString(wxT("LIGHT GREY")));
|
|
m_foregroundColour.Set(wxString(wxT("NAVY")));
|
|
|
|
m_nRangeMax = nRange;
|
|
m_nGaugePos = 0;
|
|
m_windowStyle = lStyle;
|
|
|
|
if (vId == wxID_ANY)
|
|
m_windowId = (int)NewControlId();
|
|
else
|
|
m_windowId = vId;
|
|
|
|
if (m_windowStyle & wxCLIP_SIBLINGS )
|
|
lMsStyle |= WS_CLIPSIBLINGS;
|
|
|
|
//
|
|
// OS/2 will use an edit control for this, since there is not a native gauge
|
|
// Other choices include using an armless slider but they are more difficult
|
|
// to control and manipulate
|
|
//
|
|
|
|
lMsStyle = WS_VISIBLE | ES_MARGIN | ES_LEFT | ES_READONLY;
|
|
if (m_windowStyle & wxCLIP_SIBLINGS)
|
|
lMsStyle |= WS_CLIPSIBLINGS;
|
|
|
|
m_hWnd = (WXHWND)::WinCreateWindow( (HWND)GetHwndOf(pParent) // Parent window handle
|
|
,WC_ENTRYFIELD // Window class
|
|
,(PSZ)NULL // Initial Text
|
|
,(ULONG)lMsStyle // Style flags
|
|
,0L, 0L, 0L, 0L // Origin -- 0 size
|
|
,(HWND)GetHwndOf(pParent) // owner window handle (same as parent
|
|
,HWND_TOP // initial z position
|
|
,(HMENU)m_windowId // Window identifier
|
|
,NULL // Slider control data
|
|
,NULL // no Presentation parameters
|
|
);
|
|
|
|
wxAssociateWinWithHandle( m_hWnd
|
|
,(wxWindowOS2*)this
|
|
);
|
|
::WinSetWindowULong(GetHwnd(), QWL_USER, (LONG)this);
|
|
fnWndProcGauge = (WXFARPROC)::WinSubclassWindow(m_hWnd, (PFNWP)wxGaugeWndProc);
|
|
::WinQueryWindowPos(m_hWnd, &vSwp);
|
|
SetXComp(vSwp.x);
|
|
SetYComp(vSwp.y);
|
|
wxFont* pTextFont = new wxFont( 10
|
|
,wxMODERN
|
|
,wxNORMAL
|
|
,wxNORMAL
|
|
);
|
|
SetFont(*pTextFont);
|
|
if (nWidth == -1L)
|
|
nWidth = 50L;
|
|
if (nHeight == -1L)
|
|
nHeight = 28L;
|
|
SetSize( nX
|
|
,nY
|
|
,nWidth
|
|
,nHeight
|
|
);
|
|
m_nWidth = nWidth; // Save for GetBestSize
|
|
m_nHeight = nHeight;
|
|
::WinShowWindow((HWND)GetHWND(), TRUE);
|
|
delete pTextFont;
|
|
return true;
|
|
} // end of wxGauge::Create
|
|
|
|
int wxGauge::GetBezelFace() const
|
|
{
|
|
return 0;
|
|
} // end of wxGauge::GetBezelFace
|
|
|
|
int wxGauge::GetRange() const
|
|
{
|
|
return m_nRangeMax;
|
|
} // end of wxGauge::GetRange
|
|
|
|
int wxGauge::GetShadowWidth() const
|
|
{
|
|
return 0;
|
|
} // end of wxGauge::GetShadowWidth
|
|
|
|
int wxGauge::GetValue() const
|
|
{
|
|
return m_nGaugePos;
|
|
} // end of wxGauge::GetValue
|
|
|
|
bool wxGauge::SetBackgroundColour( const wxColour& rColour )
|
|
{
|
|
if (!wxControl::SetBackgroundColour(rColour))
|
|
return false;
|
|
|
|
LONG lColor = (LONG)rColour.GetPixel();
|
|
|
|
::WinSetPresParam( GetHwnd()
|
|
,PP_BACKGROUNDCOLOR
|
|
,sizeof(LONG)
|
|
,(PVOID)&lColor
|
|
);
|
|
return true;
|
|
} // end of wxGauge::SetBackgroundColour
|
|
|
|
void wxGauge::SetBezelFace( int WXUNUSED(nWidth) )
|
|
{
|
|
} // end of wxGauge::SetBezelFace
|
|
|
|
bool wxGauge::SetForegroundColour( const wxColour& rColour )
|
|
{
|
|
if (!wxControl::SetForegroundColour(rColour))
|
|
return false;
|
|
|
|
LONG lColor = (LONG)rColour.GetPixel();
|
|
|
|
::WinSetPresParam( GetHwnd()
|
|
,PP_FOREGROUNDCOLOR
|
|
,sizeof(LONG)
|
|
,(PVOID)&lColor
|
|
);
|
|
|
|
return true;
|
|
} // end of wxGauge::SetForegroundColour
|
|
|
|
void wxGauge::SetRange( int nRange )
|
|
{
|
|
m_nRangeMax = nRange;
|
|
} // end of wxGauge::SetRange
|
|
|
|
void wxGauge::SetShadowWidth( int WXUNUSED(nWidth) )
|
|
{
|
|
} // end of wxGauge::SetShadowWidth
|
|
|
|
void wxGauge::SetValue( int nPos )
|
|
{
|
|
RECT vRect;
|
|
|
|
m_nGaugePos = nPos;
|
|
::WinQueryWindowRect(GetHwnd(), &vRect);
|
|
::WinInvalidateRect(GetHwnd(), &vRect, FALSE);
|
|
} // end of wxGauge::SetValue
|
|
|
|
wxSize wxGauge::DoGetBestSize() const
|
|
{
|
|
return wxSize(m_nWidth,m_nHeight);
|
|
}
|
|
|
|
#endif // wxUSE_GAUGE
|