Bonjour,

Je viens vers vous car je ne sais pas comment remplir un TStringGrid de façon automatique à partir d'un fichier CSV.
Le format d'un fichier CSV est du genre :
Editeur;Auteur;Titre
Eyrolles;Marc Ferranti;Lazarus devient indispensable
Magellan;Jack Corbis;La mer source de vie.
(Cherchez pas les titres ils n'existent pas hein^^)

J'ai un code Lazarus sur un bouton "ouvrir un fichier" :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
procedure TForm1.Button1Click(Sender: TObject);
begin
  if OpenDialog1.Execute then
  begin
     fichier := OpenDialog1.Filename;
     SdfDataSet1.FileName:=fichier;
     SdfDataSet1.Active:=true;
     i:=0;
     with SdfDataSet1 do
     begin
       //if DBGrid1.RowCount<RecordCount then DBgrid1.RowCount:=RecordCount;
       While not eof do
       begin
          // C'est là que je ne sais pas quoi mettre pour remplir les titres de colonnes de ma grille et les cases de ma grille :/
       end;
     end;
  end;
end;
J'ai parcouru le lien de tutorial pour TStringGrid mais il n'explique pas comment charger à partir d'un fichier CSV.