Discussion :

[microbe83]

Bonsoir,
je n'arrive pas à voir si une cellule de ma table est vide ( NULL )
je me connect sur ma table et je souhaiterais récupéré ma table dans une grille tout marche juste au moment ou dans ma table j'aie une cellule vide, j'ai un message d'erreur " impossible de convertir le variant (Null) en type (String) "

if ( ADOTable3->FieldValues["QTE"].Empty() )
{
SG_DEV->Cells[xx+4][ny] = "";
}
else
{
SG_DEV->Cells[xx+4][ny] = ADOTable3->FieldValues["QTE"];
}

merci .

[ShaiLeTroll]

Code :

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

if ( ADOTable3->FieldByName("QTE")->IsNull() )

IsNull c'est peut-être une propriété, tu changeras () au besoin

FieldValues[] fourni des Variants, j'ignore comment il gère le NULL
FieldByName() fourni un TField, il offre un accès à de nombreuses fonctions dont IsNull, AsString, IsBlob ... et en plus permet un dynamic_cast pour accéder au TIntegerField, TFloatField, TBlobField...

Personnellement, je n'utilise QUE FieldByName, cela évite la conversion en Variant par FieldValues puis la reconversion en chaine d'un champ INTEGER lors de l'affectation à la Cellule

Code :

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

SG_DEV->Cells[xx+4][ny] = IntToStr(ADOTable3->FieldByName("QTE")->AsInteger);

On doit aussi pouvoir utiliser directement AsString

Code :

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

SG_DEV->Cells[xx+4][ny] = ADOTable3->FieldByName("QTE")->AsString;

[microbe83]

Merci , marche nikel