In SynEdit einfügen

[Sharky]

Hai Gentleman,

mit diesem Code kannst Du an der aktuelle Position des Caret einen Text einfügen:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var
  foo : String;
begin
  foo := SynEdit1.LineText;
  Insert ('blubb',foo,SynEdit1.CaretX);
  SynEdit1.LineText := foo;
end;