Datei in Zip Archiv

[-Phantom-]

Fneu ist das Formular, auf dem sich die ZipMaster befindet.

Was das mit der Listview zutun hat ist ganz einfach :

Wenn ich neue Dateien hinzufüge sollen die in der Listview eingetragen werden...

und das mache ich hier

Delphi-Quellcode:

if feinstellungen.checkbox1.Checked then   begin
      posi := pos('\',add.Files[i]);
      teilstring := copy(add.Files[i],posi+1);
       Item.SubItems.add(Extractfilename(lblpfad.Caption) + '/' + teilstring);
      end ELSE
       Item.SubItems.add(Extractfilename(lblpfad.Caption) + '/' + neudatei);

Ich wollte damit nur sicher stellen das niemand meint das ich damit den Pfad im Archiv ändere oder ähnliches.