Copier / Coller

Version imprimable

09/04/2020, 09h43
LescureImage

Copier / Coller

Bonjour,

Je suis sous Builder C++ XE7.

J'ai dans une TStringGrid une liste de noms de fichiers qui sont sur mon PC, avec une colonne masquée qui contient leur chemin d'accès complet.

Je voudrais pouvoir par bouton droit sur la TStringGrid les "Copier", donc en envoyant leur chemin d'accès (ou les infos nécessaires) dans le presse-papier, pour pouvoir par exemple aller ensuite sur le bureau, et les "Coller" pour avoir une copie de ces fichiers sur mon bureau.

Je trouve sur le forum beaucoup d'exemples de copies d'Image BMP ou JPG dans le presse-papier, mais pas d'exemples pour les fichiers.

Merci pour toute indications.

Salut
je dirais tout simplement

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
 
 
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
#include <Vcl.Clipbrd.hpp>
#include "Unit118.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm118 *Form118;
//---------------------------------------------------------------------------
__fastcall TForm118::TForm118(TComponent* Owner)
	: TForm(Owner)
{
  StringGrid1->RowCount=7;
  StringGrid1->Cells[1][1]="Coucou";
  StringGrid1->Cells[1][2]="Coucou1";
  StringGrid1->Cells[1][3]="Coucou2";
  StringGrid1->Cells[1][4]="Coucou3";
  StringGrid1->Cells[1][5]="Coucou4";
  StringGrid1->Cells[1][6]="Coucou5";
  StringGrid1->Cells[2][1]="c:\\test";
  StringGrid1->Cells[2][2]="c:\\test\\1";
  StringGrid1->Cells[2][3]="c:\\test\\2";
  StringGrid1->Cells[2][4]="c:\\test\\3";
  StringGrid1->Cells[2][5]="c:\\test\\4";
  StringGrid1->Cells[2][6]="c:\\test\\5";
}
 //---------------------------------------------------------------------------
void __fastcall TForm118::Button1Click(TObject *Sender)
{
 
   TStringList* S= new TStringList();
   AnsiString Tmp("");
   Clipboard()->Clear(); // on vide le contenu du ClipBoard
   Clipboard()->Close();// Effacement du clipboard
    for(int l(1);l<StringGrid1->RowCount;l++)
     {
      S->AddStrings(StringGrid1->Rows[l]);// on rapatrie toutes les cellules de la ligne correspondante
      Tmp+=S->Strings[1]+" = "+S->Strings[2]+"\r\n"; // on construit le résultat à partir de la stringlist 
      S->Clear(); // on efface la StringList
     }
   Clipboard()->AsText=Tmp;  // on remplit le clipboard
   delete S;// on détruit la StringList
}
 
// Résultat 
Coucou = c:\test
Coucou1 = c:\test\1
Coucou2 = c:\test\2
Coucou3 = c:\test\3
Coucou4 = c:\test\4
Coucou5 = c:\test\5
 
//---------------------------------------------------------------------------

cdlt

10/04/2020, 20h45
blondelle

Bonsoir

une piste https://chgi.developpez.com/tips3/#tips33
16/04/2020, 20h39
DjmSoftware

Marre des membres indélicats

bonsoir
je trouve particulièrement dommage que certains membres demandent de l'aide sur ce forum et ne prennent même pas la peine de suivre leur post et de à minima répondre aux réponses apportées , c'est se moquer ouvertement des personnes qui prennent la peine d'étudier le problème exposé et dans la majorité des cas d'apporté une réponse valable.
je vais pour ma part ne plus répondre à ce genre de post et filtrer un certain nombres de personnes qui n'ont rien a faire sur ce site. .