ajouter une valeur dans une table foxpro en delphi

Bonjour,

j'aimerai savoir comment en delphi, faut il faire pour mettre a jour un champs de foxpro avec une valeur calculer en delphi, je m'explique j'ai un champs vide dans foxpro, j'aimerai en parcourant cette requête, je fait diverses opération ou j'obtient un toto avec une valeur différente a chaque tour de boucle et j'aimerai donc insérer cette valeur a chaque fois dans ma table foxpro, j'ai essayer avec :

Code:

---

1 2 3 4 5 6 7

sql := 'update matable set champs1 := ' + toto ;   replacesql('tmp', sql); execsql('tmp'); firstrecord('tmp'); While not QueryEOF('tmp') do

---

merci de votre aide

Bonjour,

ce code ressemble plus a du code foxpro que delphi !

en supposant
1 - que le BDE attaque une table foxpro (jamais essayé)
2- que FoxPro traite le SQL (à la manière de Paradox)

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Query.SQL.Clear; Query.SQL.Text:='update matable set champs1 =:toto' ; Query.ParamByName('toto').asSTring:='Toto'; Query.ExecSQL; // à ce stade tous les enregistrements de la Table auront la colonne 1 = 'Toto'   Query.SQL.Text:='SELECT * FROM MATABLE'; Query.Open; (ou Query.Active:=True); // on est déjà sur le 1° Record While not Query.EOF do begin .... // Traitement Next; end;

---