GetMem, FreeMem

[Giantics]

Das Problem sind die Strings. Die sind ja dynamisch und nicht statisch und deshalb ist das so nicht möglich. Entweder mit PChars und damit wieder extra Speicher reservieren, oder eben String durch ShortString tauschen. So gehts auf jeden Fall :

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
type
  TNamen = Record
    vName: ShortString;
    nName: ShortString;
  end;
...