Base de donnée vers ListBox - éléments manquants
Bonjour,
j'ai une portion de code qui lie une base de donnée pour renseigner une listbox avec des numéros de facture, tout marche bien sauf que je n'ai pas tous les numéros de facture dans la listbox qui eux sont tous présents dans la base. Si je veux tous les numéros je remplace la variable "var" par "5000" et c'est bon mais bon !!!
pourtant il y a "4161" enregistrements dans la base et c'est exactement ce que je retrouve dans la valeur de "var".
pour info la base est une base Access.
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
|
ADOTable4->Sort = "NUM_FAC DESC";
AnsiString num = "",num1 = "";
int var = 0,cpt3 = 1;
var = ADOTable4->RecordCount;
CG1->MaxValue = var+1;
for (cpt3 = 1 ; cpt3 < var+1; cpt3++)
{
num1 = ADOTable4->FieldValues["NUM_FAC"];
CG1->Progress++;
if ( num != num1 )
{
LB3->Items->Add(num1);
num = num1;
}
else
{
ADOTable4->Next();
}
}
} |
Merci de votre aide ! :calim2: