Stockage de données dans le Presse-papiers et lecture du Presse-papiers (Visual Basic)

Article
03/04/2013

Le Presse-papiers peut être utilisé pour stocker des données, telles que du texte et des images.Comme il est partagé par tous les processus actifs, il peut servir à transférer des données entre ces processus.L'objet d' My.Computer.Clipboard vous permet d'accéder facilement au presse-papiers et pour lire et écrire lui.

Lire dans le presse-papiers

Utilisez la méthode d' GetText pour lire le texte dans le presse-papiers.Le code suivant permet de lire le texte et de l'afficher dans une boîte de message.Pour que l'exemple s'exécute correctement, du texte doit être stocké dans le Presse-papiers.

MsgBox(My.Computer.Clipboard.GetText())

Cet exemple de code est également disponible sous forme d'extrait de code IntelliSense.Dans le sélecteur d'extrait de code, il se trouve dans Applications Windows Forms > Presse-papiers.Pour plus d'informations, consultez Extraits de code.

Utilisez la méthode GetImage pour récupérer une image du Presse-papiers.Cet exemple vérifie si une image est bien présente dans le Presse-papiers avant de la récupérer et de l'assigner à PictureBox1.

If My.Computer.Clipboard.ContainsImage() Then
  Dim grabpicture As System.Drawing.Image
  grabpicture = My.Computer.Clipboard.GetImage()
  picturebox1.Image = grabpicture
End If

Les éléments placés dans le Presse-papiers seront persistants même après la fermeture de l'application.

Détermination du type de fichier stocké dans le presse-papiers

Les données dans le Presse-papiers peuvent avoir plusieurs formats différents : texte, fichier audio ou image.Pour déterminer quel type de fichier est dans le Presse-papiers, vous pouvez utiliser des méthodes telles que ContainsAudio, ContainsFileDropList, ContainsImage et ContainsText.La méthode ContainsData peut être utilisée pour vérifier un format personnalisé.

Utilisez la fonction ContainsImage pour déterminer si les données dans le Presse-papiers correspondent à une image.Le code suivant vérifie si les données correspondent à une image et indique le résultat.

If My.Computer.Clipboard.ContainsImage() Then
    MsgBox("Clipboard contains an image.")
Else
    MsgBox("Clipboard does not contain an image.")
End If

Effacer le presse-papiers

La méthode Clear efface toutes les données du Presse-papiers.Comme le Presse-papiers est partagé par d'autres processus, si vous l'effacez, cela peut avoir un impact sur ces processus.

Le code suivant montre comment utiliser la méthode Clear.

My.Computer.Clipboard.Clear()

Écriture dans le presse-papiers

Utilisez la méthode SetText pour écrire du texte dans le Presse-papiers.Le code suivant écrit la chaîne "This is a test string" dans le Presse-papiers.

My.Computer.Clipboard.SetText("This is a test string.")

La méthode d' SetText peut accepter un paramètre de format qui contient un type d' TextDataFormat.Le code suivant écrit la chaîne "This is a test string" au format RTF dans le Presse-papiers.

My.Computer.Clipboard.SetText("This is a test string.", 
System.Windows.Forms.TextDataFormat.Rtf)

Utilisez la méthode SetData pour écrire des données dans le Presse-papiers.Cet exemple écrit le DataObjectdataChunk dans le Presse-papiers au format personnalisé specialFormat.

My.Computer.Clipboard.SetData("specialFormat", dataChunk)

Utilisez la méthode SetAudio pour écrire les données audio dans le Presse-papiers.Dans cet exemple, le tableau d'octets musicReader est créé, le fichier cool.wav de ce tableau est lu, puis enregistré dans le Presse-papiers.

Dim musicReader = My.Computer.FileSystem.ReadAllBytes("cool.wav")
My.Computer.Clipboard.SetAudio(musicReader)

Note de sécurité
Étant donné que d'autres utilisateurs peuvent accéder au Presse-papiers, ne l'utilisez pas pour stocker des informations sensibles, telles que des mots de passe ou des données confidentielles.