#include "wx/msw/private.h"
+// ---------------------------------------------------------------------------
+// macros
+// ---------------------------------------------------------------------------
+
+// under Win16 the caret APIs are void but under Win32 they may return an
+// error code which we want to check - this macro does just this
+#ifdef __WIN16__
+ #define CALL_CARET_API(api, args) api args
+#else // Win32
+ #define CALL_CARET_API(api, args) \
+ if ( !api args ) \
+ wxLogLastError(_T(#api))
+#endif // Win16/32
+
// ===========================================================================
// implementation
// ===========================================================================
int blinkTime = ::GetCaretBlinkTime();
if ( !blinkTime )
{
- wxLogLastError("GetCaretBlinkTime");
+ wxLogLastError(wxT("GetCaretBlinkTime"));
}
return blinkTime;
//static
void wxCaretBase::SetBlinkTime(int milliseconds)
{
-#ifdef __WIN16__
- ::SetCaretBlinkTime(milliseconds) ;
-#else
- if ( !::SetCaretBlinkTime(milliseconds) )
- {
- wxLogLastError("SetCaretBlinkTime");
- }
-#endif
+ CALL_CARET_API(SetCaretBlinkTime, (milliseconds));
}
// ---------------------------------------------------------------------------
bool wxCaret::MSWCreateCaret()
{
- wxASSERT_MSG( GetWindow(), "caret without window cannot be created" );
- wxASSERT_MSG( IsOk(), "caret of zero size cannot be created" );
+ wxASSERT_MSG( GetWindow(), wxT("caret without window cannot be created") );
+ wxASSERT_MSG( IsOk(), wxT("caret of zero size cannot be created") );
if ( !m_hasCaret )
{
-#ifdef __WIN16__
- ::CreateCaret(GetWinHwnd(GetWindow()), 0, m_width, m_height) ;
+ CALL_CARET_API(CreateCaret, (GetWinHwnd(GetWindow()), 0,
+ m_width, m_height));
+
m_hasCaret = TRUE;
-#else
- if ( !::CreateCaret(GetWinHwnd(GetWindow()), 0, m_width, m_height) )
- {
- wxLogLastError("CreateCaret");
- }
- else
- {
- m_hasCaret = TRUE;
- }
-#endif
}
return m_hasCaret;
{
m_hasCaret = FALSE;
-#ifdef __WIN16__
- ::DestroyCaret() ;
-#else
- if ( !::DestroyCaret() )
- {
- wxLogLastError("DestroyCaret");
- }
-#endif
+ CALL_CARET_API(DestroyCaret, ());
}
}
void wxCaret::DoShow()
{
- wxASSERT_MSG( GetWindow(), "caret without window cannot be shown" );
- wxASSERT_MSG( IsOk(), "caret of zero size cannot be shown" );
+ wxASSERT_MSG( GetWindow(), wxT("caret without window cannot be shown") );
+ wxASSERT_MSG( IsOk(), wxT("caret of zero size cannot be shown") );
- if ( !m_hasCaret )
+ // we might not have created the caret yet if we had got the focus first
+ // and the caret was shown later - so do it now if we have the focus but
+ // not the caret
+ if ( !m_hasCaret && (wxWindow::FindFocus() == GetWindow()) )
{
- (void)MSWCreateCaret();
+ if ( MSWCreateCaret() )
+ {
+ DoMove();
+ }
}
-#ifdef __WIN16__
- ::ShowCaret(GetWinHwnd(GetWindow())) ;
-#else
- if ( !::ShowCaret(GetWinHwnd(GetWindow())) )
+ if ( m_hasCaret )
{
- wxLogLastError("ShowCaret");
+ CALL_CARET_API(ShowCaret, (GetWinHwnd(GetWindow())));
}
-#endif
+ //else: will be shown when we get the focus
}
void wxCaret::DoHide()
{
if ( m_hasCaret )
{
-#ifdef __WIN16__
- ::HideCaret(GetWinHwnd(GetWindow())) ;
-#else
- if ( !::HideCaret(GetWinHwnd(GetWindow())) )
- {
- wxLogLastError("HideCaret");
- }
-#endif
+ CALL_CARET_API(HideCaret, (GetWinHwnd(GetWindow())));
}
}
{
if ( m_hasCaret )
{
-#ifdef __WIN16__
- ::SetCaretPos(m_x, m_y) ;
-#else
- if ( !::SetCaretPos(m_x, m_y) )
- {
- wxLogLastError("SetCaretPos");
- }
-#endif
+ wxASSERT_MSG( wxWindow::FindFocus() == GetWindow(),
+ wxT("how did we lose focus?") );
+
+ // for compatibility with the generic version, the coordinates are
+ // client ones
+ wxPoint pt = GetWindow()->GetClientAreaOrigin();
+ CALL_CARET_API(SetCaretPos, (m_x + pt.x, m_y + pt.y));
}
//else: we don't have caret right now, nothing to do (this does happen)
}
+
+
+// ---------------------------------------------------------------------------
+// resizing the caret
+// ---------------------------------------------------------------------------
+
+void wxCaret::DoSize()
+{
+ if ( m_hasCaret )
+ {
+ m_hasCaret = FALSE;
+ CALL_CARET_API(DestroyCaret, ());
+ MSWCreateCaret();
+ DoMove();
+ }
+}