TTable.FieldByName ou TTable.Fields.Fields.Value

Résolu
vico8000
Messages postés
287
Date d'inscription
lundi 18 janvier 2016
Statut
Membre
Dernière intervention
14 février 2018
- Modifié le 5 sept. 2017 à 11:53
vico8000
Messages postés
287
Date d'inscription
lundi 18 janvier 2016
Statut
Membre
Dernière intervention
14 février 2018
- 12 sept. 2017 à 08:12
Bonjour,

De nouveau, un problème se présente à moi et je ne trouve malheureusement pas de solution. Je m'explique :

...
else if Transtypage[j] = 9 then //Date
Begin
ConsoleTrace('AVANT DATE',DebuggLevel1);
ConsoleTrace('Avant Date : ' + NorfondTable2.FieldByName(Nom_champ[k]).AsString, DebuggLevel1);
TraitementDate := NorfondTable2.FieldByName(Nom_champ[k]).AsString;
CommandeSQL := CommandeSQL + ', ''' + traitementDate + '''';
ConsoleTrace('Apres Date', DebuggLevel1);
End;
...


Je récupère une valeur d'une table DBase pour l'enregistrer dans un table SQL. Pour récupérer la valeur enregistrée, j'utilise la propriété FieldbyName, et c'est la que j'ai mon problème. cela ne fonctionne pas.

J'ai également testé de la façon suivante :

NorfondTable2.Fields.Fields[k].value.AsString;


Cela ne fonctionne pas non plus.
Je n'ai pas mis le code avant/aprés parce que je sais que le point qui pose problème ce trouve sur cette ligne.

Merci par avance. Cordialement.

2 réponses

papyvore
Messages postés
223
Date d'inscription
samedi 15 novembre 2003
Statut
Membre
Dernière intervention
16 décembre 2021
15
6 sept. 2017 à 09:32
salut
value est bien string ou tDate
0
vico8000
Messages postés
287
Date d'inscription
lundi 18 janvier 2016
Statut
Membre
Dernière intervention
14 février 2018
2
12 sept. 2017 à 08:12
salut, après une batterie de tests plus poussée, j'ai pu constater que le problème ne venait pas de ce point.
Les lignes de code citées ci dessus fonctionnent correctement.

Merci quand même. cordialement.
0