Добавить в архив

[AnDr]

Как вариант можно создавать Cab архив.
вот пример кода:

Name	DataType	Subtype	Length
MakeCab	Automation	'COM MakeCab 1.0 Type Library'.MakeCab	

IF ISCLEAR(MakeCab) THEN
  CREATE(MakeCab);

MakeCab.CreateCab('C:\Test\testcab.cab',FALSE,0,FALSE);

MakeCab.AddFile('C:\Test\sample.log', 'samlpe.log');

MakeCab.CloseCab;