Absatz im Label

[sui]

Moin,

wie kann ich eigentlich Text im Label mit Absätzen ausgeben?

Bei mir erscheint das alles in einer Reihe:

Code:

procedure TForm1.Timer1Timer(Sender: TObject);
var
  Memory: TMemoryStatus;
begin
 Memory.dwLength := Sizeof (Memory);


  GlobalMemoryStatus(Memory);
   label1.Caption := ('Speicher: ' +
    IntToStr(Memory.dwTotalPhys div 1048576) + ' MByte' + '  Freier Speicher:  ' +
    IntToStr(Memory.dwAvailPhys div 1048576) + ' MByte');

end;

Gibt es nicht irgendwas wie das
im HTML?