Discussion :

[sebos63]

Bonjour,

J'ai un soucis avec un programme sous Delphi 1.

Je récupère depuis des fichiers / une base DBF des champs définis comme étant des numériques.

Dans l'inspecteur d'objet ces champs sont de type TIntegerField avec la propriété Calculated à false.
En lançant mon exe j'ai l'erreur "Le champ TRUC n'est pas du type attendu" qui me donne un tableau complètement vide.
Je passe la propriété Calculated à true et là plus de message d'erreur, mon tableau s'affiche correctement sauf pour la colonne TRUC qui est vide.

Je pense que l'option Calculated à true provoque un effet de bord et n'est pas liée à mon problème de mauvais typage.

Quelqu'un peut-il m'aider...? D'où peut provenir l'erreur concernant le type de mon champ ?

Merci

[cmen76]

Delphi ne te renseigne pas sur le type de champ actuel et le type de champ attendu, dans le message d'erreur ?

As-tu regardé l'ensemble des valeurs que prend ce champ, dans la table, pour vérifier qu'aucune ne peut faire basculer le type de champ vers un FloatField, par exemple ?

[sebos63]

Bonjour et merci à celui qui m'a répondu...

Sans solution j'ai changé mon fusil d'épaule. Mais un nouveau pb est apparu.

Voici le nouveau contexte.
Mon écran affiche plusieurs lignes qui peuvent être triées via une combo box sur telle ou telle colonne.
Chacune des colonnes contient des Strings. Evidemment le problème est que le tri fonctionne mal lorsqu'une colonne de ce type contient des entiers :
dans ce cas un exemple de tri mal ordonné est

111
2222
333
444
5555

au lieu de

111
333
444
2222
5555

Le tri se fait par l'utilisation des indexes sur tables DBF.
Mon idée pour faire le tri sur les valeurs numériques est de créer un indexe comme suit :

Code :

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

1
2
 
worktbl.AddIndex('LUTRANA', 'cast(LUTRANA as integer)', [ixExpression]);

en m'inspirant de l'exemple souvent trouvé sur le web :

Code :

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

1
2
 
AddIndex('name', 'Upper(L_NAME)+Upper(F_NAME)', [ixExpression]);

Mais la syntaxe est mauvaise puisque j'obtiens l'erreur "champ 'cast(LUTRANA as integer)' non trouvé".

Comment inciter l'indexe à utiliser la valeur numérique de la chaîne de caractères ?

Merci d'avance pour vos réponses