Einzelnen Beitrag anzeigen

Moin

Registriert seit: 16. Dez 2003
Ort: Dresden
57 Beiträge
 
Delphi 7 Enterprise
 
#1

String in Memo einfügen /// Cursor in memo festlegen

  Alt 24. Apr 2004, 18:12
Tach auch,
ich füge in ne MEMO n kurzen string ein:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var s: string;
begin
  s := memo1.Text;
  insert('<insert>',s,memo1.SelStart);
  memo1.Text := s;
end;
nach dem einfügen ist der Cursor aber ganz am Anfang der Memo das nervt extrem!!!!
wie kann ich den Cursor hinter den neu eingefügten Text stellen
Oder gibt es eine bessere methode, dem text einzufügen? ?

THX im Vorraus
Euer MOIN
~~ an alln ekn & endn sparn! ~~
  Mit Zitat antworten Zitat