compression ZIP avec Abbrevia

Question

Bonjour, 

comme le sujet l'indique j'utilise abbrevia pour compresser un ensemble de fichiers et répertoires en fichiers .ZIP.
dont voici le code :

    FileName := 'C:\image\';
   AbZipKit.TempDirectory := Filename;
    AbZipKit.BaseDirectory := Filename;
    AbZipKit.AutoSave      := false;
    //AbZipKit.StoreOptions := [soRecurse] ; // paraît Ok, si ce n'est que ça ne finit jamais !!
    AbZipKit.OpenArchive('C:\mesEssai.zip');
    // je veux zipper le répertoire Filename et tous ses sous-répertoires
    AbZipKit.AddFiles('*.*', 0);
    AbZipKit.CloseArchive;

Seulement j'aimerais avoir comme un label qui dit quel fichier est en train de charger de manière dynamique au chargement et comme une progressBar qui définit non pas le chargement du fichier en cours mais de l'ensemble des fichiers !! ex si j'ai 100 images et j'ai déjà chargé à 30 images le progressbar est positionné dynamiquement a 30%

Francky23012301 · Answer

Salut mon grand,

Jette un oeil ici : http://delphipage.free.fr/abbreviaexemple.html. Tu sera faire deja la progressbar

@+

gabs77 · Answer

Merci Francky23012301

   J'en apprend un peu plus sur Abbrevia !!
Seulement je vois pour l'extraction du zip avec progressbar qui est pas compliqué mais en ce qui concerne l'ajout je sais utiliser la progressbar qui évolue fichiers par fichier c'est à dire qu'il va de 0 a 100% a chacun des fichiers or j'aimerais une progressbar qui affiche sur la réalisation duu zip complet !!

Compression ZIP avec Abbrevia

2 réponses

Votre réponse

Discussions similaires