Question sur l'incrémentation
Bonjour à tous,
Voici mon code :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
|
n := 100;
for i:=0 to dbgGrid.SelectedRows.Count-1 do
begin
dbgGrid.DataSource.DataSet.GotoBookmark(pointer(dbgGrid.SelectedRows.Items[i]));
cdsGroupe.Append;
cdsGroupe.FieldByName('Groupe').AsString := 'Groupe'+ inttostr(n);
cdsGroupe.Post;
End;
end; |
Je voudrais sélectionner plusieurs ligne d'une dbgGrid et puis les mettre dans un autre clientdataset (cdsGroupe) avec le même numéro (ici : ça commence par 'Groupe100')
Mais le problème c'est que je ne sais pas comment incrémenter automatiquement ce numéro de groupe (n). Par exemple : sélectionner 3 ligne et mettre le numéro 'Groupe100' pour les 3, ensuite sélectionner 5 autres lignes et mettre le numéro 'Groupe101' pour les 5...et ainsi de suite.
Quelqu'un peut m'aider s'il vous plait ?
Merci d'avance
