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

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

Проблема с определением позиции каретки в TMemo [D5, D6, Win2k, WinXP]


Страницы:   1 2

Th ©   (2004-07-15 12:56:00) 

Кто-нибудь сталкивался со след. проблемой:
Есть компонент типа TMemo. Если предположим по его событиям OnClick и OnKeyDown выводить на экран позицию каретки (свойство SelStart), то при кликании мышкой позиция отображается верная, а если перемещать курсор клавишами <влево>-<вправо>, то начинается ботва.. Например если я сделал три нажатия <вправо>, то позиция исправно увеличивается на единицу три раза, но как только я сменю направление - нажму <влево>, то позиция опять увеличится, вместо того, чтобы уменьшится.
Пробовал получать позицию через сообщение CharFromPos и функцию GetCaretPos - то же самое..


Красный молоток   (2004-07-15 15:14:00) [21]

Код покажи.


Th   (2004-07-15 14:12:00) [22]

пробовал, не помогает..


Красный молоток   (2004-07-15 13:23:00) [23]

procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
label1.Caption:=IntToStr( Memo1.CaretPos.X);
end;


Johnmen   (2004-07-15 13:20:00) [24]

"В потолке открылся люк.
Не волнуйтесь, это глюк !" (c)


Страницы:   1 2

Наверх

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