Insert text in TMemo

3 отговора 160 прегледа
#1

Insert text in TMemo

Как може да се инсертне даден текст в компонентата TMemo (или TRichEdit).
пример:
Искам да инсертна текстта "Проба" между 10 и 11 символ на 2 ред в една от двете компоненти, които посочих

Отговор
в отговор на DayDio #2

Re: Insert text in TMemo

Memo1.SelLength := 0;
Memo1.SelStart := 10 + 2 {знака за нов ред} + Length(Memo1.Lines[0]);
Memo1.SelText := 'Проба';

Редактирано от andrew_nikoloff на

Отговор
в отговор на andrew_nikoloff #3

Re: Insert text in TMemo

Благодаря ти за отговора

Отговор
в отговор на DayDio #4

SetCursorPos in TMemo or TRichEdit

Как може, когато влача мишката върху TMemo и курсура (който се намира в TMemo) да следи обикновения курсур (който се контролира от мишката)?
Благодаря предварително за мненията

Отговор