Гость
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Эмуляция нажатия PageDown / 6 сообщений из 6, страница 1 из 1
29.09.2021, 12:14
    #40100636
ACLeo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эмуляция нажатия PageDown
Delphi 10, компонент TcxRichEdit.
Текста в компоненте много.

Когда нажимаю на клавиатуре PageDown, то скорлится на "одну страницу" и это правильно.
А вот кода эмулирую нажатие, то курсор просто устанавливается на последний видимый символ в компоненте, а саму страницу не скрллит.

Код:
reMain.SetFocus;
keybd_event(VK_NEXT, 0, 0, 0);
keybd_event(VK_NEXT, 0, KEYEVENTF_KEYUP, 0);

Что не так?
...
Рейтинг: 0 / 0
29.09.2021, 12:17
    #40100637
Мимопроходящий
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эмуляция нажатия PageDown
ты ему скролл пошли, а не нажатие
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
29.09.2021, 13:07
    #40100657
DimaBr
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эмуляция нажатия PageDown
ЧЯДНТ ?
...
Рейтинг: 0 / 0
29.09.2021, 13:54
    #40100670
ACLeo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эмуляция нажатия PageDown
DimaBr
ЧЯДНТ ?


Повторил Ваш код один в один. Не работает.
Может настройки RichEdit, или вообще настройки Windows.
У меня стоит 10.
...
Рейтинг: 0 / 0
29.09.2021, 13:56
    #40100671
_Vasilisk_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эмуляция нажатия PageDown
ACLeo
Повторил Ваш код один в один. Не работает.
Манифесты проверяйте
...
Рейтинг: 0 / 0
29.09.2021, 14:24
    #40100678
s62
s62
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Эмуляция нажатия PageDown
ACLeo,

Незнаком с TcxRichEdit, а с обычным TRichEdit (который - обертка для виндовского RichEdit), можно так проскроллить на страницу :
Код: pascal
1.
PostMessage(RichEdit.Handle, EM_SCROLL, SB_PAGEDOWN, 0);
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Эмуляция нажатия PageDown / 6 сообщений из 6, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]