txtsrv.c File Reference

#include "editor.h"
#include "ole2.h"
#include "oleauto.h"
#include "richole.h"
#include "tom.h"
#include "imm.h"
#include "textserv.h"
#include "wine/asm.h"
#include "wine/debug.h"
#include "editstr.h"

Include dependency graph for txtsrv.c:

Go to the source code of this file.

Classes
struct	ITextServicesImpl

Macros
#define	COBJMACROS

Typedefs
typedef struct ITextServicesImpl	ITextServicesImpl

Functions
	WINE_DEFAULT_DEBUG_CHANNEL (richedit)
static ITextServicesImpl *	impl_from_IUnknown (IUnknown *iface)
static HRESULT WINAPI	ITextServicesImpl_QueryInterface (IUnknown *iface, REFIID riid, void **ppv)
static ULONG WINAPI	ITextServicesImpl_AddRef (IUnknown *iface)
static ULONG WINAPI	ITextServicesImpl_Release (IUnknown *iface)
static ITextServicesImpl *	impl_from_ITextServices (ITextServices *iface)
static HRESULT WINAPI	fnTextSrv_QueryInterface (ITextServices *iface, REFIID riid, void **ppv)
static ULONG WINAPI	fnTextSrv_AddRef (ITextServices *iface)
static ULONG WINAPI	fnTextSrv_Release (ITextServices *iface)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_TxSendMessage (ITextServices *iface, UINT msg, WPARAM wparam, LPARAM lparam, LRESULT *plresult)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_TxDraw (ITextServices *iface, DWORD dwDrawAspect, LONG lindex, void *pvAspect, DVTARGETDEVICE *ptd, HDC hdcDraw, HDC hdcTargetDev, LPCRECTL lprcBounds, LPCRECTL lprcWBounds, LPRECT lprcUpdate, BOOL(CALLBACK *pfnContinue)(DWORD), DWORD dwContinue, LONG lViewId)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_TxGetHScroll (ITextServices *iface, LONG *plMin, LONG *plMax, LONG *plPos, LONG *plPage, BOOL *pfEnabled)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_TxGetVScroll (ITextServices *iface, LONG *plMin, LONG *plMax, LONG *plPos, LONG *plPage, BOOL *pfEnabled)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_OnTxSetCursor (ITextServices *iface, DWORD dwDrawAspect, LONG lindex, void *pvAspect, DVTARGETDEVICE *ptd, HDC hdcDraw, HDC hicTargetDev, LPCRECT lprcClient, INT x, INT y)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_TxQueryHitPoint (ITextServices *iface, DWORD dwDrawAspect, LONG lindex, void *pvAspect, DVTARGETDEVICE *ptd, HDC hdcDraw, HDC hicTargetDev, LPCRECT lprcClient, INT x, INT y, DWORD *pHitResult)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_OnTxInplaceActivate (ITextServices *iface, LPCRECT prcClient)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_OnTxInplaceDeactivate (ITextServices *iface)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_OnTxUIActivate (ITextServices *iface)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_OnTxUIDeactivate (ITextServices *iface)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_TxGetText (ITextServices *iface, BSTR *pbstrText)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_TxSetText (ITextServices *iface, LPCWSTR pszText)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_TxGetCurTargetX (ITextServices *iface, LONG *x)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_TxGetBaseLinePos (ITextServices *iface, LONG *x)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_TxGetNaturalSize (ITextServices *iface, DWORD dwAspect, HDC hdcDraw, HDC hicTargetDev, DVTARGETDEVICE *ptd, DWORD dwMode, const SIZEL *psizelExtent, LONG *pwidth, LONG *pheight)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_TxGetDropTarget (ITextServices *iface, IDropTarget **ppDropTarget)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_OnTxPropertyBitsChange (ITextServices *iface, DWORD dwMask, DWORD dwBits)
DECLSPEC_HIDDEN HRESULT __thiscall	fnTextSrv_TxGetCachedSize (ITextServices *iface, DWORD *pdwWidth, DWORD *pdwHeight)
HRESULT WINAPI	CreateTextServices (IUnknown *pUnkOuter, ITextHost *pITextHost, IUnknown **ppUnk)

