Realisierung des Huffman-Algorithmus in Delphi

[Dannyboy]

Hallo neolithos,
das mit dem Array ist eine interessante Idee und ich werde diese
bei meiner Umsetzung berücksichtigen. Ich kann jedoch einige Dinge
nicht nachvollziehen:

Delphi-Quellcode:

aAlpha : array [0..????] of record 
c, 
n : Byte; 
end; 

0..255 sind das Ansi-Alpha-Bet 

alle weiteren sind Kompinationen. // Datentyp Byte kennt keine weiteren Kombinationen

a[0] = 0, -1; // a -> -1 mit Byte nicht möglich
a[1] = 1, -1; // b -> -1 mit Byte nicht möglich
a[2] = 2, -1; // c -> -1 mit Byte nicht möglich
a[3] = 3, -1; // d -> -1 mit Byte nicht möglich
a[4] = 3, 3; // dd 
a[5] = 3, 0; // da 
a[6] = 1, 5; // dab -> bda ?

Nachtrag:
Man kann auch den Datentyp Byte nicht einfach durch Integer ersetzen, da dieser die 4-fache Menge an Speicherplatz verwendet, was der Kompression
nicht gerade dient.