Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Hannes91,
12. Jan 2011
Ì;‰••=>2ÔÆîg닧&¡ÅÒ§÷bïu #2(/4
Das ist doch ganz im Sinne des Problemstellers!
Tausend Dank, v.a. Klaus, funktioniert mit den Bytes.
In einer ruhigen Minute außerhalb der Schulwoche werde ich mit dann mal um den FileStream kümmern (...will ja nicht so ganz den Anschluss verpassen und daher neues Gebiet betreten...).
Schönen Abend noch
Hannes
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Hannes91,
12. Jan 2011
@ Klaus01: Danke für den Hinweis, ich habe jetzt den Umweg über String durch ein Array of Byte gestrichen, sodass er natürlich in der Funktion richtige Werte ausspuckt.:thumb:
Jedoch stellt sich da für mich das Problem, wie ich dieses Array of Byte in eine (Text-)Datei speichern kann, da es sich ja nun nicht mehr um einen String mit reellen Zeichen handelt (--> WriteLN()).
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Hannes91,
12. Jan 2011
Guten Abend,
um mich einmal an (einfachen) Kompressionsalgorithmen zu versuchen, habe ich mir den Huffman-Algorithmus herausgegriffen, der optimal häufig auftretende Zeichen mit kurzen Bitfolgen und seltener auftretende Zeichen mit längeren Bitfolgen versieht.
Da dieser schon gut mit Eingabefeldern auf dem Formular funktionierte, wollte ich ihn für Dateien tauglich machen:
Der zu kodierende...