Discussion :

[Manopower]

Bonjour, j'ai une form sur laquelle il y a pas mal de TLabel. Ces labels sont renseignés à la création de la fiche via une base de données et positionnés dynamiquement. J'aimerais savoir s'il était possible, en utilisant d'autres composants par exemple de rendre ces informations "copiables dans le presse-papier"

Merci d'avance !

PS : J'aurais bien mis des textbox en readOnly mais il faut que le fond soit transparent, il y a une image derrière et que l'utilisateur puisse copier la totalité de la fiche ! (un peu comme sur une page Html en fait)

[Jipété]

Une idée comme ça, en passant :

pour les labels, il existe les méthodes GetTextLen et GetTextBuf ; pourquoi ne pas recopier le Buf de chaque label dans un TEdit invisible, et après "EditInvisible.CopyToClipboard;" ?
Je n'ai rien testé, c'est juste une idée.
Mes 2 cts,
--
jp

[TicTacToe]

Salut

Ces labels sont renseignés à la création de la fiche via une base de données et positionnés dynamiquement.

A priori tu as donc une liste des labels quelques part... ?

Après pour mettre tout dans le presse papiers en une seule action tu peux faire

Code :

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

1
2
3
ClipBoard.AsText := '';
for i := 0 to [Nombre de labels] - 1 
  do ClipBoard.AsText := ClipBoard.AsText + [Label(i)].Caption;

sinon, tu peux aussi parcourir tes composants avec Components ou Controls pour obtenir tes labels et leur caption.

je sais pas si je réponds à la question en fait ...