Printable View
how to add a picture(.gif) to a richtextbox???
add the picture to the text...
wenn i add a picture in ms word and then drag/drop it to the richtextbox in my app (while it's running...) then it worx..... but how can i do this scripted????
thx in advance
m€
Ich denke daß Ihre "Font Editor" ist kaputt!
die tastatur hat leider ein paar fehler.....
:D ;)
and what's up with the picturein the rtfbox???
Have you tried looking at the RTF Code in the Box, it's the textRTF property, look at this when you paste your picture, then try copy what it does
What you can do is to use an invisible PictureBox. You will have to load picture file into that PictureBox and then paste it into a RichTextBox:
Code:Option Explicit
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const WM_PASTE = &H302
Private Sub Command1_Click()
With Picture1
.AutoSize = True
.Visible = False
.Picture = LoadPicture("C:\Giggling.bmp")
End With
Clipboard.Clear
Clipboard.SetData Picture1.Image, vbCFBitmap
Call SendMessage(RichTextBox1.hwnd, WM_PASTE, 0, 0)
End Sub
Das wetter ist sehr schon!
Ahh, you can't beat proper English edyoocayshun.