Variables
static const IUnknownVtbl	textservices_inner_vtbl
static const ITextServicesVtbl	textservices_vtbl

Macro Definition Documentation

COBJMACROS

#define COBJMACROS

Definition at line 21 of file txtsrv.c.

Typedef Documentation

ITextServicesImpl

typedef struct ITextServicesImpl ITextServicesImpl

Function Documentation

CreateTextServices()

HRESULT WINAPI CreateTextServices	(	IUnknown *	pUnkOuter,
		ITextHost *	pITextHost,
		IUnknown **	ppUnk
	)

Definition at line 387 of file txtsrv.c.

{
   ITextServicesImpl *ITextImpl;
 
   TRACE("%p %p --> %p\n", pUnkOuter, pITextHost, ppUnk);
   if (pITextHost == NULL)
      return E_POINTER;
 
   ITextImpl = CoTaskMemAlloc(sizeof(*ITextImpl));
   if (ITextImpl == NULL)
      return E_OUTOFMEMORY;
   InitializeCriticalSection(&ITextImpl->csTxtSrv);
   ITextImpl->csTxtSrv.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": ITextServicesImpl.csTxtSrv");
   ITextImpl->ref = 1;
   ITextHost_AddRef(pITextHost);
   ITextImpl->pMyHost = pITextHost;
   ITextImpl->IUnknown_inner.lpVtbl = &textservices_inner_vtbl;
   ITextImpl->ITextServices_iface.lpVtbl = &textservices_vtbl;
   ITextImpl->editor = ME_MakeEditor(pITextHost, FALSE);
 
   if (pUnkOuter)
      ITextImpl->outer_unk = pUnkOuter;
   else
      ITextImpl->outer_unk = &ITextImpl->IUnknown_inner;
 
   *ppUnk = &ITextImpl->IUnknown_inner;
   return S_OK;
}

fnTextSrv_AddRef()

static ULONG WINAPI fnTextSrv_AddRef ( ITextServices *  iface )

static

Definition at line 123 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
   return IUnknown_AddRef(This->outer_unk);
}

fnTextSrv_OnTxInplaceActivate()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_OnTxInplaceActivate	(	ITextServices *	iface,
		LPCRECT	prcClient
	)

Definition at line 216 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_OnTxInplaceDeactivate()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_OnTxInplaceDeactivate

(

ITextServices *

iface

)

Definition at line 224 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_OnTxPropertyBitsChange()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_OnTxPropertyBitsChange	(	ITextServices *	iface,
		DWORD	dwMask,
		DWORD	dwBits
	)

Definition at line 324 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_OnTxSetCursor()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_OnTxSetCursor	(	ITextServices *	iface,
		DWORD	dwDrawAspect,
		LONG	lindex,
		void *	pvAspect,
		DVTARGETDEVICE *	ptd,
		HDC	hdcDraw,
		HDC	hicTargetDev,
		LPCRECT	lprcClient,
		INT	x,
		INT	y
	)

Definition at line 195 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_OnTxUIActivate()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_OnTxUIActivate

(

ITextServices *

iface

)

Definition at line 232 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_OnTxUIDeactivate()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_OnTxUIDeactivate

(

ITextServices *

iface

)

Definition at line 240 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_QueryInterface()

static HRESULT WINAPI fnTextSrv_QueryInterface ( ITextServices *  iface, REFIID  riid, void **  ppv  )

static

Definition at line 117 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
   return IUnknown_QueryInterface(This->outer_unk, riid, ppv);
}

fnTextSrv_Release()

static ULONG WINAPI fnTextSrv_Release ( ITextServices *  iface )

static

Definition at line 129 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
   return IUnknown_Release(This->outer_unk);
}

