Wie fügt man an einer bestimmten Position Text in ein TMemo (order TEdit, TRichEdit) ein?

Die Einfügeposition wird mit der Eigenschaft SelStart festgelegt. Der einzufügende Text wird der Eigenschaft SelText übergeben.

Mit der Eigenschaft SelLength kann man die Länge des markierten Textes im Memo festlegen. SelLength muß auf Null gesetzt werden, um keinen Text im Memo zu überschreiben:

  Memo.SelStart := Einfuegeposition;
  Memo.SelLength := 0;
  Memo.SelText := 'Einzufügender Text';

Setzt man

  SelText := '';

solange SelLength>0, so löscht man den aktuell markierten Text.

siehe auch:

Wie kann ich vom Programm aus durch ein TMemo scrollen?
Wie ermittle ich in einem TMemo (oder TRichEdit) die Cursorposition?
Wie kann ich zu einer bestimmten Zeile eines TMemo (order TRichEdit) scrollen?
Wie kann ich den blinkenden Cursor in einem deaktivierten TMemo (oder TEdit) verstecken?
Wie kann ich die maximale Textlänge in einem TRichEdit erhöhen?
Wie kann ich in einem TEdit z.B. nur numerische Eingaben zulassen?

Delphi FAQ