Structure conditionnelle et variantsRésolu/Fermé

Question

Bonjour à tous, pouvez vous m'aider svp à comprendre pourquoi ce code ne fonctionne pas ? j'ai une variable de type string à la quelle je veux ajouter du texte mais sur une condition, genre si query1.fieldvalues[]<>'' alors.... if DM.TCab.FieldValues['Tel2'] <> '' then begin info_cab:=info_cab + '/ ' + DM.TCab.FieldValues['Tel2']; end; à l'execution je reçois ce message d'erreur: impossible de convertir un variant de type "Null" en string. je ne comprend pas pourquoi il essaye de convertir alors que j'ai mis une condition. merci d'avance.

ThWilliam · Accepted Answer

Salut,

puisque tu appelles ton field par son nom, n'utilise pas FieldValues qui renvoie un variant (c'est plus lent).

if DM.TCab.FieldByName('Tel2').asString <> '' then
begin
info_cab:=info_cab + '/ ' + DM.TCab.FieldByName('Tel2').asString;
end; 

A +
Thierry

vrachid · Answer

merci à tous ça marche très bien 
Merci Therry

cs_Delphiprog · Answer

"null" est différent d'une chaine vide, tout simplement.
En revanche, si tu utilisais des chaînes au lieu de variants (trop coûteux en temps d'exécution), cela pourrait donner :


if DM.TCab.FieldByName['Tel2'].AsString <> '' then
begin
  info_cab:= info_cab + '/ ' + DM.TCab.FieldByName['Tel2'].AsString;
end;
 
Extrait de l'aide en ligne :
" Remarque :	Comme FieldValues utilise toujours des Variants,c'est une méthode parfois plus lente pour accéder aux données que l'utilisation du format natif du champ (par exemple une propriétéAsXXX du champ),en particulier dans les applications qui traitent de gros volumes de données. "
Mais, si tu tiens absolument à utiliser des variants, tu dois vérifier que ce variant n'est pas null grâce à la fonction varIsNull et tu peux alors écrire :

if not VarIsNull(DM.TCab.FieldValues['Tel2']) then
begin
  info_cab: =info_cab + '/ ' + DM.TCab.FieldValues['Tel2'];
end; 


8000 Lévriers 'galgos' par an sont torturés et massacrés en Espagne
May Delphi be with you 

Pensez à cliquer sur Réponse acceptée lorsque la réponse vous convient.

Structure conditionnelle et variants

3 réponses

Discussions similaires