Text in SynMemo einfügen und Cursor setzen

[Äfan]

Hi,

Ich habe ein SynMemo feld. Wenn ich auf einen Button klicke, will ich, dass an die stelle meines Cursors (das blinkende ding beim schreiben) der Text "Ich heiße und das ist gut" eigefügt wird und der Cursor an die stelle nach dem wort "heiße" gesetzt wird (also das man gleich seinen namen ohne viel geklicke eigeben kann), wie mache ich das ?

MFG

[Luckie]

Schon mal die Eigenschaften der Komponente angeguckt? Die hat bestimmt, wie das TMemo, ähnliche Eigenschaften wie SelText und SelStart.

[Äfan]

Zitat:

Schon mal die Eigenschaften der Komponente angeguckt?

Ja habe ich, leider habe ich es immer mit den Falschen Eingenschaften probiert, naja bin in delphi noch net so gewandelt. Jetzt gehts ja,

Delphi-Quellcode:

procedure TMainForm.ToolButton26Click(Sender: TObject);
begin
  Memo.SelText := '()';
  Memo.SelStart := Memo.SelStart-1;
end;

Danke

MFG