|
Registriert seit: 24. Apr 2003
Ort: Magdeburg
218 Beiträge
Delphi 7 Professional
|
geschafft :-)
9. Apr 2006, 21:20
so geht es 
Delphi-Quellcode:
ZipMaster.ExtrOptions := ZipMaster.ExtrOptions
+ [ExtrDirNames]
+ [ExtrForceDirs];
ZipMaster.FSpecArgs.Clear;
ZipMaster.FSpecArgs.Add(verzeichnisname+'\*.*');
ZipMaster.Extract;
euer Andreas
Andreas Göllner
("`-''-/").___..--''"`-._
`6_ 6 ) `-. ( ).`-.__.`)
"Ich kann Dir nur die Tür zeigen, durchgehen musst Du ganz allein."
Wer ist die Tür? Jesus!
|