SendMessage(RichTextBox1.Hwnd,WM_PASTE,0&,0&)