ضغط الملفات بصيغة zip في الدلفي

[kachwahed]

قام Patrik Spanel انطلاقا من المكتبة القياسية المرفقة مع إصدارات دلفي ZLib
بكتابة تجميع آخر لخوارزمية الضغط Zip صغير الحجم ودون استخدام DLL أيضا
آخر نسخة SciZipFile.pas v.1.4 تعمل على D6-2009 على الأقل متوفرة في Torry:

كود :

http://www.torry.net/pages.php?id=300

مكتبة AmZip عمل صيني كمكتبة لتسهيل استخدام SciZipFile مرفقة بحجمين.
trees.obj وdeflate.obj مكتوبان بـ C++ Builder ومستخدمان في دلفي على شكل object
تحويلهما إلى دلفي متوفر في بعض الأمثلة
منها مثال Chris Rorden الذي أضاف إليه خوارزمية Gzip وTar

كود :

http://www.mccauslandcenter.sc.edu/mricro/ezgz/index.html

تعديل صغير ليعمل على دلفي 7 في المرفق ezgz.

شيء آخر مهم...
إن كنت تستخدم مكتبات مكونات تأكد أولا أنها لا تحتوي على أصناف لخوارزميات ضغط قبل أن تبحث عن مكونات أخرى
مثال مرفق مع Fast Report مكتبات وصنف جاهز TfrxZipArchive. مثال:

PHP كود :

procedure TForm1.Button1Click(Sender: TObject);
var
  zip: TfrxZipArchive;
begin
  zip := TfrxZipArchive.Create;
  try
    zip.AddFile('c:\test.txt');
    zip.SaveToFile('c:\test.zip');
  finally
    zip.Free;
  end;
end; 


بالتوفيق.