Bonjour,
En Cherchant une soluce pour mon problème, j'ai lu votre demande qui date un peu mais bon çà pourra peut être aider quelqu'un...
Voilà pour remplis une liste avec une BD :
while not QAccessData.Eof do
begin
list1:=ListView1.Items.Add;
list1.Caption:=QAccessData.FieldByName('nom').Text+', '+QAccessData.FieldByName('prenom').Text;
list1.SubItems.Add(QAccessData.FieldByName('mail').Text);
DataPTX.QAdresseC.Next;
end;
Cordialement
Alex