Hallo,
kann ich eigentlich in ein ZIP-Archiv Dateien von verschiedenen Laufwerken packen? Der Pfad einer Datei wird ja gespeichert. Die Laufwerksangabe wird aber unterschlagen.
Ich benutze KAZip und da einfacherweise AddFilesAndFolders:
Delphi-Quellcode:
try
Zipper.CreateZip(FileNameEdit.Text);
Zipper.FileName:=FileNameEdit.Text;
Zipper.Active:=true;
ProgressForm.Caption:='Dateien werden gepackt...';
ProgressForm.CurrentActionText:='';
ProgressForm.MaxValue:=1;
ProgressForm.CurrentValue:=0;
ProgressForm.Show;
Application.ProcessMessages;
Zipper.AddFilesAndFolders(ExportFiles.Items,'',true);
Zipper.Comment:=ExportFiles.Items;
finally
Zipper.Active:=false;
Zipper.Close;
ProgressForm.Close;
close;
end;
In Items sind sowohl Dateinamen als auch Pfadnamen enthalten, auch von verschiedenen Laufwerken.
Wie gesagt, die Laufwerksangabe wird unterschlagen!
Wie würdet Ihr vorgehen?
Gruß und alles Gute fürs neue Jahr, Andreas