ListView Items in einer TextDatei speichern

[alanblack]

hoi,

joah funzt es wird jedenfalls compilert, aber wenn ich nun die items angelegt habe (im externen programm (project1.exe)) und dann auf save klicke kommt eine Fehlermeldung Zugriffsverletzung Project1... was bedeutet das und wie kann ich den Bug entfernen?

hier nocheinmal den kompletten Quellentext:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
With ListView1 Do
  Begin
    Columns.Clear;
    Columns.Add.Caption := 'Deutsch';
    Columns.Add.Caption := 'Englisch';

    ShowColumnHeaders := True;
    ViewStyle := vsReport; 

    With Items.Add Do 
    Begin 
      Caption := Edit1.Text; 
      SubItems.Add(Edit2.Text);
    End; 

  End;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
ListView1.Items.Item[1].SubItems.SaveToFile('datei.txt');
end;

end.

Viele Grüße