Nu hab ich schon das nächste mir unerklärliche Problem...
Und zwar habe ich zum verdeutlichen einfach mal das Funktionierende Beispiel
von Trolli genommen und abgeändert.

Ich habe nichts weiter gemacht als folgendes Global Declariert:

IRichEditOle* pRichEditOle;
HBITMAP hBitmap;

HANDLE	hThread;
DWORD	hThreadID; 
HWND	hRichEdit;

Somit müste ich ja alle Funktionen in jeder Funktion benutzen können.

Dann habe ich das Adden des Smilies in einen Tread verpackt und Sekündlich
einen Smilie adden lassen...

Doch da hört es auf... Sobald er den Smilie adden will, kommt der selbe fehler wie bei mir in meinem Programm ( Der Speicher Fehler )

Kann mir das jemand erklären ?

Vielen Dank soweit !

#include <windows.h> 
#include <Richedit.h> 
#include <richole.h> 

IRichEditOle* pRichEditOle;
HBITMAP hBitmap;

HANDLE	hThread;
DWORD	hThreadID; 
HWND	hRichEdit;

class CImageDataObject : IDataObject 
{ 
public: 
    // This static function accepts a pointer to IRochEditOle 
    //   and the bitmap handle. 
    // After that the function insert the image in the current 
    //   position of the RichEdit 
    // 
    static void InsertBitmap(IRichEditOle* pRichEditOle, HBITMAP hBitmap) 
    { 
        SCODE sc; 

        // Get the image data object 
        // 
        CImageDataObject *pods = new CImageDataObject; 
        LPDATAOBJECT lpDataObject; 
        pods->QueryInterface(IID_IDataObject, (void **)&lpDataObject); 

        pods->SetBitmap(hBitmap); 

        // Get the RichEdit container site 
        // 
        IOleClientSite *pOleClientSite;    
        pRichEditOle->GetClientSite(&pOleClientSite); 

        // Initialize a Storage Object 
        // 
        IStorage *pStorage;    

        LPLOCKBYTES lpLockBytes = NULL; 
        sc = ::CreateILockBytesOnHGlobal(NULL, TRUE, &lpLockBytes); 

        sc = ::StgCreateDocfileOnILockBytes(lpLockBytes, 
            STGM_SHARE_EXCLUSIVE|STGM_CREATE|STGM_READWRITE, 0, &pStorage); 
        if (sc != S_OK) 
        { 
            lpLockBytes = NULL; 
        } 

        // The final ole object which will be inserted in the richedit control 
        // 
        IOleObject *pOleObject; 
        pOleObject = pods->GetOleObject(pOleClientSite, pStorage); 

        // all items are "contained" -- this makes our reference to this object 
        //  weak -- which is needed for links to embedding silent update. 
        OleSetContainedObject(pOleObject, TRUE); 

        // Now Add the object to the RichEdit 
        // 
        REOBJECT reobject; 
        ZeroMemory(&reobject, sizeof(REOBJECT)); 
        reobject.cbStruct = sizeof(REOBJECT); 

        CLSID clsid; 
        sc = pOleObject->GetUserClassID(&clsid); 

        reobject.clsid = clsid; 
        reobject.cp = REO_CP_SELECTION; 
        reobject.dvaspect = DVASPECT_CONTENT; 
        reobject.poleobj = pOleObject; 
        reobject.polesite = pOleClientSite; 
        reobject.pstg = pStorage; 

        // Insert the bitmap at the current location in the richedit control 
        // 
        pRichEditOle->InsertObject(&reobject); 

        // Release all unnecessary interfaces 
        // 
        pOleObject->Release(); 
        pOleClientSite->Release(); 
        pStorage->Release(); 
        lpDataObject->Release(); 
    } 
private: 
    ULONG m_ulRefCnt; 
    BOOL  m_bRelease; 

    // The data being bassed to the richedit 
    // 
    STGMEDIUM m_stgmed; 
    FORMATETC m_fromat; 

public: 
    CImageDataObject() : m_ulRefCnt(0) { 
        m_bRelease = FALSE; 
    } 

    ~CImageDataObject() { 
        if (m_bRelease) 
            ::ReleaseStgMedium(&m_stgmed); 
    } 

