Memo1 text an eine Position einfügen.

[titanium]

Hallo,
ich wollte wissen wie ich in mein Memo1 eine text einfügen kann.
Ich will das mit Button1 irgendeine Wert in Memo1 an der Position eingefügt werden soll, wo vorher der Maus eingeklickt wurde.

Danke.

[raimond]

Ein Memo füllt den Text von links nach rechts hinein, beliebige "Positionen" können nicht angegeben werden.
Du könntest aber die Mauspoition in relation zur Memo Position nehmen und ausrechnen, wieviele leerzeichen und/oder Zeilenumbrüche du setzen musst.

(Oder einfach ein Label setzen)

mfg
Rai

[titanium]

Also ein Beispiel habe ich gesehen der aber nicht funktioniert:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 Memo1->Text.Insert("Text",Memo1->SelStart);
}

[Jansen]

TMemo::SelText dürfte dir weiterhelfen.

[titanium]

Danke.