ACCESS AVEC ADO ET JVSTRINGRID

Question

Bonjour à tous, voila j'ai un petit problème pour récupérer les différentes lignes des tables ACCESS !
Je m'explique :

Tout d'abord j'ai une base de donnée ACCESS.
Sous Delphi j'utilise ADO pour me connecter.
Dans mon appli que je suis en train de developper je voudrait récuperer les données de ma base dans une JVSTRINGGRID !

Mon probleme est que j'arrive bien à récuperer tous les champ de mon premier enregistrement de ma table mais je n'arrive pas a recuperer les enregistrement suivant !!

Voila ou c'est pas top dans mon code : JvStringGrid1.Cells[ii,i]:= DataSource1.DataSet.Fields[ii].AsString;

Dans mon code ca donne :

...
 var 
  i,ii,n   : integer;
begin
  n: =datasource1.DataSet.RecordCount;//Nb d'enregistrement
  For i:= 1 to n  do begin 
    For ii: =0 to 3 do begin
         JvStringGrid1.Cells[ii,0]:=Tab1[ii];
    JvStringGrid1.Cells[ii,i]:=DataSource1.DataSet.Fields[ii].AsString;
   end;
 end;
...

Voila en fait la ma JvStringGrid ce rempli toujours pareille puisque je ne parviens pas à passer à l'enregistrement suivant dans mon code !!!

Merci !!!  :)

jm2mars · Answer

Oups désolé pour le dérangement je viens de trouver la solution !!
 :big)  :blush) 

Il fallait juste rajouter apres le end de ma 2eme boucle For:

DataSource1.DataSet.Next;

Enfin si ca peux aider quelqu'un !!!
Merci quand meme ! ;)

ACCESS AVEC ADO ET JVSTRINGRID

1 réponse

Votre réponse

Discussions similaires