das ist SelStart:
Memo1.SelStart gibt dir die aktuelle Cursorposition zurück. Wenn du den ganzen Text der Memo in eine string-variable reinpackst kannst du mit gesamtstring := insert('-eingefügter text-',gesamtstring,memo1.SelStart); was reinkleben.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var s: string;
begin
s := memo1.Text;
insert('<insert>',s,memo1.SelStart);
memo1.Text := s;
end;