du könntes ja versuchen erstmal in OnKeyUp und OnKeyDown den Key auf 0 zu setzen, wenn die maximale Anzahl an Zeilen erreicht ist
Delphi-Quellcode:
// direkt mit Memo-Name
if Memo1.Lines.Count >= 9 then Key := 0;
// allgemein (Memo via Sender)
if TMemo(Sender).Lines.Count >= 9 then Key := 0;
und dann mußt du noch das Problem lösen, weöches auftritt, wenn jemand Zeilen in das Memo reinkopiert
