[R] Fonction Clipboard.au3

[Sydneysyd]

Salut à tous,

J'aimerais bien comprendre la commande Clipboard.au3

J'aimerais pouvoir récuperer le texte dans un encadré (appelons le encadre1) et pouvoir simuler un copier (ctrl+c par exemple) de facon hide.

J'ai mis en include le clipboard.au3

mais je vois pas quelle commande fais cette fonction ? J'ai essayé ça

Case $encadre1
_ClipBoard_GetData($iformat=1)

mais j'ai une erreur et je vois pas là...

Si j'ai bien compris quand je fais 1 je demande à copier au format texte ?

Merci d'avance pour votre aide ! Je m'y pert un peu ! ^^

[mikell]

J'ai mis en include le clipboard.au3

A priori pas besoin de ça...
ClipPut($text) et ClipGet() , c'est suffisant pour du texte ^^

[Tlem]

Pour pouvoir mettre dans le presse papier le texte d'un document, il faudra d'abord que ce texte soit sélectionné.

Ensuite, pour l'utilisation de la commande _ClipBoard_GetData(), vous avez un exemple dans la doc.
Il est inutile d'écrire _ClipBoard_GetData($iformat=1) car $iformat=1 signifie implicitement que la valeur 1 est définie comme valeur par défaut.
Donc _ClipBoard_GetData() suffit. Par contre si vous voulez un autre format (un son Wave par exemple) il vous faudra écrire _ClipBoard_GetData($CF_WAVE).
$CF_WAVE est une variable qui est initialisée dans le fichier Clipboard.au3, c'est pour cela que dans la documentation de la commande, il est préciser d'inclure ce fichier :

Code : Tout sélectionner

#Include <Clipboard.au3>

[Sydneysyd]

Merci pour vos réponses

La soluce serait juste

Case $encadre1
ClipPut($text)


?

Pour pouvoir mettre dans le presse papier le texte d'un document, il faudra d'abord que ce texte soit sélectionné.

Effectivement, je teste au fur et à mesure et je constate que cela ne marche pas.
Comment faire la selection de facon invisible ?

[sylvanie]

à vue de nez c'est presque ça :

Code : Tout sélectionner

Case $encadre1
$text=guictrlread($Id_controle_encadre)
ClipPut($text) 
 

$Id_controle_encadre est un identifiant de contrôle représentant votre encadré (Edit,label...)
Alors que $encadre1 serait plus (peut être) un contrôle de type bouton qui déclenche l'action

genre ça

► Afficher le texte

Code : Tout sélectionner

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$title="test clipboard"
$Form1 = GUICreate($title, 537, 347, 192, 124)
$Edit1 = GUICtrlCreateEdit("", 72, 56, 337, 129)
GUICtrlSetData(-1, "Edit1"&@CRLF&"blalba"&@CRLF&"toto"&@CRLF&"test")
$Button1 = GUICtrlCreateButton("Button1", 80, 208, 97, 41, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            $text=ControlCommand($title,"",$Edit1,"GetSelected")
            MsgBox(0,"Selection",$text)
            Cliput($text)

    EndSwitch
WEnd

 

[Sydneysyd]

Merci pour ces réponses, je teste et je vous fait un retour.

$encadre1 est une case ou l'on définit le texte que l'on souhaite.

[Sydneysyd]

En relisant,

$encadre1 est un encadre permettant d'ecrire du texte.
Le but est de copier ce qu'il y a l'interieur.

Le code ci-dessus ne fonctionne pas.
En fait, ca ne copie pas.

Une partie du code pour etre plus explicite

$Button2 = GUICtrlCreateButton("Copier", 16, 32, 113, 17)
;bouton copier
$Button2
$text=guictrlread($Button2)
ClipPut($text)
Car si j'ai bien compris, GUICTRLREAD va lire le contenu du bouton2 ?

[sylvanie]

oui tout à fait.

si vous regardez l'exemple que j'ai fourni, je fait un

Code : Tout sélectionner

ControlCommand($title,"",$Edit1,"GetSelected")
 

sur le controle "$Edit1" qui représente ma zone d'edit où réside mon texte et sa partie surlignée

[mikell]

Un exemple simple mais parlant :

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>

$Form1 = GUICreate("test clipboard", 537, 347, 192, 124)
$Edit1 = GUICtrlCreateEdit("", 72, 56, 337, 129)
GUICtrlSetData(-1, "Edit1"&@CRLF&"blalba"&@CRLF&"toto"&@CRLF&"test")
$Button1 = GUICtrlCreateButton("Button1", 80, 208, 97, 41)
GUISetState(@SW_SHOW)

While 1
$nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE        ; si on ferme la gui
            ExitLoop                  ; on sort de la boucle
        Case $Button1
            $text=GuiCtrlRead($Edit1)    ; lit l'edit
            ClipPut($text)               ; envoie dans le clipboard
    EndSwitch
WEnd

GuiDelete($Form1)
MsgBox(0,"test", ClipGet() )       ; récupère du clipboard

[Sydneysyd]

Mikell : EXCELLENT !

C'est exactement ça et en plus très parlant !

Merci, merci, merci.

Je comprend mieux la fonction. Merci à tous pour votre aide.

Je met [R] pour résolu.

Merci encore