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
//--------------------------------------------------------------------------- |
Partager