Packed Records und Zeichenketten

[Dax]

Wenn du nur einen string hast, kannst du etwas gemeines tun:

Delphi-Quellcode:

type
  PMeanRecord = ^TMeanRecord;
  TMeanRecord = packed record
    Size: Integer;
    // deine Felder
    Text: array[1..MaxInt] of Char; //(eigentlich 1..Size)
  end;

const
  TMeanRecordMinimumSize = 4; //+Größe deiner Felder

Diesen Record darfst du *nur* über GetMem initialisieren. New oder Variablen des Recordtyps sind absolut verboten:

Delphi-Quellcode:

var
  rec: PMeanRecord;

GetMem(rec, TMeanRecordMinimumSize + stringLength);

Wenn du mehrere Strings brauchst... Nun, Pech gehabt. Dann musst du dir Handler dafür schreiben.