Discussion :

[frantzgac]

Bonjour

Je souhaite récupérer dans un TMemo en temps réel (chaque seconde) les valeurs contenues dans le presse papier quand celui ci est au format CF_TEXT.

Je veux écarter la recopie dans TMemo quand sa valeur n'a pas changé.

pour cela je compare la dernière valeur connue du presse papier (versée dans un TMemo) avec celle versée dans un TStringList

Le problème est que TStringList.add met toutes les lignes du presse papier dans une seule ligne de TStringList tandis que TMemo.Lines.add crée autant de lignes +1 qu'il y a de CRLF.

J'en déduis que le Add de TMemo.Lines n'est pas celui de TStringList

Quelle méthode ou composant utiliser pour obtenir une fragmentation des lignes (en dehors d'un deuxième TMemo invisible) ?

Merci

[SergioMaster]

Bonjour,

cela dépend de la version de Delphi.
Si je me base sur la 12, à ma souvenance valable aussi avec les versions 10.2, 10.3 et 11, j'utiliserai un TArray<String> ou une autre collection de l'unité System.Generics.Collections

[exoseven]

pour copier plusieurs lignes dans une TStringList ils faut utiliser TStringList.Text, si tu veux conserver l'ancien contenu il faut le sauvegarder pour le rajouter avec le nouveau

[frantzgac]

Bonjour,

cela dépend de la version de Delphi.
Si je me base sur la 12, à ma souvenance valable aussi avec les versions 10.2, 10.3 et 11, j'utiliserai un TArray<String> ou une autre collection de l'unité System.Generics.Collections

Je suis en version 7...

[frantzgac]

pour copier plusieurs lignes dans une TStringList ils faut utiliser TStringList.Text, si tu veux conserver l'ancien contenu il faut le sauvegarder pour le rajouter avec le nouveau

En version 7 je ne vois pas comment exploiter TStringList.Text mais SetText(PChar(AnsiString)) semble fonctionner

Merci

[Andnotor]

Je souhaite récupérer dans un TMemo en temps réel (chaque seconde) les valeurs contenues dans le presse papier quand celui ci est au format CF_TEXT.

Il faudra t'assurer que le presse-papier contient bien ce format mais plutôt qu'une lecture toutes les secondes et cette comparaison, autant demander au système de t'envoyer un message WM_CLIPBOARDUPDATE à chaque changement par AddClipboardFormatListener.

A noter que le presse-papier peut encore être verrouillé par l' "expéditeur" à la réception de ce message, plusieurs tentatives de lecture peuvent être nécessaires (boucle avec délai).