DruckenMister WongFacebook

String hinter Cursorposition einfügen

System Win9x, WinNT, Win2000, WinXP, Vista, Win7
Ab Delphi-Version Delphi 1
Letzte Änderung 28.09.2010

In einem Textfeld einen String an der Cursorposition einfügenDas in TCustomEdit implementierte Property SelText gibt den markierten Text eines Textfeldes zurück. Das Property kann nicht nur lesend, sondern auch schreibend angewandt werden. Folgende Anweisung würde den markierten Text des Memofeldes in 'neuer Text' ändern:


  Memo1.SelText := 'neuer Text';
 

Da aber kein Text ersetzt werden soll, muss die Länge des markierten Abschnitts vorher auf 0 gesetzt werden. Auf diese Weise wird der neue Text hinter die aktuelle Cursorposition gesetzt:

Die Cursorposition lässt sich zudem über das Property SelStart setzen.