Souris appuyée, mettre une selection dans le presse papier.

[Résolu]
Signaler
Messages postés
16
Date d'inscription
mardi 21 décembre 2004
Statut
Membre
Dernière intervention
24 mars 2009
-
Messages postés
16
Date d'inscription
mardi 21 décembre 2004
Statut
Membre
Dernière intervention
24 mars 2009
-
Bonjour,

Voila mon probleme, je travaille sur un tchat avec une richtextbox pour recevoir les messages(zonerecois) et une zone de texte pour les envoyer.
Lorsqu'on clique sur zonerecois, le focus revient instantanément dans utilisateurtape.

Private Sub fprincip_Click()
'remet la selection tout à a fin de la richtextbox pour eviter les problemes
zonerecois.SelStart = Len(zonerecois.Text)
'remet le focus là ou l'utilisateur tape
utilisateurtape.SetFocus
End Sub

Comme sur MiRC, je voudrais qu'on puisse copier un texte simplement sélectionné dans la zonerecois.

J'ai essayé comme ca :
Private Sub zonerecois_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
Clipboard.GetText
End Sub

,puis avec MouseUp, rien à faire.
J'ai aussi testé les Sendkeys, mais Ctrl+C est inactif quand le bouton de la souris est enfoncé.
Je seche.

Merci d'avance !

2 réponses

Messages postés
338
Date d'inscription
mardi 28 janvier 2003
Statut
Membre
Dernière intervention
4 novembre 2008
1
bonjour,
je n'ai pas bien compris ce que tu veux faire mais l'instruction qui sert a copier qlq chose dans le presse papier est:

Clipboard.SetText "text a copier dans le presse papier"

et pour recuperer le text du presse papier:

Clipboard.GetText

j'espere que ca t'aidera

Hassen TUNISIE
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 82 internautes nous ont dit merci ce mois-ci

Messages postés
16
Date d'inscription
mardi 21 décembre 2004
Statut
Membre
Dernière intervention
24 mars 2009

Woow, merci beaucoup =)

Ca marche :
Private Sub fprincip_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
Clipboard.SetText zonerecois
.SelText
end sub

Haha, je me sens tout bete ! Merci encore !