Reconnaitre la sélection dans un StringGrid
Bonjour,
Voilà, J'utilise Un TStrinGrid, dont les propriétés ont été personnalisés comme suit:
ColCount = 1
RowCount= 3
ScrollBar=SSNone
GoRowSelect = True
GoRangeSelect=True
Ensuite, à l'événenement OnShow j'implémente ce qui suit:
Code:
1
2
3
4
5
6
| procedure TFFrs.suiTabSheet2Show(Sender: TObject);
begin
StrGridSource.Cells[0,0]:='Selon Activité';
StrGridSource.Cells[0,1]:='Selon Pays';
StrGridSource.Cells[0,2]:='Selon Origine';
end; |
Mon problème est que je voudrais à travers une procédure pouvoir reconnaitre qu'elle est la cellule selectionnée, je m'explique:
Je placer un Bouton qui en cliquant dessus doit reconnaitre la cellule selectionnée au niveau du StringGrid (Relatif au choix de l'utilisateur) pour qu'ensuite la chaine de caractère contennue dans la cellule selectionnée doit être copiée vers une autre cellule d'un 2ème StringGrid...
Code:
1
2
3
4
5
| Procedure TFFrs.SelectBtnClick(Sender: TObject);
begin
If StrGridSource.Selection=[0,0] then
StrGridDestin.Cells[0,0]:=StrGridSource.Cells[0,0]; // Je sais c'est faux mais c'est le but recherché
end; |
Voilà en pièce jointe un aperçu de ce que je voudrais implémenter
Merci encore
