powered by simpleCommunicator - 2.0.37     © 2025 Programmizd 02
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Эмуляция нажатия PageDown
6 сообщений из 6, страница 1 из 1
Эмуляция нажатия PageDown
    #40100636
ACLeo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Delphi 10, компонент TcxRichEdit.
Текста в компоненте много.

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

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

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


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

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


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