Discussion :

[Jihnn]

Bonjour à tous,

J'ai tenté une recherche sur ce forum, rien. Dans la FAQ, j'ai trouvé un code, mais à ce que j'ai vu c'est pour copier quelque chose de bien précis. MSDN, pareil. Soit ce n'est pas clair, soit ce n'est pas utile.

Donc ce que je veux faire, c'est Copier, Coller, Couper, Annuler, Refaire sans spécifier un contrôle ou un texte en particulier. J'ai tenté plusieurs codes, sans succès.
J'ai un seul code qui marche, c'est celui-ci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
SendKeys "^c"
SendKeys "^v"
SendKeys "^x"
' etc

Le problème, c'est que j'ai un raccourci Ctrl + C, Ctrl+V, etc...

Donc je ne sais pas comment faire pour copier rien en particulier, seulement ce que l'utilisateur a sélectionner.

Si la réponse a déjà été posée, je m'en excuse. Mes recherches ont bel et bien été vaines.

Merci d'avance,

Thunder

[jmfmarques]

Si tu nous précisais, Thunder :

ce que l'utilisateur a sélectionné dans quoi ?

Je te rappelle que les boutons de la souris fonctionnent (exactement comme dans Word, par exemple).

Je te rappelle également l'existence de l'objet clipboard (aide en ligne).

Quoi qu'il en soit : si tu veux une aide précise, il va falloir que tu te montres très précis également sur ce que tu veux faire et dans quelles circonstances tu veux le faire.

[Jihnn]

Justement, ça peut être n'importe quoi : Une ligne dans un RichTextBox comme une ligne dans un TextBox. Je veux simplement être capable de Copier, Couper ce qui est sélectionné, et aussi Annuler (Ctrl + Z) et Refaire (Ctrl + Y)

Je connais l'objet Clipboard, mais sa seule utilité dans ce cas-ci, c'est .GetText. C'est ce que j'utilise, soit dit en passant.

[jmfmarques]

oui ?
Et où est alors ton problème ?
Il te suffit de gérer ...

Voilà un exemple : :
sur une form : une textbox text1 et 2 boutons de commande command1 et command2
et le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Command1_Click()
  Text1.Text = Text1.Text & Clipboard.GetText
 End Sub
 
Private Sub Command2_Click()
 Clipboard.Clear
End Sub
 
Private Sub Form_Activate()
  Command2.Caption = "vider le presse-papier"
  Command1.Caption = "coller le presse papier"
End Sub
 
Private Sub Text1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
 Clipboard.SetText "/" & Clipboard.GetText & Text1.SelText
End Sub

en séparant par un séparateur (ici un slash) les mots que tu mets dans le presse-papiers tu peux ensuite les gérer (instr, mid, etc...) comme tu le veux... et donc décider d'agir avec telle ou telle autre partie de clipboard (pour tes Undo, par exemple).

A toi de faire maintenant preuve d'astuce (ce sera plus une gymnastique de la pensée que de la syntaxe)

[Jihnn]

Justement, ce qui peut être sélectionné peut être n'importe où, je veux juste copier ce qui est sélectionné ^^

Exactement comme la commande de base.

Si je sais copier, normalement, je devrais être capable de faire le reste... je crois.

[jmfmarques]

Si je sais copier, normalement, je devrais être capable de faire le reste... je crois.

et où est donc ton problème, pour copier, Thunder ?

Prends un verre d'eau, un pastis, ce que tu veux... et regarge les choses simplement :

Tu as dis plus haut ; "ce que sélectionne l'utilisateur"...
Où peut-ib sélectionner ? (les contrôles possibles sont peu nombreux, non ?)
A quoi reconnait-t-on qu'un texte est sélectionné ?
Pour une textbox, par exemple, à la propriété seltext...

Je pourrais tout te dire, Thunder, mais préfèrerais vraiment (comme d'habitude) que tu trouves toi-même le mécanisme simple à imaginer et mettre en oeuvre...

Je ne viendrai m'en mêler que si indispensable.

Allez ! vas-y ! tu peux, crois-moi ...