Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

RichEdit [D7, XP]


dmdel ©   (2007-04-29 18:03:00) 

Здраствуйте. Есть RichEdit, заполнено  много строк курсор стоит в определенной позиции (предположим на 350 символе). Нужно загрузить новый текст, и поставить курсор в позицию - на 350 символ, чтобы при этом курсор был виден


{RASkov}   (2007-05-04 12:08:00) [1]

> [3] dmdel ©   (04.05.07 08:51)

Показывай как делаешь.... и что находится в Rich'е, .... подробнее напиши, что у тебя там.


dmdel   (2007-05-04 08:51:00) [2]


> {RASkov} ©   (29.04.07 18:19) [1]

Попробовал - не работает,курсор все равно переходит в начало текста.


dmdel   (2007-04-30 15:56:00) [3]

Спасибо


{RASkov}   (2007-04-29 18:19:00) [4]

Попробуй как вариант, но учти, что таких позиций, после загрузки нового текста, может и не быть.
var P: TPoint;
begin
 P.X:=RichEdit.SelStart;
 P.Y:=RichEdit.CaretPos.Y;
 RichEdit.Lines.LoadF...; //Загружаем новый текст.
 RichEdit.SelStart:=P.X;
 RichEdit.Perform(EM_LINESCROLL, 0, P.Y);
 RichEdit.SetFocus;
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо