Listview delphi relié a une Bdd

Fermé
hainlesgens - 14 oct. 2008 à 23:27
 AlexKid - 15 déc. 2010 à 10:53
Bonjour,
je vous explique mon probleme.

j'essai creer un listview relié à une base de donné tout ça en langage pascal/delphi

mon probleme, est que je n'arrive pas à écrire plusieurs lignes dans mon LV

je rentre les codes suivants:

joueurs:=TKListObject.create(Tjoueur);
joueurs.loadFromDB(ADOConnection1,'SELECT * from joueur');
joueurs.showInlb(listbox1);
joueurs.loadFromDB(ADOConnection1,'select * from joueur');
joueurs.showInLv(listview1);


le showinlb est un truc compliqué que mon prof a deja creer en cour et que nous réutilisons à notre guise tout comme le showinlb.

alors j'ai creer le joueurs.showInlb(listbox1); pour tester, et ça marche avec un listbox normale( par marche avec le listbox, j'entend qu'il me retourne tout les enregistrements).
mais avec le listview y'a pas moyen de le faire... il me retourne que le 1er enregistrement de ma table Joueur.

si quelqu'un pouvait m'aider, je lui en serais fortement reconnaissant

(je travail sous turbo delphi)

3 réponses

hainlesgens
14 oct. 2008 à 23:39
pardon j'ai oublier de préciser, mon listbox me renvoi juste le nom du joueur, et je voudrais que mon listview me renvois tous mes les champs, c'est a dire nomjoueur, prenomjoueur et adressejoueur
0
hainlesgens
15 oct. 2008 à 13:34
personne ne peut m'aider?
0
Bonjour,
après 2 ans de réflection voiçi une solution :
1) insérer une ListView sur votre form elle sera nomée ListView1
2) dans Procedure soit à la crétion de la form ou en appuyant sur un bouton
procedure Tfm1.creatListLibrairie;
var
  i, x:integer;
  bibliolist: TListItem;
begin
    x:= Data.QBibliotheque.RecordCount-1;
    Data.QBibliotheque.First;
    ListView1.Items.Clear;
    For i:=0 to x do
    begin
      bibliolist:= ListView1.Items.Add;
      bibliolist.Caption:= Data.QBibliothequenom.AsString;
      Data.QBibliotheque.Next;
    end;
end;

voilà en espérant que çà serve à quelqu'un!
Cordialement
Alex
0