    // Methods of the IUnknown interface 
    // 
    STDMETHOD(QueryInterface)(REFIID iid, void ** ppvObject) 
    { 
        if (iid == IID_IUnknown || iid == IID_IDataObject) 
        { 
            *ppvObject = this; 
            AddRef(); 
            return S_OK; 
        } 
        else 
            return E_NOINTERFACE; 
    }

Zum testen ob der Tread funktioniert, einfach mal das InsertBitmap
auskommentieren und die MessageBox wieder beifügen !

Ich hatte auch die ganze Fehlerbehandlung rausgenommen, vielleicht solltest du die wieder einfügen. (ASSERT / AfxThrowOleException)

static void InsertBitmap(IRichEditOle* pRichEditOle, HBITMAP hBitmap) 
    { 
        SCODE sc; 

        // Get the image data object 
        // 
        CImageDataObject *pods = new CImageDataObject; 
        LPDATAOBJECT lpDataObject; 
        pods->QueryInterface(IID_IDataObject, (void **)&lpDataObject); 

        pods->SetBitmap(hBitmap); 

        // Get the RichEdit container site 
        // 
        IOleClientSite *pOleClientSite;    
        pRichEditOle->GetClientSite(&pOleClientSite); 

        // Initialize a Storage Object 
        // 
        IStorage *pStorage;    

        LPLOCKBYTES lpLockBytes = NULL; 
        sc = ::CreateILockBytesOnHGlobal(NULL, TRUE, &lpLockBytes); 

		assert(lpLockBytes != NULL);

        sc = ::StgCreateDocfileOnILockBytes(lpLockBytes, 
            STGM_SHARE_EXCLUSIVE|STGM_CREATE|STGM_READWRITE, 0, &pStorage); 
        if (sc != S_OK) 
        { 
            lpLockBytes = NULL; 
        } 
		assert(pStorage != NULL);

        // The final ole object which will be inserted in the richedit control 
        // 
        IOleObject *pOleObject; 
        pOleObject = pods->GetOleObject(pOleClientSite, pStorage); 

        // all items are "contained" -- this makes our reference to this object 
        //  weak -- which is needed for links to embedding silent update. 
        OleSetContainedObject(pOleObject, TRUE); 

        // Now Add the object to the RichEdit 
        // 
        REOBJECT reobject; 
        ZeroMemory(&reobject, sizeof(REOBJECT)); 
        reobject.cbStruct = sizeof(REOBJECT); 

        CLSID clsid; 
        sc = pOleObject->GetUserClassID(&clsid); 

        reobject.clsid = clsid; 
        reobject.cp = REO_CP_SELECTION; 
        reobject.dvaspect = DVASPECT_CONTENT; 
        reobject.poleobj = pOleObject; 
        reobject.polesite = pOleClientSite; 
        reobject.pstg = pStorage; 

        // Insert the bitmap at the current location in the richedit control 
        // 
        pRichEditOle->InsertObject(&reobject); 

        // Release all unnecessary interfaces 
        // 
        pOleObject->Release(); 
        pOleClientSite->Release(); 
        pStorage->Release(); 
        lpDataObject->Release(); 
    }

Aber der Fehler erscheint immer noch ganz genau so

The client will pull one format from the object using IDataObject::GetData(). The format of the data to be cached is passed in pFormatEtc, which may not in this case be NULL.

Allerdings habe ich leider auch keine Ahnung, wie man das genau anstellen muss, damit es klappt - gibt es hier niemanden, der da Erfahrung hat? -King-?

sc = pOleObject->GetUserClassID(&clsid);

Dort wird das pOleObject erst auf 0x000000
gesetzt (hoffe irre mich jetz nicht)

i have defined my AddIcon Sub Routine, so that i can Add Icons from all Routines...

This Sub Gets the Ole Handle and Calls then the InsertBitmap Class.

But then i become an error.

When i call the AddIcon from the WndProc than all right.

Now i have done it.

I Send an Userdefined UserMessage ( SendMessage( hWndMain, WM_INSERTSMILIE, NULL, NULL ); )

And this WM_INSERTSMILIE i check in my WndProc.

So its all Right now.