Explizit nach String[20] casten?

[p80286]

Eigenmtlich benötigt man Shortstrings oder

Delphi-Quellcode:

var
  mystring:string[x];

nur wenn man irgendwelche Tricksereien durchführen möchte. Das geht von for i:=1 to Byte(mystring[0]) do {statt length() bis zu mystring[0]:=0 {statt ''} oder man muß mit fixen Satzlängen/Stringlängen arbeiten aber da bevorzuge ich das mycharray:array [1..x] of ansichar {/char} Gruß
K-H

[hzzm]

Ja, leider benoetige ich String[20] fuer exotische Tricksereien.
Der String[20] ist in einem packed Record, der als Objekt in einen zLib CompressionStream -> uTPLb_CryptographicLibrary EncryptionStream -> File fliesst.
Die Kompression->Verschluesselung benoetigt Arrays mit fester Laenge in Record; Da ich Millionen dieser Mini-Dateien (ein paar hundert Bytes pro) speichern muss, kann ich keine vollen Datentypen benutzen, da sonst die FileSize der Dateien ununoetig in die Hoehe getrieben wird.

[himitsu]

Man kann sich auch selber einen Record-String bastelt.
x: array[0..x] of WideChar // WideChar oder AnsiChar, wegen fester größe bei der Übertragung
Delphi kann da zeilweise automatisch zwischen String und diesem Array konvertieren.

Das ganze pappt man dann noch in einen Record, batelt implizite Casts von/zu String dran
und kann dann intern in AnsiChar z.B. als UTF8 speichern.


Alternativ:
TPersistent nehmen
da als Property seine Daten rein
und dieses Datenobject lässt sich dann einfach mit Systemmitteln in einen Stream serialisieren und wieder deserialisieren,
was dann auch mit dynamischer Länge funktioniert.