Pascal-Implementierung aus C-Quellcode angepasst.
Autor: MIKE CHAPIN
{
Auch hier ist es wie versprochen. Dies ist eine Pascal-Port Ross
Datenkompression. Diese bestimmte Einheit ist kein Puffer
Kompression/Dekompression, aber Sie können es hinzufügen, wenn Sie möchten.
Die C-Implementation habe ich muss Puffer Dateikomprimierung
und Datei Puffer Dekompression.
Dies ist eine kleine Nettigkeit und Availble für SWAG ist, wenn sie
will es.
Gemeinsame Arten Dateneinheit verwende ich viel. Sieht aus wie Delphi
ähnliche Arten aufgenommen.
}
(*
Allgemeine Datentypen und Strukturen.
*)
Einheit-Common;
Schnittstelle
Typ
PByte = ^ Byte;
ByteArray = Array [0..65000] Byte;
PByteArray = ^ ByteArray;
PInteger = ^ Integer;
IntArray = Array [0..32000] Integer;
PIntArray = ^ IntArray;
Benutzer = ^ Wort;
WordArray = Array [0..32000] des Wortes;
PWordArray = ^ WordArray;
Umsetzung
ENDE.
(***************************************************
* RDC Einheit *
* *
* Dies ist ein Pascal-Port von C-Code aus einem Artikel *
* Im 'C Benutzer Journal', 1/92 geschrieben von *
* Ed Ross. *
* *
* Dieser bestimmte Code arbeitet gut unter *
* Echte, geschützt und Windows. *
* *
* Die Kompression ist nicht ganz so gut wie PKZIP *
* aber es dekomprimiert ca. 5 mal schneller.
Ross-Datenkompression
Ross-Datenkompression : Mehreren tausend Tipps, um Ihr Leben einfacher machen.
Pascal-Implementierung aus C-Quellcode angepasst.
Autor: MIKE CHAPIN
{
Auch hier ist es wie versprochen. Dies ist eine Pascal-Port Ross
Datenkompression. Diese bestimmte Einheit ist kein Puffer
Kompression/Dekompression, aber Sie können es hinzufügen, wenn Sie möchten.
Die C-Implementation habe ich muss Puffer Dateikomprimierung
und Datei Puffer Dekompression.
Dies ist eine kleine Nettigkeit und Availble für SWAG ist, wenn sie
will es.
Gemeinsame Arten Dateneinheit verwende ich viel. Sieht aus wie Delphi
ähnliche Arten aufgenommen.
}
(*
Allgemeine Datentypen und Strukturen.
*)
Einheit-Common;
Schnittstelle
Typ
PByte = ^ Byte;
ByteArray = Array [0..65000] Byte;
PByteArray = ^ ByteArray;
PInteger = ^ Integer;
IntArray = Array [0..32000] Integer;
PIntArray = ^ IntArray;
Benutzer = ^ Wort;
WordArray = Array [0..32000] des Wortes;
PWordArray = ^ WordArray;
Umsetzung
ENDE.
(***************************************************
* RDC Einheit *
* *
* Dies ist ein Pascal-Port von C-Code aus einem Artikel *
* Im 'C Benutzer Journal', 1/92 geschrieben von *
* Ed Ross. *
* *
* Dieser bestimmte Code arbeitet gut unter *
* Echte, geschützt und Windows. *
* *
* Die Kompression ist nicht ganz so gut wie PKZIP *
* aber es dekomprimiert ca. 5 mal schneller.
