Discussion :

[pierrot67]

Bonjour


C'est la premiere que ça m'arrive c'est un code tout simple mais ma boucle ne s'arrête pas !

Code :

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

1
2
3
4
5
6
7
8
datamodule2.DepensesFixes.first;
 
repeat
datamodule2.DepensesFixes.edit;
datamodule2.DepensesFixesordre.value:='FIXES';
datamodule2.DepensesFixes.next
until
datamodule2.DepensesFixes.Eof;

N'aurai-je pas vu quelque chose?

Merci d'avance.

[Linkin]

J'aurais plutôt fait (ça permet de gérer le cas où il n'y a pas d'enregistrement dans le ClientDataSet):

Code :

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

1
2
3
4
5
6
7
8
9
 
datamodule2.DepensesFixes.first;
while not datamodule2.DepensesFixes.Eof do
begin
  datamodule2.DepensesFixes.edit;
  datamodule2.DepensesFixesordre.value:='FIXES';
  datamodule2.DepensesFixes.post; // Validation de l'édition
  datamodule2.DepensesFixes.next
end;

[pierrot67]

Merci pour ta réponse mais ça ne fonctionne toujours pas!

[pierrot67]

J'ai trouvé c'est bien mon clientdataset qui me jouais des tours.

Merci encore pour ta réponse