d7zip / sevenzip.pas von mail2nnv - Fragen zur Funktionsweise, DictionarySize, ...

[mytbo]

Zitat:

Zitat von DieDolly (Beitrag 1521877)

Kann man mit dem I7zWriter von mormot auch leere Verzeichnisse ins Archiv einbringen?

Ja, aber zur Zeit nur so:

Delphi-Quellcode:

libWriter.AddStream(TRawByteStringStream.Create(''), soOwned, faDirectory, 0, 0, 'TestFolder', True, False);

Ich schreibe einen Request für eine Änderung.

Bis bald...
Thomas

[DieDolly]

Wow ok das muss ich nach der Arbeit testen.

Ich habe auch eine Änderung an der win7zip Datei vorgenommen, eigentlich sogar zwei. Ich bin aber nicht bei GitHub und kenne mich damit nicht aus. Kann ich die Änderungen auch hier reinschreiben?

[mytbo]

Zitat:

Zitat von DieDolly (Beitrag 1521883)

Ich habe auch eine Änderung an der win7zip Datei vorgenommen, eigentlich sogar zwei. Ich bin aber nicht bei GitHub und kenne mich damit nicht aus. Kann ich die Änderungen auch hier reinschreiben?

Mein Workaround ist nicht mehr notwendig. Arnaud hat den Request schon eingepflegt. Du kannst eine Anfrage im Forum stellen und das ist das Ergebnis. Meine Erfahrung: Ist eine Funktion sinnvoll, wird sie auch integriert. mORMot unterstützt mehrere Plattformen, Delphi und FPC Versionen, da lässt sich nicht jeder Wunsch erfüllen. Fragen kostet aber nichts.

Bis bald...
Thomas

[DieDolly]

Mir ist eben noch aufgefallen... wenn man die Komprimierung abbricht und im OnProgress mit Result := ERROR_OPERATION_ABORTED; reagiert, wirft libWriter.SaveToFile() eine Exception. Unbehandelt führt das dazu, dass der Code der folgt nicht ausgeführt wird.

Notlösung?

Delphi-Quellcode:

try
 libWriter.SaveToFile(...);
except
// ?
end;

Auch aufgefallen:
wenn die ausgewähilte CompressionMethod funktionieren soll, darf man erst das CompressionLevel setzen, dann die CompressionMethod. Kommt MultiThreading dazu, muss das noch vor CompressionLevel gesetzt werden. Sonst wird immer LZMA benutzt.

[himitsu]

Zitat:

Zitat von DieDolly (Beitrag 1521917)

führt das dazu, dass der Code der folgt nicht ausgeführt wird.

Das ist im Prinzip auch ein vollkommen korrektes Verhalten.

Gut, man könnte stattdessen auch der Funktionen z.B. ein Boolean-Result verpassen, aber da eh niemals jemand Rückgabewerte wirft, ist es so natürlich besser.
Auch lässt sich so "direkt" der Abbruchgrund mitgeben.


Die Arbeit danach fortzusetzen ist natürlich meistens sinnlos, da ja etwas fehlt, bzw. unfertig ist,
also wenn es nur darum geht, anschließend ordentlich aufzuräumen, dann ist die richtige Lösung allerdings ein Try-Finally.
Aber da das Try-Finally sowieso immer in einen ordentlichen Code gehört (nicht nur bei so einem absichtlich herbeigerufenem "Fehler"), hätte es eh schon längst vorhanden sein müssen und bedürfte garnicht erst dieser "neuen" Erkenntnis. :wink:

[DieDolly]

Ich kann leider nicht alles was nach libWriter.SaveToFile(...); folgt ins try-finally packen. Alles was nach dem finally-end kommt, welches nach libWriter.SaveToFile(...); kommt, wird ignoriert.
ein großes try-finally um den gesamten Codeblock sieht auch doof aus. Die procedur ist rund 500 Zeilen lang. Man könnte auch sagen, mache die kürzer. Geht aber auch nicht. Muss halt damit leben, dass es nicht ein einziges try-finally gibt.

[mytbo]

Zitat:

Zitat von DieDolly (Beitrag 1521917)

... wenn man die Komprimierung abbricht und im OnProgress mit Result := ERROR_OPERATION_ABORTED; reagiert, wirft libWriter.SaveToFile() eine Exception.

Das ist so implementiert. Die Stelle ist mit E7Zip.CheckOk gesichert. Alles ungleich S_OK wirft eine Exception. Nach kurzer Durchsicht würde ich sagen, Abbruch ist nicht vorgesehen. An die Stelle, an der es erfolgen müsste, kommt man ohne ein Umschreiben nicht ran. Stelle eine Anfrage nach dieser Funktionalität im Forum. Ich selbst verwende durchgehend die mORMot ZIP Klassen.

Bis bald...
Thomas

[mytbo]

Mit Commit 0c410f2 funktioniert auch AddFiles wie es soll:

Delphi-Quellcode:

libWriter.AddFiles('c:\mORMot2\src\', '', '*', True);
libWriter.AddFiles('c:\mORMot2\src\', 'mORMot_2023-05-05', '*', True);
libWriter.AddFiles('c:\mORMot2\src\', 'mORMot_2023-05-05', '*.pas', True);
libWriter.AddFiles('c:\mORMot2\src\', 'mORMot_2023-05-05', '*.pas;*.inc', True);

Damit sieht die Verzeichnisstruktur in der 7z-Datei wie folgt aus:

Code:

mORMot_2023-05-05\app
mORMot_2023-05-05\core
...

Die Größe der gepackten Datei ist ca. 3MB. Das Packen mit Level 3 dauert kleiner 1 Sekunde.

Bis bald...
Thomas

[DieDolly]

Das Projekt und die Mitwirkenden sind der Wahnsinn. Ich muss mir bei Gelegenheit mal die anderen Proceduren der Bibliothek angucken.
Auf die Schnelle konnte ich jetzt nicht herausfinden, wie man Dateien zu einem bereits bestehenden Archiv hinzufügt. Ist das in mormot auch implementiert?

[Alter Mann]

Zitat:

Das Projekt und die Mitwirkenden sind der Wahnsinn

Da Frage ich mich, habe ich was verpasst?

Das ist mir irgendwie alles unklar, in den 'jedi'es sind andere werte deklariert als in (ja, welche nutzen wir hier?); die original (himi..) sind es nicht, denn die haben noch andere???