关于VclUnZip的使用问题(20分)

我用VclUnZip控件还原被压缩的文件时，对OverWritemode属性不知应该怎样赋值？
With VCLUnzip1 do
begin
ZipName := 'c:/ziptemp/temp.zip' ;
ReadZip;
FilesList.Add( '*.doc' );
DoAll := False;
DestDir := 'c:/ziptemp'
RecreateDirs := false;
RetainAttributes := True ;
OverwriteMode:=always;
NumUnzipped := Unzip;
end；
上段编码在编译时出现'Undeclared identifier: 'always''

我没用过这个组件，但据你所说，这个 always 应该是个选项，可能是你写错了，再查查这个参数的可选项吧

在VclUnZip.pas的type上面添加
{$I kpzconst.Pas}
{$I kpztypes.Pas}

就可以使用了. 我是了好半天才试出来.

接受答案了.