TMemo maximale Zeilen begrenzen

[hathor]

if Memo1.Lines.Count >maximaleZeilenzahl then Memo1.Enabled :=false;