Forum: Object-Pascal / Delphi-Language
Delphi
by EarlyBird,
30. Aug 2014
Danke Helmi,
so habe ich es schon gelöst.
Mich wundert nur das Verhalten von insert(5,'') also das insert mit einem leeren String.
Warum werden dann 2 Zeilenumbrüche eingefügt?
(steht das in der Doku?)
Forum: Object-Pascal / Delphi-Language
Delphi
by EarlyBird,
29. Aug 2014
Hallo,
mit folgendem Code möchte ich nach der Eingabe von 10 Zeichen automatisch eine neue Zeile nach der aktuellen Zeile einfügen.
procedure TForm2.mmo1Change(Sender: TObject);
var
caretLine : Integer;
begin
mmo1.OnChange := nil;
caretLine := mmo1.CaretPos.Y;
if Length(mmo1.Lines) >= 10 then