I have this code:


VB Code:
  1. For X = 0 To picSmile.UBound
  2.      If RTB1.Find(picSmile(X).Tag, tLoc) <> -1 Then
  3.           RTB1.SelStart = RTB1.Find(picSmile(X).Tag, tLoc)
  4.           RTB1.SelLength = Len(picSmile(X).Tag)
  5.           Clipboard.Clear
  6.           Clipboard.SetData picSmile(X).Image
  7.           SendMessage RTB1.hWnd, WM_PASTE, 0, 0
  8.      End If
  9. Next

if the RTB is not locked or disabled.. it works fine...
but I dont want the use to be able to copy or anything in the RTB

with Enabled = False.. all the formatting looks right.. but the images wont insert...

How do I get around this?

Thanks!