string komprimieren

[yankee]

Ich beziehe mich auf folgenden Eintrag aus der Codelib:

String komprimieren dekomprimieren
Ich bekomme bei der Dekomprission in dieser Zeile:
DeCompressBuf(InpBuf, Length(input),0,OutBuf, OutBytes); Immer eine exeption 'invalid Pointer Operation'. Ich habe einfach nur ein form mit 2 Memos und zwei Buttons, die den Text aus der einen Memo in der anderen komprimiert ausgeben und wieder zurück. Dabei kann doch eigentlich nichts schief gehen.
Was mir aufgefallen ist, ist dass out eigentlich das gleiche wie var ist, nur dass es einen Pointer sein muss (sagt die DelphiHilfe). Aber OutBytes (was nach der CodeCompletion zu Urteilen ein out ist) ist schließlich ein Integer und kein Pointer. Ich habe mal probiert ein @ davor zu schreiben, aber dann kompiliert Delphi erst garnicht. Also woran kann das liegen?? Hat irgendwer Erfahrung mit dieser function?

[marabu]

Zitat von yankee:

Ich habe einfach nur ein form mit 2 Memos und zwei Buttons, die den Text aus der einen Memo in der anderen komprimiert ausgeben und wieder zurück. Dabei kann doch eigentlich nichts schief gehen.

Warum denn nicht? Abhängig davon, wie du die strings hin und her kopierst, werden sie beim ersten auftretenden #0 abgeschnitten. Es gibt spezielle Kompressionsverfahren für strings, aber einen string als Zwischenpuffer für eine statistische Kompression würde ich nicht verwenden. Nimm einen normalen buffer, dann kann wirklich nichts schief gehen.

Grüße vom marabu