- Also, der Testcode läuft erstmal unter Delphi 7 und 2010.
- Es ist alles gemäß OOP in eine Klasse gewandert.
- Die Fehlerbehandlung wurde von Fehlercodes auf Exceptions umgestellt.
- Die Variante mit den Lese-/Schreibprozeduren wurde entfernt.
- Und dafür gibt es nun eine Variante mit Streams.
- Achtung: Ob die aktuell deaktivierten ASM-Codes auch zuverlässig arbeiten weiß ich nicht, denn diese habe ich fast im Originalzustand übernommen und noch nicht getestet.
(Im Code aus'm DEC 5.2 waren sie aber auch schon deaktiviert.)
[add]
Die TestLHSS.dpr von Muetze1 läuft auch.
Ein Binärvergleich meinte jedenfalls daß die beide Dateien übereinstimmen.
[edit]
'nen bissl Zeitmessung in die TestLHSS.dpr eingebaut.
Eine kleine 223 MB
XML-Testdatei lieferte diese Werte:
lhmMax:
Code:
Encode() result = 24757299 bytes duration = 182.0 sec
Decode() result = 233854130 bytes duration = 8.9 sec
Zip und 7zip waren zwar bis zu 6 Mal schneller, aber von der Komprimierungsrate her bekamen sie die Datei auch nur auf 23 MB (zip) und 14 MB (7zip),
allerdings belegt die TLHCompress nur knapp 1,2 MB
RAM.
lhmFastest:
Code:
Encode() result = 31782658 bytes duration = 18.56 sec
Decode() result = 233854130 bytes duration = 10.25 sec
[edit=Admin] Mfg, Daniel[/edit]