Discussion :

[davels]

Bonjour, existe t il une fonction pour sauvegarder le contenu d'une TListView?

J'ai une autre question concernant les TListView.
J'ajoute de manière automatique une série de données et j'aimerais que le dernier élément ajouté apparaissent à l'écran mais pour l'instant il est caché et je dois jouer avec les ascenseurs.

Voici le code que j'utilise :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
     ListView.Items[i-1].Focused := True;
      ListView.Selected := ListView.Items[i-1];
      ListView.SetFocus;

[Soulama]

pour la 2eme question:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
   TaListView.Items[n].MakeVisible(True);

[Soulama]

pour la 1ere Question:

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
19
20
21
22
23
24
function ListViewSaveToFile(ListView: TListView; AFileName: string): Boolean; 
var 
  fs: TFileStream; 
begin 
  fs := TFileStream.Create(AFileName, FmCreate or fmShareDenyWrite); 
  try 
    fs.WriteComponentRes(ListView.Name, ListView); 
  finally 
    fs.Free; 
  end 
end; 
 
function ListViewLoadFromFile(ListView: TListView; AFileName: string): Boolean; 
var 
  fs: TFileStream; 
begin 
  fs := TFileStream.Create(AFileName, FMOpenRead or fmShareDenyNone); 
  try 
    fs.ReadComponentRes(ListView); 
  finally 
    fs.Free; 
  end 
end;

[davels]

Un grand merci, les 2 solutions fonctionnent très bien!