Discussion :

[guizmoh]

salut tout le monde alors voila je debute en VB6 et j'aimerais savoir comment on peut copier, couper , coller un texte selectionné .

en admettant que j'ai créé un textbox nommé text1 (par defaut)

et un bouton nommé cmd1

Merci beaucoup


ps : en fait je m'entraine en reproduisant le bloc notes de windows. il ne me manque plus que de faire ca (dans le menu au dessus, rajouter selectionner tout , copier, coller, couper, etc)

merci beaucoup de votre aide.

[jmfmarques]

Si tu y tiens vraiment (car, pour ce que tu veux faire, l'utilisation des boutons habituels de ta souris va très bien), tu as l'objet clipboard (aide en ligne) avec ses méthodes et propriétés. C'est très facile...

[guizmoh]

en fait j'ai trouvé mais on utilise les activecontrol et on est obligé d'utiliser un menu... masi j'aiemrais simplement savoir comment faire un bete bouton et quand on appuye, ca copie le texte selectionné .

[jmfmarques]

Ben... en utilisant ClipBoard (aide en ligne), il n'y a rien de plus simple...

[guizmoh]

explique moi si c si simple ^^ merci beaucoup

[jmfmarques]

Là, tu vois,... je ne saurais mieux faire que l'aide en ligne où existent, pour l'objet clipboard, les rubriques suivantes (en anglais chez moi) :

Clearing (pour effacer le contenu)
Copying data to (pour copier)
Extracting text strings (pour extraire des chaines dans un texte)
Getting Data From (pour aller à la pêche de données)
Pasting Data (pour coller)

Que manque-t-il et comment le dire autrement que de la manière dont c'est parfaitement dit ?

[guizmoh]

..... ca veut toujours rien dire ca... de quoitu me parles la ? d'un site internet ? une recherche a faire sur developez.com ?

ou d'autre chose ?

merci de preciser.

[jmfmarques]

ou d'autre chose ?

merci de preciser.

Mais... de la chose la plus proche de toi : l'aide en ligne.
un click sur ?, Aide, ou Help (selon ta version) et tu accèdes à ce paradis encore apparemment inconnu par toi !...

[Megaxel]

Ben oui, guizmoh.
Même les gens qui développent beaucoup ne retiennent pas toutes les syntaxes et les propriétés par coeur.
Tape "ClipBoard" dans ton éditeur, surligne le mot, et tape F1.

[ThierryAIM]

le plus comique, c'est que les raccourcis windows standard (Ctrl-C, Ctrl-X, Ctrl-V) fonctionnent directement dans une textbox, sans code
il suffit d'utiliser SendKeys

[jmfmarques]

C'est sur, les boutons de la souris également (voir plus haut) et... franchement, prendre la souris en main pour cliquer quelque part sur un bouton, ou pour faire un copier-coller classique... je vois pas trop la différence (même avec quelques asendances corses).

[guizmoh]

lool ok les gars merci beaucoup ^^ . franchement . je debut enfin depuis quelques jours masi j'ai l'habitude de demander a mon maitre de stage pour de l'aide. (je susi en stage d'informatique pour l'instant)

[guizmoh]

erf bah no ..... jvois pas comment faire.... j'ai beau chercher ... enfin j'ai trouvé l'aide mais ils disentpa sprécisément comment faire . et de moi meme j'y arrive pas ^^

[méphistopheles]

Code :

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

clipboard.sendtext(text1.text)

[ThierryAIM]

bon, tu veux la totale, alors accroche-toi et amuse-toi bien :

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
17
18
19
20
21
 
Private Const WM_COPY = &H301
Private Const WM_CUT = &H300
Private Const WM_PASTE = &H302
 
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 Sub Command1_Click()
    Clipboard.Clear
    SendMessage Text1.hWnd, WM_COPY, 0, 0
End Sub
 
Private Sub Command2_Click()
    Clipboard.Clear
    SendMessage Text1.hWnd, WM_CUT, 0, 0
End Sub
 
Private Sub Command3_Click()
    SendMessage Text1.hWnd, WM_PASTE, 0, 0
End Sub

Fais ta vie avec ça

Si tu es débutant, comme tu le dis, fais des choses de ton niveau, ou envoie-moi ton maitre de stage !!