fnTextSrv_TxDraw()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_TxDraw	(	ITextServices *	iface,
		DWORD	dwDrawAspect,
		LONG	lindex,
		void *	pvAspect,
		DVTARGETDEVICE *	ptd,
		HDC	hdcDraw,
		HDC	hdcTargetDev,
		LPCRECTL	lprcBounds,
		LPCRECTL	lprcWBounds,
		LPRECT	lprcUpdate,
		BOOL(CALLBACK *pfnContinue)(DWORD)	,
		DWORD	dwContinue,
		LONG	lViewId
	)

Definition at line 147 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_TxGetBaseLinePos()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_TxGetBaseLinePos	(	ITextServices *	iface,
		LONG *	x
	)

Definition at line 298 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_TxGetCachedSize()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_TxGetCachedSize	(	ITextServices *	iface,
		DWORD *	pdwWidth,
		DWORD *	pdwHeight
	)

Definition at line 332 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_TxGetCurTargetX()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_TxGetCurTargetX	(	ITextServices *	iface,
		LONG *	x
	)

Definition at line 290 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_TxGetDropTarget()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_TxGetDropTarget	(	ITextServices *	iface,
		IDropTarget **	ppDropTarget
	)

Definition at line 316 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_TxGetHScroll()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_TxGetHScroll	(	ITextServices *	iface,
		LONG *	plMin,
		LONG *	plMax,
		LONG *	plPos,
		LONG *	plPage,
		BOOL *	pfEnabled
	)

Definition at line 159 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   if (plMin)
      *plMin = This->editor->horz_si.nMin;
   if (plMax)
      *plMax = This->editor->horz_si.nMax;
   if (plPos)
      *plPos = This->editor->horz_si.nPos;
   if (plPage)
      *plPage = This->editor->horz_si.nPage;
   if (pfEnabled)
      *pfEnabled = (This->editor->styleFlags & WS_HSCROLL) != 0;
   return S_OK;
}

fnTextSrv_TxGetNaturalSize()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_TxGetNaturalSize	(	ITextServices *	iface,
		DWORD	dwAspect,
		HDC	hdcDraw,
		HDC	hicTargetDev,
		DVTARGETDEVICE *	ptd,
		DWORD	dwMode,
		const SIZEL *	psizelExtent,
		LONG *	pwidth,
		LONG *	pheight
	)

Definition at line 306 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_TxGetText()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_TxGetText	(	ITextServices *	iface,
		BSTR *	pbstrText
	)

Definition at line 248 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
   int length;
 
   length = ME_GetTextLength(This->editor);
   if (length)
   {
      ME_Cursor start;
      BSTR bstr;
      bstr = SysAllocStringByteLen(NULL, length * sizeof(WCHAR));
      if (bstr == NULL)
         return E_OUTOFMEMORY;
 
      ME_CursorFromCharOfs(This->editor, 0, &start);
      ME_GetTextW(This->editor, bstr, length, &start, INT_MAX, FALSE, FALSE);
      *pbstrText = bstr;
   } else {
      *pbstrText = NULL;
   }
 
   return S_OK;
}

fnTextSrv_TxGetVScroll()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_TxGetVScroll	(	ITextServices *	iface,
		LONG *	plMin,
		LONG *	plMax,
		LONG *	plPos,
		LONG *	plPage,
		BOOL *	pfEnabled
	)

Definition at line 177 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   if (plMin)
      *plMin = This->editor->vert_si.nMin;
   if (plMax)
      *plMax = This->editor->vert_si.nMax;
   if (plPos)
      *plPos = This->editor->vert_si.nPos;
   if (plPage)
      *plPage = This->editor->vert_si.nPage;
   if (pfEnabled)
      *pfEnabled = (This->editor->styleFlags & WS_VSCROLL) != 0;
   return S_OK;
}

