PureBasic

gnozal a écrit :

SpaceMan a écrit :j'ai testé le code mais l'évenement sur le bouton annuler ne lui parvient qu'à la fin de la compression.

Ah oui, si la compression et la gestion des évènements sont dans le même thread, il faut placer la gestion des évenements dans le callback.

Par exemple :

Code : Tout sélectionner

; Callback PureZIP 
Procedure PureZIP_CallbackC(File.s, PerCent.f) 
  ...
  ; Stop avec Echap
  If GetAsyncKeyState_(#VK_ESCAPE) & 32768 ; APPUI SUR ECHAP
    ProcedureReturn #True
  Endif
  ProcedureReturn #False
EndProcedure

SpaceMan a écrit :là ça marche nickel mais l'appui sur la touche ECHAP n'arrete qu'un fichier ! mais je cherche encore.

gnozal a écrit :

SpaceMan a écrit :là ça marche nickel mais l'appui sur la touche ECHAP n'arrete qu'un fichier ! mais je cherche encore.

If faut tester le retour de PureZIP_Archive_Compress().
Si c'est #PureZIP_CallbackStop, il faut sortir de ta boucle de compression de fichiers (Break).

SpaceMan a écrit :1. Quand dois-je utiliser ces constantes ?

Code : Tout sélectionner

#Z_DEFAULT_STRATEGY
#Z_BEST_SPEED
#Z_BEST_COMPRESSION
#Z_NEED_DICT
#Z_FILTERED
#Z_HUFFMAN_ONLY

SpaceMan a écrit :2.quelle est la difference entre ces deux bouts de code ?

Code : Tout sélectionner

PureZIP_Archive_Create(destination$+nom_archive$, #APPEND_STATUS_CREATE)
PureZIP_Archive_Compress(SourceDir,#False)
PureZIP_Archive_Close()

et

Code : Tout sélectionner

PureZIP_Archive_Create(destination$+nom_archive$, #APPEND_STATUS_CREATE)
PureZIP_SetCompressionAlgorithm(#Z_BEST_COMPRESSION)
PureZIP_Archive_Compress(SourceDir,#False)
PureZIP_Archive_Close()

SpaceMan a écrit :3. comment utiliser cette constante ?

Code : Tout sélectionner

#Z_BEST_SPEED

je m'arrete là d'abord !

SpaceMan a écrit :Merci por ces informations !
Je voudrais bien pouvoir rajouter certaines fonctions à PureZip
Exemple:
Deflate 64(comme dans 7-Zip)
Mettre en pause(sur ce point point ça doit etre possible avec PureZip non ?)
Comment récuper le qu'il faut à PureZip pour terminer une compression ?

SpaceMan a écrit :gnozal peux tu jeter un oeil sur le dernier code ?
la prgression generale fini même avant la compression normale des fichiers.
http://www.purebasic.fr/french/viewtopic.php?t=7167

gnozal a écrit :PureZIP_SetCompressionCallback() définit un callback de compression (passe de 0 à 100% à chaque compression), pas de progression générale.
Je pense que c'est une mauvaise idée de mettre la progression dans le callback de compression, d'autant plus que le callback peut être appelé plusieurs fois avec PerCent.f = 100 avec les erreurs d'arrondis (99.99991, 99.99996 ...)

SpaceMan a écrit :

gnozal a écrit :PureZIP_SetCompressionCallback() définit un callback de compression (passe de 0 à 100% à chaque compression), pas de progression générale.
Je pense que c'est une mauvaise idée de mettre la progression dans le callback de compression, d'autant plus que le callback peut être appelé plusieurs fois avec PerCent.f = 100 avec les erreurs d'arrondis (99.99991, 99.99996 ...)

Alors que me proposes-tu ? ou puis-je mettre ma procedure de progression générale ?
PS : je sais que la fonction PureZIP_SetProgressionCallback() ne s'utilise qu'avec les fonctions
-PureZIP_ExtractFiles()
-PureZIP_AddFiles()

TotalFichiers = CompteMesFichiersACompresser()
DéfinirBornesProgression(0, TotalFichiers)
While FichierSuivantACompresser()
  PureZIP_Archive_Compress(MonFichier, #True)
  Position + 1
  IncrementerProgression(Position)
Wend

gnozal a écrit :Comme je le disais : "il vaut mieux compter au départ l'ensemble des fichiers à compresser puis incrémenter la barre de progression chaque fois qu'on traite un fichier."

case a écrit :est il possible de renommer un fichier dans une archive sans le décompresser/re-compresser ?