#endif
#ifndef WX_PRECOMP
+ #include "wx/arrstr.h"
#include "wx/string.h"
#endif // WX_PRECOMP
+#if wxUSE_TEXTCTRL || wxUSE_COMBOBOX
+
#include "wx/textentry.h"
+#include "wx/dynlib.h"
#include "wx/msw/private.h"
#define GetEditHwnd() ((HWND)(GetEditHWND()))
+// ----------------------------------------------------------------------------
+// wxIEnumString implements IEnumString interface
+// ----------------------------------------------------------------------------
+
+// standard VC6 SDK (WINVER == 0x0400) does not know about IAutoComplete
+#if wxUSE_OLE && (WINVER >= 0x0500)
+ #define HAS_AUTOCOMPLETE
+#endif
+
+#ifdef HAS_AUTOCOMPLETE
+
+#include "wx/msw/ole/oleutils.h"
+#include <shldisp.h>
+
+#if defined(__MINGW32__) || defined (__WATCOMC__)
+ // needed for IID_IAutoComplete, IID_IAutoComplete2 and ACO_AUTOSUGGEST
+ #include <shlguid.h>
+#endif
+
+#ifndef ACO_UPDOWNKEYDROPSLIST
+ #define ACO_UPDOWNKEYDROPSLIST 0x20
+#endif
+
+#ifndef SHACF_FILESYS_ONLY
+ #define SHACF_FILESYS_ONLY 0x00000010
+#endif
+
+DEFINE_GUID(CLSID_AutoComplete,
+ 0x00bb2763, 0x6a77, 0x11d0, 0xa5, 0x35, 0x00, 0xc0, 0x4f, 0xd7, 0xd0, 0x62);
+
+class wxIEnumString : public IEnumString
+{
+public:
+ wxIEnumString(const wxArrayString& strings) : m_strings(strings)
+ {
+ m_index = 0;
+ }
+
+ DECLARE_IUNKNOWN_METHODS;
+
+ virtual HRESULT STDMETHODCALLTYPE Next(ULONG celt,
+ LPOLESTR *rgelt,
+ ULONG *pceltFetched)
+ {
+ if ( !rgelt || (!pceltFetched && celt > 1) )
+ return E_POINTER;
+
+ ULONG pceltFetchedDummy;
+ if ( !pceltFetched )
+ pceltFetched = &pceltFetchedDummy;
+
+ *pceltFetched = 0;
+
+ for ( const unsigned count = m_strings.size(); celt--; ++m_index )
+ {
+ if ( m_index == count )
+ return S_FALSE;
+
+ const wxWX2WCbuf wcbuf = m_strings[m_index].wc_str();
+ const size_t size = (wcslen(wcbuf) + 1)*sizeof(wchar_t);
+ void *olestr = CoTaskMemAlloc(size);
+ if ( !olestr )
+ return E_OUTOFMEMORY;
+
+ memcpy(olestr, wcbuf, size);
+
+ *rgelt++ = wx_static_cast(LPOLESTR, olestr);
+
+ ++(*pceltFetched);
+ }
+
+ return S_OK;
+ }
+
+ virtual HRESULT STDMETHODCALLTYPE Skip(ULONG celt)
+ {
+ m_index += celt;
+ if ( m_index > m_strings.size() )
+ {
+ m_index = m_strings.size();
+ return S_FALSE;
+ }
+
+ return S_OK;
+ }
+
+ virtual HRESULT STDMETHODCALLTYPE Reset()
+ {
+ m_index = 0;
+
+ return S_OK;
+ }
+
+ virtual HRESULT STDMETHODCALLTYPE Clone(IEnumString **ppEnum)
+ {
+ if ( !ppEnum )
+ return E_POINTER;
+
+ wxIEnumString *e = new wxIEnumString(m_strings);
+ e->m_index = m_index;
+
+ e->AddRef();
+ *ppEnum = e;
+
+ return S_OK;
+ }
+
+private:
+ // dtor doesn't have to be virtual as we're only ever deleted from our own
+ // Release() and are not meant to be derived form anyhow, but making it
+ // virtual silences gcc warnings; making it private makes it impossible to
+ // (mistakenly) delete us directly instead of calling Release()
+ virtual ~wxIEnumString() { }
+
+
+ const wxArrayString m_strings;
+ unsigned m_index;
+
+ DECLARE_NO_COPY_CLASS(wxIEnumString)
+};
+
+BEGIN_IID_TABLE(wxIEnumString)
+ ADD_IID(Unknown)
+ ADD_IID(EnumString)
+END_IID_TABLE;
+
+IMPLEMENT_IUNKNOWN_METHODS(wxIEnumString)
+
+#endif // HAS_AUTOCOMPLETE
+
// ============================================================================
// wxTextEntry implementation
// ============================================================================
+// ----------------------------------------------------------------------------
+// operations on text
+// ----------------------------------------------------------------------------
+
void wxTextEntry::WriteText(const wxString& text)
{
::SendMessage(GetEditHwnd(), EM_REPLACESEL, 0, (LPARAM)text.wx_str());
WriteText(wxString());
}
+// ----------------------------------------------------------------------------
+// clipboard operations
+// ----------------------------------------------------------------------------
+
void wxTextEntry::Copy()
{
::SendMessage(GetEditHwnd(), WM_COPY, 0, 0);
::SendMessage(GetEditHwnd(), WM_PASTE, 0, 0);
}
+// ----------------------------------------------------------------------------
+// undo/redo
+// ----------------------------------------------------------------------------
+
void wxTextEntry::Undo()
{
::SendMessage(GetEditHwnd(), EM_UNDO, 0, 0);
return CanUndo();
}
+// ----------------------------------------------------------------------------
+// insertion point and selection
+// ----------------------------------------------------------------------------
+
void wxTextEntry::SetInsertionPoint(long pos)
{
+ // calling DoSetSelection(-1, -1) would select everything which is not what
+ // we want here
+ if ( pos == -1 )
+ pos = GetLastPosition();
+
// be careful to call DoSetSelection() which is overridden in wxTextCtrl
// and not just SetSelection() here
DoSetSelection(pos, pos);
*to = dwEnd;
}
+// ----------------------------------------------------------------------------
+// auto-completion
+// ----------------------------------------------------------------------------
+
+#if wxUSE_OLE
+bool wxTextEntry::AutoCompleteFileNames()
+{
+#ifdef HAS_AUTOCOMPLETE
+ typedef HRESULT (WINAPI *SHAutoComplete_t)(HWND, DWORD);
+ static SHAutoComplete_t s_pfnSHAutoComplete = (SHAutoComplete_t)-1;
+ static wxDynamicLibrary s_dllShlwapi;
+ if ( s_pfnSHAutoComplete == (SHAutoComplete_t)-1 )
+ {
+ if ( !s_dllShlwapi.Load(_T("shlwapi.dll"), wxDL_VERBATIM | wxDL_QUIET) )
+ {
+ s_pfnSHAutoComplete = NULL;
+ }
+ else
+ {
+ wxDL_INIT_FUNC(s_pfn, SHAutoComplete, s_dllShlwapi);
+ }
+ }
+
+ if ( !s_pfnSHAutoComplete )
+ return false;
+
+ HRESULT hr = (*s_pfnSHAutoComplete)(GetEditHwnd(), SHACF_FILESYS_ONLY);
+ if ( FAILED(hr) )
+ {
+ wxLogApiError(_T("SHAutoComplete()"), hr);
+
+ return false;
+ }
+ return true;
+#else // !HAS_AUTOCOMPLETE
+ return false;
+#endif // HAS_AUTOCOMPLETE/!HAS_AUTOCOMPLETE
+}
+
+bool wxTextEntry::AutoComplete(const wxArrayString& choices)
+{
+#ifdef HAS_AUTOCOMPLETE
+ // create an object exposing IAutoComplete interface (don't go for
+ // IAutoComplete2 immediately as, presumably, it might be not available on
+ // older systems as otherwise why do we have both -- although in practice I
+ // don't know when can this happen)
+ IAutoComplete *pAutoComplete = NULL;
+ HRESULT hr = CoCreateInstance
+ (
+ CLSID_AutoComplete,
+ NULL,
+ CLSCTX_INPROC_SERVER,
+ IID_IAutoComplete,
+ wx_reinterpret_cast(void **, &pAutoComplete)
+ );
+ if ( FAILED(hr) )
+ {
+ wxLogApiError(_T("CoCreateInstance(CLSID_AutoComplete)"), hr);
+ return false;
+ }
+
+ // associate it with our strings
+ wxIEnumString *pEnumString = new wxIEnumString(choices);
+ pEnumString->AddRef();
+ hr = pAutoComplete->Init(GetEditHwnd(), pEnumString, NULL, NULL);
+ pEnumString->Release();
+ if ( FAILED(hr) )
+ {
+ wxLogApiError(_T("IAutoComplete::Init"), hr);
+ return false;
+ }
+
+ // if IAutoComplete2 is available, set more user-friendly options
+ IAutoComplete2 *pAutoComplete2 = NULL;
+ hr = pAutoComplete->QueryInterface
+ (
+ IID_IAutoComplete2,
+ wx_reinterpret_cast(void **, &pAutoComplete2)
+ );
+ if ( SUCCEEDED(hr) )
+ {
+ pAutoComplete2->SetOptions(ACO_AUTOSUGGEST | ACO_UPDOWNKEYDROPSLIST);
+ pAutoComplete2->Release();
+ }
+
+ // the docs are unclear about when can we release it but it seems safe to
+ // do it immediately, presumably the edit control itself keeps a reference
+ // to the auto completer object
+ pAutoComplete->Release();
+ return true;
+#else // !HAS_AUTOCOMPLETE
+ wxUnusedVar(choices);
+
+ return false;
+#endif // HAS_AUTOCOMPLETE/!HAS_AUTOCOMPLETE
+}
+#endif // wxUSE_OLE
+
+// ----------------------------------------------------------------------------
+// editable state
+// ----------------------------------------------------------------------------
+
bool wxTextEntry::IsEditable() const
{
return !(::GetWindowLong(GetEditHwnd(), GWL_STYLE) & ES_READONLY);
::SendMessage(GetEditHwnd(), EM_SETREADONLY, !editable, 0);
}
+// ----------------------------------------------------------------------------
+// max length
+// ----------------------------------------------------------------------------
+
void wxTextEntry::SetMaxLength(unsigned long len)
{
if ( len >= 0xffff )
::SendMessage(GetEditHwnd(), EM_LIMITTEXT, len, 0);
}
+
+#endif // wxUSE_TEXTCTRL || wxUSE_COMBOBOX