#ifndef WX_PRECOMP
#include "wx/window.h"
+ #include "wx/log.h"
#endif // WX_PRECOMP
#include "wx/caret.h"
#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)
{
- if ( !::SetCaretBlinkTime(milliseconds) )
- {
- wxLogLastError("SetCaretBlinkTime");
- }
+ 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 )
{
- if ( !::CreateCaret(GetWinHwnd(GetWindow()), 0, m_width, m_height) )
- {
- wxLogLastError("CreateCaret");
- }
- else
- {
- m_hasCaret = TRUE;
- }
+ CALL_CARET_API(CreateCaret, (GetWinHwnd(GetWindow()), 0,
+ m_width, m_height));
+
+ m_hasCaret = TRUE;
}
return m_hasCaret;
{
m_hasCaret = FALSE;
- if ( !::DestroyCaret() )
- {
- wxLogLastError("DestroyCaret");
- }
+ 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();
+ }
}
- if ( !::ShowCaret(GetWinHwnd(GetWindow())) )
+ if ( m_hasCaret )
{
- wxLogLastError("ShowCaret");
+ CALL_CARET_API(ShowCaret, (GetWinHwnd(GetWindow())));
}
+ //else: will be shown when we get the focus
}
void wxCaret::DoHide()
{
if ( m_hasCaret )
{
- if ( !::HideCaret(GetWinHwnd(GetWindow())) )
- {
- wxLogLastError("HideCaret");
- }
+ CALL_CARET_API(HideCaret, (GetWinHwnd(GetWindow())));
}
}
{
if ( m_hasCaret )
{
- if ( !::SetCaretPos(m_x, m_y) )
- {
- wxLogLastError("SetCaretPos");
- }
+ 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();
+ OnSetFocus();
+ }
+}