Discussion :

[PadawanDuDelphi]

Bonjour,

voilà,
J'ai un problème dans mon code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 begin
   Open;
   First;
  Insert; //pb ici
   While not Eof do
   begin
      if(Fields[0].AsString=nom_catenaire) And (Fields[2].AsString='contact'+IntToStr(i)) then
       begin
         FieldByName('conducteur_id').AsInteger:=2*i-1;
         Post;
       end;

Mon problème c'est que la table semble fermer puisque je ne recoit pas la valeur des champs si je fais un showmessage (le test fonctionne si j'enlève le insert, mais plus le post....

Je débute et j'ai du mal à voir ce qui déraille.

Merci à tous.

@+.

[Yurck]

Bonjour,

Il nous faut les informations suivantes
Version Delphi
Type d'objet utilisé
SGBD utilisé

Par exemple si utilise un ClientDataSet et bien en focntion de ta version de Midas.dll (Avant Delphi 6 ou après) et bien le insert fait un insert ou un append. Or si le insert fait un append (delphi 5) et bien tu es en EOf dès l'insertion.

Apportes nous donc quelques précisions

a+

[PadawanDuDelphi]

j'utilise Delphi 2005, base SQL.
J'utilise des ADOQuery pour les requêtes, reliés a des TDataSource.

Et effectivement j'ai oublié de mettre ma ligne de code initiale:

Code :

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

With DataModule1.DataSource1.DataSet do

merci.

[TicTacToe]

ton code n'est pas correct.
Déjà, le Insert et le Post ne sont pas "symétrique"...

Voila ton code corrigé

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 begin
   Open;
   First;
  //Insert; //pb ici  <-- pas le bon moment
   While not Eof do
   begin
      if(Fields[0].AsString=nom_catenaire) And (Fields[2].AsString='contact'+IntToStr(i)) then
       begin
         Edit; <-- si c'est vraiment un ajout que tu veux ca la méthode est différente
         FieldByName('conducteur_id').AsInteger:=2*i-1;
         Post;
       end;
   Next;
   end

Ce code va modifier l'enreg courant. Il ne va pas en ajouter.
Si il faut ajouter, le code est différent, car le le fait d'ajouter un enreg va modifier le curseur courant sur ta table -> la boucle while... n'est plus cohérent.

Si tu remplaces 'Edit' par 'Insert' ou 'Append', le code compilera, mais à moins que tu contrôles vraiments bien le curseurs et l'index de la table, ta ventilation sera assez aléatoire.


Dans ce cas, il faut utiliser un 2eme dataset pointant sur la meme table physique et faire l'ajout sur celle ci par exemple, pour ne pas changer le curseur de la table courante.

(d'ailleurs, y-a-til vraiment qu'une seule table physique en jeu, il n'y a que toi qui le sait...)

[PadawanDuDelphi]

En réalité j'ai plusieurs tables, mais dans cette partie du programme je me sert que de celle là (d'ailleurs la requête c'est simplement un
"SELECT * FROM Table" ).

Et comme je veux simplement modifier mes champs, ton programme marche nickel TicTacToe; merci à toi et à vous tous.

@+.