우선 KAZIP 이 정상적으로 설치되었다는 가정하에서

(압축하기)

procedure Compress;
var
  Zip: TKAZip;
  FS: TFileStream;
begin
  // 압축 파일을 생성
  Zip := TKAZip.Create(nil);
  FS  := TFileStream.Create('c:\temp\test.zip', fmOpenReadWrite or fmCreate);

  Zip.CreateZip(FS);
  FS.Free;

  // 원하는 파일을 압축
  with Zip do
  begin
    Open('c:\temp\test.zip');
    AddFile('c:\temp\aaa.dll');
    AddFile('c:\temp\aaa.dpr');
  end;
  Zip.Free;
end;

(압축풀기)
procedure DeCompress;
var
  Zip: TKAZip;
begin
  Zip := TKAZip.Create(nil);
  with Zip do
  begin
    Open('c:\temp\test.zip');
    Zip.ExtractAll('c:\temp');
  end;
  Zip.Free;
end;

레몬에이드 님이 쓰신 글 :
: 주섬 주섬 모으다가 KA ZIP 이라는 무료 컴포넌트 구해서 깔긴 했습니다. 다른 콤포넌트 설치도 어렵더군여. ㅡㅡㅋ
:
: 델파이 7 버전도 흔치 않고..
:
: 문제는.. ㅡ.,ㅡ 어떻게 쓰는지를 모르겠네여..
:
: 데모플그램 하나 줬는데.. 아예 WinZip 같은 플그램이네여.. ㅡㅡㅋ 초보가 보기엔 너무 무리..입니다...쩝..
:
: 하려구 하는건 파일을 압축하는것뿐입니다.
:
: 지정한 화일 이름을 압축해서 FTP로 전송하는데..전송은 다른 문제인거 같고..
:
: 초간단 예제로 버튼 누르면 소스안에 코딩된 경로의 화일이 압축되서 소스안의 경로의 압축화일로 되는..
:
: (제가 이수준입니다.. ㅡㅡㅋ) 그런 예제만 있다면.. 금상첨화 일텐데..
:
: 도움 부탁합니다. KA ZIP 써보신분.. 아님 이것보다 좋은 컴포넌트 라면..추천좀.... ㅠㅡㅠ