fnTextSrv_TxQueryHitPoint()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_TxQueryHitPoint	(	ITextServices *	iface,
		DWORD	dwDrawAspect,
		LONG	lindex,
		void *	pvAspect,
		DVTARGETDEVICE *	ptd,
		HDC	hdcDraw,
		HDC	hicTargetDev,
		LPCRECT	lprcClient,
		INT	x,
		INT	y,
		DWORD *	pHitResult
	)

Definition at line 205 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
 
   FIXME("%p: STUB\n", This);
   return E_NOTIMPL;
}

fnTextSrv_TxSendMessage()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_TxSendMessage	(	ITextServices *	iface,
		UINT	msg,
		WPARAM	wparam,
		LPARAM	lparam,
		LRESULT *	plresult
	)

Definition at line 135 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
   HRESULT hresult;
   LRESULT lresult;
 
   lresult = ME_HandleMessage(This->editor, msg, wparam, lparam, TRUE, &hresult);
   if (plresult) *plresult = lresult;
   return hresult;
}

fnTextSrv_TxSetText()

DECLSPEC_HIDDEN HRESULT __thiscall fnTextSrv_TxSetText	(	ITextServices *	iface,
		LPCWSTR	pszText
	)

Definition at line 272 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_ITextServices(iface);
   ME_Cursor cursor;
 
   ME_SetCursorToStart(This->editor, &cursor);
   ME_InternalDeleteText(This->editor, &cursor, ME_GetTextLength(This->editor), FALSE);
   if(pszText)
       ME_InsertTextFromCursor(This->editor, 0, pszText, -1, This->editor->pBuffer->pDefaultStyle);
   set_selection_cursors(This->editor, 0, 0);
   This->editor->nModifyStep = 0;
   OleFlushClipboard();
   ME_EmptyUndoStack(This->editor);
   ME_UpdateRepaint(This->editor, FALSE);
 
   return S_OK;
}

impl_from_ITextServices()

static ITextServicesImpl * impl_from_ITextServices ( ITextServices *  iface )

inlinestatic

Definition at line 112 of file txtsrv.c.

{
   return CONTAINING_RECORD(iface, ITextServicesImpl, ITextServices_iface);
}

Referenced by fnTextSrv_AddRef(), fnTextSrv_OnTxInplaceActivate(), fnTextSrv_OnTxInplaceDeactivate(), fnTextSrv_OnTxPropertyBitsChange(), fnTextSrv_OnTxSetCursor(), fnTextSrv_OnTxUIActivate(), fnTextSrv_OnTxUIDeactivate(), fnTextSrv_QueryInterface(), fnTextSrv_Release(), fnTextSrv_TxDraw(), fnTextSrv_TxGetBaseLinePos(), fnTextSrv_TxGetCachedSize(), fnTextSrv_TxGetCurTargetX(), fnTextSrv_TxGetDropTarget(), fnTextSrv_TxGetHScroll(), fnTextSrv_TxGetNaturalSize(), fnTextSrv_TxGetText(), fnTextSrv_TxGetVScroll(), fnTextSrv_TxQueryHitPoint(), fnTextSrv_TxSendMessage(), and fnTextSrv_TxSetText().

impl_from_IUnknown()

static ITextServicesImpl * impl_from_IUnknown ( IUnknown *  iface )

inlinestatic

Definition at line 47 of file txtsrv.c.

{
   return CONTAINING_RECORD(iface, ITextServicesImpl, IUnknown_inner);
}

Referenced by ITextServicesImpl_AddRef(), ITextServicesImpl_QueryInterface(), ITextServicesImpl_Release(), unk_AddRef(), unk_QueryInterface(), and unk_Release().

ITextServicesImpl_AddRef()

static ULONG WINAPI ITextServicesImpl_AddRef ( IUnknown *  iface )

static

Definition at line 78 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_IUnknown(iface);
   LONG ref = InterlockedIncrement(&This->ref);
 
   TRACE("(%p) ref=%d\n", This, ref);
 
   return ref;
}

