Listview ini Problem Speichern

[Bernd29bln]

hallo Marabu,

ich habe auf meiner form eine listbox in der die sectionen angezeigt werden, und in der listview
werden den die Eigenschaften und der wert angezeigt . meine listview hat 1 tabelle mit 2 spalten.

momentan versuche ich es so zuspeichern, aber das funz net wircklich.

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var i: integer;
begin
 try
INI := TInifile.Create(Label2.Caption);

  for i:=0 to Listview2.Items.Count -1 do
  while (ini.ValueExists(label1.Caption, listview2.Items.Item[i].Caption)) do
    begin
   if not ini.ValueExists(label1.Caption, listview2.Items.Item[i].Caption) then
      begin
       INI.WriteString(Label1.Caption, listview2.Items.Item[i].Caption, '"' + listview2.Items.Item[i].SubItems.Text + '"');
     end; 
    finally
   INI.Free;
  end; 
end;

Gruss bernd