Hallo zusammen,
ich habe folgendes Anliegen:
Mit meiner bestehenden Applikation erstelle ich von verschiedenen Verzeichnissen ein ZipFile mit TZipmaster. Dies geschieht folgendermaßen:
Delphi-Quellcode:
cz := TZipMaster.Create(nil);
cz.ZipFilename := MyZipFileName;
if not DirectoryExists(Exportdir.Caption) then // Ausgabeverzeichnis für das Zip-File
ForceDirectories(Exportdir.Caption);
cz.AddOptions := [AddRecurseDirs, AddDirNames, AddSeparateDirs];
cz.FSpecArgs.Add(ChangeFileExt(ImageDir.Caption, '*.*'));
...
...
cz.Add;
while cz.ZipBusy do
Application.ProcessMessages;
cz.Free;
So, das funktioniert ja alles richtig, aber es wird die komplette Verzeichnisstruktur entnommen die ich mit der Datei angebe.
Bsp.: D:\Test\MeineBilder\*.*
dann ist im Zipfile folgende Struktur: Test\MeineBilder\*.*
Hier liegt mein Problem! Ich möchte eine eigene Verzeichnisstruktur im Zip-File definieren und lediglich die Dateien kopieren.
Bsp.: D:\Test\MeineBilder\*.* -> alle Dateien aus dem MeineBilder sollen entnommen werden
im Zipfile soll die Struktur z.B. so aussehen: Kunde\Backup\Bilder\*.*
Ich hoffe die Erläuterungen sind soweit verständlich.
Danke im Voraus & Gruß, Moony