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);
プロパティ
種類 | 可視性 | ソース | ユニット | 親 |
---|---|---|---|---|
type typedef |
public | System.Zip.pas System.Zip.hpp |
System.Zip | System.Zip |
説明
zip ファイル操作の進行状況イベント ハンドラの型です。
このようなイベント ハンドラの 1 つが OnProgress です。
TZipProgressEvent では次のパラメータを受け取ります。
Sender
: 現在の操作を実行している TZipFile オブジェクト。FileName
: 操作の対象となっているファイルの名前。Header
: 操作の対象となっているファイルの TZipHeader。Position
: 処理済みのバイト数。
現在の操作の進行状況は、たとえば次のようにして取得できます。
PercentageOfCompletion := Position div Header.UncompressedSize;