Показать сообщение отдельно
  #11  
Старый 09.02.2015, 14:26
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Значит проблема с путями, с их прописью, вот кусман из официального сырца от производителя
Код:
...
var
  archiver : TZipForge;
begin
  // Create an instance of the TZipForge class
  archiver := TZipForge.Create(nil);

  with archiver do
  begin
    // Set the name of the archive file we want to create
    FileName := 'C:\test.zip';
    // Because we create a new archive,
    // we set Mode to fmCreate
    OpenArchive(fmCreate);
    // Set base (default) directory for all archive operations
    BaseDir := 'C:\';
    // Add file C:\test.txt the archive; wildcards can be used as well
    AddFiles('c:\test.txt');
    CloseArchive();
  end;
end;
должно работать
Ответить с цитированием