ITextServicesImpl_QueryInterface()

static HRESULT WINAPI ITextServicesImpl_QueryInterface ( IUnknown *  iface, REFIID  riid, void **  ppv  )

static

Definition at line 52 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_IUnknown(iface);
 
   TRACE("(%p)->(%s, %p)\n", iface, debugstr_guid(riid), ppv);
 
   if (IsEqualIID(riid, &IID_IUnknown))
      *ppv = &This->IUnknown_inner;
   else if (IsEqualIID(riid, &IID_ITextServices))
      *ppv = &This->ITextServices_iface;
   else if (IsEqualIID(riid, &IID_IRichEditOle) || IsEqualIID(riid, &IID_ITextDocument) ||
            IsEqualIID(riid, &IID_ITextDocument2Old)) {
      if (!This->editor->reOle)
         if (!CreateIRichEditOle(This->outer_unk, This->editor, (void **)(&This->editor->reOle)))
            return E_OUTOFMEMORY;
      return IUnknown_QueryInterface(This->editor->reOle, riid, ppv);
   } else {
      *ppv = NULL;
      FIXME("Unknown interface: %s\n", debugstr_guid(riid));
      return E_NOINTERFACE;
   }
 
   IUnknown_AddRef((IUnknown*)*ppv);
   return S_OK;
}

ITextServicesImpl_Release()

static ULONG WINAPI ITextServicesImpl_Release ( IUnknown *  iface )

static

Definition at line 88 of file txtsrv.c.

{
   ITextServicesImpl *This = impl_from_IUnknown(iface);
   LONG ref = InterlockedDecrement(&This->ref);
 
   TRACE("(%p) ref=%d\n", This, ref);
 
   if (!ref)
   {
      ME_DestroyEditor(This->editor);
      This->csTxtSrv.DebugInfo->Spare[0] = 0;
      DeleteCriticalSection(&This->csTxtSrv);
      CoTaskMemFree(This);
   }
   return ref;
}

WINE_DEFAULT_DEBUG_CHANNEL()

WINE_DEFAULT_DEBUG_CHANNEL

(

richedit

)

Variable Documentation

textservices_inner_vtbl

const IUnknownVtbl textservices_inner_vtbl

static

Initial value:

=
{
   ITextServicesImpl_QueryInterface,
   ITextServicesImpl_AddRef,
   ITextServicesImpl_Release
}

Definition at line 105 of file txtsrv.c.

Referenced by CreateTextServices().

textservices_vtbl

const ITextServicesVtbl textservices_vtbl

static

Initial value:

=
{
   fnTextSrv_QueryInterface,
   fnTextSrv_AddRef,
   fnTextSrv_Release,
   THISCALL(fnTextSrv_TxSendMessage),
   THISCALL(fnTextSrv_TxDraw),
   THISCALL(fnTextSrv_TxGetHScroll),
   THISCALL(fnTextSrv_TxGetVScroll),
   THISCALL(fnTextSrv_OnTxSetCursor),
   THISCALL(fnTextSrv_TxQueryHitPoint),
   THISCALL(fnTextSrv_OnTxInplaceActivate),
   THISCALL(fnTextSrv_OnTxInplaceDeactivate),
   THISCALL(fnTextSrv_OnTxUIActivate),
   THISCALL(fnTextSrv_OnTxUIDeactivate),
   THISCALL(fnTextSrv_TxGetText),
   THISCALL(fnTextSrv_TxSetText),
   THISCALL(fnTextSrv_TxGetCurTargetX),
   THISCALL(fnTextSrv_TxGetBaseLinePos),
   THISCALL(fnTextSrv_TxGetNaturalSize),
   THISCALL(fnTextSrv_TxGetDropTarget),
   THISCALL(fnTextSrv_OnTxPropertyBitsChange),
 
}

Definition at line 359 of file txtsrv.c.

Referenced by CreateTextServices().