Discussion :

[Yepazix]

Bonjours
J'ai une table paradox et le programme remplit les champs de cette table.
Pour les trois premiers champs il y a des valeurs spécifiques qui sont calculées par le programme et dans tous les autres champs je voudrais mettre la valeur 17, les champs sont tous de type A.

Existe t'il un code qui permet de faire un truc du genre :

Table1.FieldByName('tous les champs sauf 1, 2 et 3').AsString :='17';

ou alors

Table1.FieldByName('champs4, champs5,champs6').AsString := '17';

Merci.

[mico]

Puisque les champs à mettre à 17 sont les derniers tu n'a qu'à y accéder par la propriété Fields[Index] du TDataSet du style :

Code :

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

1
2
3
4
 
 
For X:= NumDebut To NumFin Do
      MonDataset.Fields[X].AsString:='17';

Attention aux numéros des champs : Le premier a le numéro 0 et non 1.