Speicherbereinigung von Strings

[Tyrael Y.]

Delphi-Quellcode:

type
  PRecordType = ^TRecordType; 
  TRecordType = record
    Name: string;
    Bla: string
  end; 

procedure Test();
var LRec: PRecordType;
begin
  New(LRec);
  try
    LRec.Name := 'Name';
    LRec.Bla := 'BlaBla';
    
    MachWas(LRec);
  finally
    LRec.Name := '';
    LRec.Bla := '';
    Dispose(LRec);
  end; 
end;

...probiert es aus