System.Zip.TZipProgressEvent
Delphi
TZipProgressEvent = procedure(Sender: TObject; FileName: string; Header: TZipHeader; Position: Int64) of object;
C++
typedef void __fastcall (__closure *TZipProgressEvent)(System::TObject* Sender, System::UnicodeString FileName, const TZipHeader &Header, __int64 Position);
Propriétés
| Type | Visibilité | Source | Unité | Parent |
|---|---|---|---|---|
type typedef |
public | System.Zip.pas System.Zip.hpp |
System.Zip | System.Zip |
Description
Type d'événement pour les gestionnaires d'événement de la progression des opérations de fichier zip.
L'un de ces gestionnaires d'événement est OnProgress.
TZipProgressEvent accepte les paramètres suivants :
Sender: l'objet TZipFile effectuant l'opération en cours.FileName: le nom du fichier affecté.Header: le TZipHeader du fichier affecté.Position: le nombre d'octets déjà traités.
Vous pouvez obtenir la progression de l'opération en cours de cette manière :
PercentageOfCompletion := Position div Header.UncompressedSize;