| Class My_LZH_Compressor (unit My_LZH) |
TObject
Downloaded
| Constructors |
constructor Create;| Functions |
procedure compression(dir:boolean);
Destructor Destroy;
procedure Get_Data(VAR DTA; NBytes:WORD; VAR Bytes_Got:WORD);
procedure Put_Data(VAR DTA; NBytes:WORD; VAR Bytes_Put:WORD);| Properties |
| Events |
| Variables |
Bytes_done : integer;
getproc : GetBytesProc;
in_Stream : TMemoryStream;
i_s : TMemoryStream;
n_progress : TNotifyEvent;
out_Stream : TMemoryStream;
o_s : TMemoryStream;
progress : integer;
progressbar : TProgressBar;
putproc : PutBytesProc;| Constructors |
constructor Create;| Functions |
procedure compression(dir:boolean);
Destructor Destroy;
procedure Get_Data(VAR DTA; NBytes:WORD; VAR Bytes_Got:WORD);
procedure Put_Data(VAR DTA; NBytes:WORD; VAR Bytes_Put:WORD);| Properties |
| Events |
| Variables |
Bytes_done : integer;
getproc : GetBytesProc;
in_Stream : TMemoryStream;
i_s : TMemoryStream;
n_progress : TNotifyEvent;
out_Stream : TMemoryStream;
o_s : TMemoryStream;
progress : integer;
progressbar : TProgressBar;
putproc : PutBytesProc;