AW: d7zip / sevenzip.pas von mail2nnv - Fragen zur Funktionsweise, DictionarySize, ..
Zitat:
|
AW: d7zip / sevenzip.pas von mail2nnv - Fragen zur Funktionsweise, DictionarySize, ..
Ich bin auch die nächsten zwei Wochen im Urlaub und rein vom Kopf her denke ich mir das es wohl nicht verkehrt sein kann sich mit der CLI Anwendung anzufreunden, die bietet halt nur das an was es tatsächlich auch gibt.
Die 7-Zip SDK Header sehen abschreckend aus. Hier im Forum glaube ich auch vor einer Ewigkeit mal was von einer Custom-Übersetzung gesehen zu haben. |
AW: d7zip / sevenzip.pas von mail2nnv - Fragen zur Funktionsweise, DictionarySize, ..
Die CLI-Anwendung hat sicher keinen dauerhaften Callback der über den Fortschritt Info gibt, oder?
|
AW: d7zip / sevenzip.pas von mail2nnv - Fragen zur Funktionsweise, DictionarySize, ..
|
AW: d7zip / sevenzip.pas von mail2nnv - Fragen zur Funktionsweise, DictionarySize, ..
sevenzip.pas 12 Jahre alt, noch älter als die von mir im ersten Beitrag genannte. Die im ersten Beitrag genannte sevenzip.pas zeigt bei Github an, dass sie nur 1 Jahr alt ist. Kann ja auch sein, aber der Inhalt ist im Prinzip auch nur von vor über 10 Jahren.
|
AW: d7zip / sevenzip.pas von mail2nnv - Fragen zur Funktionsweise, DictionarySize, ..
Hallo,
stimmt. dafür sind die *.dll's aktueller Gruß |
AW: d7zip / sevenzip.pas von mail2nnv - Fragen zur Funktionsweise, DictionarySize, ..
Zitat:
|
AW: d7zip / sevenzip.pas von mail2nnv - Fragen zur Funktionsweise, DictionarySize, ..
DLL in Exe als Resource kenne ich, aber was hat es mit Obj-Dateien aufsich? Sind Obj-Dateien leichter zu behandeln, braucht es dafür keinen komplizierten Wrapper mehr?
|
AW: d7zip / sevenzip.pas von mail2nnv - Fragen zur Funktionsweise, DictionarySize, ..
Zitat:
Delphi-Quellcode:
Bis bald...
uses
mormot.core.base, mormot.core.text, mormot.core.test, mormot.core.os, mormot.lib.win7zip; var zipFileName: TFileName; libReader: I7zReader; libWriter: I7zWriter; content: RawByteString; begin content := TSynTestCase.RandomIdentifier(1 shl 12); zipFileName := MakePath([Executable.ProgramFilePath, 'TestDaten.7z']); libWriter := New7zWriter(fh7z); // fhBZip2 libWriter.SetCompressionLevel(3); // x Parameter (1/3/5/7/9), default 5 libWriter.AddBuffer('Daten\TestDaten.dat', content); libWriter.SaveToFile(zipFileName); libWriter := Nil; libReader := New7zReader(zipFileName); var libData: RawByteString := libReader.Extract('Daten\TestDaten.dat'); if (Length(content) = Length(libData)) and CompareMem(Pointer(content), Pointer(libData), Length(content)) then begin ShowMessage('Ok!'); end; Thomas |
AW: d7zip / sevenzip.pas von mail2nnv - Fragen zur Funktionsweise, DictionarySize, ..
Ich denke mit 7z ist das einfacher und der Code ist selbsterklärend-"er".
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:12 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz