XE4 기준 헬프파일에 있는 ZLib관련 예제를 보고 zip파일을 생성했는데 알집,기본압축프로그램에서 열리지가 않네요
혹시 표준압축을 위한 옵션이 따로 있나요? 압축용량은 기본집프로그램이랑 비슷한듯합니다만..
그리고 생성자가 예제에는
TZCompressionStream(output, zcDefault); <- 이렇게 되어있지만.. XE4에서 안됨..
이유는 Find Declation으로 들어가보면..
__fastcall TZCompressionStream(System::Classes::TStream* dest, TZCompressionLevel compressionLevel, int windowBits)
int windowBits <--라는 놈이 아마도 XE4에서 생긴듯..


예제:

void __fastcall TForm1::btnCompressClick(TObject *Sender)
{
   /* Create the Input, Output and Compressed streams. */
   TFileStream *input = new TFileStream(Edit1->Text, fmOpenRead);
   TFileStream *output = new TFileStream(Edit2->Text + ".zip", fmCreate);
   TZCompressionStream *zip = new TZCompressionStream(output);//그냥 옵션없이 해봄, zcDefault); 
 
   /* Compress data. */
   zip->CopyFrom(input, input->Size);
 
   /* Free the streams. */
   zip->Free();
   input->Free();
   output->Free();
}