Здравствуйте!
Помогите пожайлуста!
При выполнение кода, который копирует текст в буфер обмена, выдаётся следующая ошибка: CoInitialize has not been called в строке pData->SetClipboard();. Операционная система — win 2000.

void CTipaTestDlg::OnButton1()
{
// TODO: Add your control notification handler code here
CString text ="This is test for COleDataSource object";
HGLOBAL hGlobal = ::GlobalAlloc(GMEM_SHARE|GMEM_MOVEABLE, text.GetLength() + 4);
LPSTR buf = (LPSTR)::GlobalLock(hGlobal);
lstrcpy(buf, (LPCTSTR)text);
::GlobalUnlock(hGlobal);

COleDataSource *pData = new COleDataSource;
pData->CacheGlobalData(CF_TEXT, hGlobal);
pData->SetClipboard();
delete pData;
}