>Alexander -
>


i tried the inverse .... tried to get the clipboard data with the following:

  IF ( OpenClipboard(0) != 0 )
    cf = RegisterClipboardFormat("Rich Text Format")
    h = GetClipBoardData(cf)
    ptr = GlobalLock(h)
    str_RTF = REPLICATE(' ',4096)      
    lstrcpy(str_RTF , ptr)
    CloseClipboard()
    GlobalUnlock(h)
    GlobalFree(h)
    THIS.TEXTRTF = str_RTF
  ENDIF

i get an error "datatype mismatch on the LSTRCPY statment.
can you point me to an example of the correct way to do this ?
or point out what i'm doing wrong here. (all variables are declared
as in your original example).

thanks,