internen Datenstrom Zippen /Komprimieren

[Coder]

Delphi 3

hi, ich möchte gerne meine Daten (z.B. Fenster-Einstellungen; im Format: Text= Buchstaben und Zahlen) im Speicher komprimieren bevor ich sie in einer Datei abspeichere.
Also nicht eine Datei (z.B. nJackson_hit.mp3) zippen, sondern , wenn
Winpos[1]:="Windowpos_L=300";
Winpos[2]:="Windowpos_R=200";

dann sollen for i .. begin String:= zipAdd(Winpos[i]) ;end ;

einfach gepackt werden.

Kennt jemand von Euch eine Unit (für Delphi 3 !!!) die das kann?

hab mich schon bei Torry.net durchgewühlt aber nichts gefunden.

Also so, wie OpenOffice das macht = speichert alle Daten in xml und das als zip = komplett in einem Rutsch, ohne tmp

EDIT: Strom => "String"