Mach mal bei Menü\Format\Zeilenumbuch das Häkchen hin.
Schon kann kein Text mehr rechts "überstehn".
Und das will ich im TMemo haben
[edit]
grad nochmal in 'nem leeren Projekt getestet und da geht's
[edit]
arg, hier ist ein NOT zuviel
Delphi-Quellcode:
Procedure TForm1.CheckBox9Click(Sender: TObject);
Begin
If CheckBox9.Checked Then Memo1.ScrollBars := ssVertical
Else Memo1.ScrollBars := ssBoth;
Memo1.WordWrap := not CheckBox9.Checked;
End;