vclzipd6_3.dpk

delphi实现 webservice的例子.有服务端和客户段 利用xml交互.

package VCLZipD6_3;

{$R *.res}
{$R 'kpSFXCfg.dcr'}
{$R 'VCLUnZip.dcr'}
{$R 'VCLZip.dcr'}
{$ALIGN 8}
{$ASSERTIONS OFF}
{$BOOLEVAL OFF}
{$DEBUGINFO OFF}
{$EXTENDEDSYNTAX ON}
{$IMPORTEDDATA ON}
{$IOCHECKS ON}
{$LOCALSYMBOLS OFF}
{$LONGSTRINGS ON}
{$OPENSTRINGS ON}
{$OPTIMIZATION ON}
{$OVERFLOWCHECKS OFF}
{$RANGECHECKS OFF}
{$REFERENCEINFO OFF}
{$SAFEDIVIDE OFF}
{$STACKFRAMES OFF}
{$TYPEDADDRESS OFF}
{$VARSTRINGCHECKS ON}
{$WRITEABLECONST OFF}
{$MINENUMSIZE 1}
{$IMAGEBASE $400000}
{$DESCRIPTION 'VCLZip Pro'}
{$IMPLICITBUILD OFF}

requires
  rtl,
  vcl,
  vclx;

contains
  kpSFXCfg in 'kpSFXCfg.pas',
  VCLUnZip in 'VCLUnZip.pas',
  VCLZip in 'VCLZip.pas',
  kpCntn in 'kpCntn.pas',
  KpLib in 'KPLib.pas',
  kpMatch in 'kpMatch.pas',
  kpSStrm in 'kpSStrm.pas',
  kpZcnst in 'Kpzcnst.pas',
  kpZipObj in 'kpZipObj.pas',
  kpDiskIOs in 'kpDiskIOs.pas',
  KpSmall in 'KpSmall.pas',
  kpDiskIOWin9x in 'kpDiskIOWin9x.pas',
  kpSHuge in 'kpSHuge.pas';

end.