Smileys weergeven na tekstinvoer.

[Mugaru]

Hallo Helpmij,

Ik ben bezig met een simpele Chat (online) in VB.. En ja zeker.. het werkt allemaal..
maar nu heb ik een vraagje.. Zoals boven in de titel al aangegeven wil ik smiley laten zien wanneer de gebruiker (chatter) bijvoorbeeld; : P Invoert.

Mijn vraag is dus.. hoe kan ik mijn chat doorgeven dat hij dan de afbeelding moet laten zien.. en hoe kan ik uberhaupt vertellen dat hij bij een bepaalde tekstinvoer die ene smiley weergeeft.. ?
Iemand suggesties?

Alvast bedankt!

Groet,

Mugaru

 

[old Hippy]

Hi maak even een form met een richtextboxen een aantal pictureboxen set in de picturebox een smeily en moem de picturebox naar je smeily

Private Sub btnwink_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnwink.Click
        Clipboard.SetDataObject(btnwink.Image)
        Tekst.AllowDrop = True
        Tekst.Paste()
        Clipboard.SetDataObject("") 'clearclipboard
    End Sub

btnwink is de eerste smeily

PS. Derichtextbox heet Text

 

[Mugaru]

Bedankt! Ik ga het meteen testen!



edit:
Werkt super!!! Nu moet ik alleen nog zo zien te krijgen dat hij de afbeelding ook verzend wanneer ik op send klikt.. hij zend dan namelijk een leeg iets.. verder werkt hij! :thumb: