Einzelnen Beitrag anzeigen

Dax
(Gast)

n/a Beiträge
 
#4

Re: Packed Records und Zeichenketten

  Alt 9. Jan 2008, 15:49
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.
  Mit Zitat antworten Zitat