Delphi Komprimierung : Wie geht das?

Thema durchsuchen

Ansicht

Themen-Optionen

Komprimierung : Wie geht das?

Ein Thema von NickelM · begonnen am 13. Jul 2010 · letzter Beitrag vom 20. Jul 2010

Vorheriger Beitrag

Nächster Beitrag

Medium

Registriert seit: 23. Jan 2008
3.688 Beiträge

Delphi 2007 Enterprise

#17

AW: Komprimierung : Wie geht das?

15. Jul 2010, 20:02

Hatte mal eine kleine RLE gebaut mit $FF als Marker. Die "Regeln" waren da dann:

$FF = Marker: Hier nach kommt ein Byte für die Anzahl
$XX = Anzahlbyte
$YY = Byte, dass $XX mal in Folge kommt

$XX ist maximal $FE, wenn es $FF ist, heisst das, dass ein einzelnes, uncodiertes $FF da sein soll - es ist also dann im unkomprimierten Anteil einfach gedoppelt. Der Preis ist eben, dass man maximal 255 statt 256 in einen Block pressen kann. (Da kein Zeichen 0 mal wiederholt wird, hab ich zum Anzahlbyte immer +1 gezählt.)

"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)