| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вставить текст в Edit [D6, Win2k]
Whippi © (2002-10-29 11:32:00)Как вставить текст в Ричедит, но так что бы он встал, где мигает курсор, а не заменил собой весь текст?
Если можно примерчик.
MBo (2002-10-29 12:45:00) [1]:)
Whippi (2002-10-29 12:43:00) [2]Спасибо,
все получилось методом Smithson-а
MBo (2002-10-29 12:31:00) [3]RichEdit1.SelLength:=0;// выделение снимется, если есть
Richedit1.SelText:=S; // вставка
Smithson (2002-10-29 12:07:00) [4]
I: Integer;
S: String;
...
I := RichEdit1.SelStart;
S := RichEdit1.Lines.Text;
S := Copy(S,1,I)+"Ваш текст"+Copy(S,I+1, Length(S));
RichEdit1.Lines.Text := S;
По-моему, так!
Whippi (2002-10-29 12:04:00) [5]
> Song © (29.10.02 11:46)
> RichEdit1.Lines.Text:="ваш_текст"
Нет, нужно, чтобы он не подменял собой существующий текс, например, есть текс "абс"курсор мигает после "с" нужно чтобы после "с" вставилось "д" и текст приобрел вид "абсд".
а если использовать RichEdit1.Lines.Text:="ваш_текст" то в RichEdit вместотребуемого "абсд" будет "д". Вот в чем загвоздка.
Song (2002-10-29 11:46:00) [6]RichEdit1.Lines.Text:="ваш_текст" и не надо никаких SelStart"ов.
stone (2002-10-29 11:36:00) [7]RichEdit1.SelStart вернет тебе позицию курсора, ну а дальше дело техники
| |
