Подробный видеоурок на эту тему находится в моем бесплатном видеокурсе по Delphi — www.progdelphi.ru/pod.php
Здесь находится только сокращенная статья на эту же тему.

Ниже приведен пример эмуляции нажатия клавиши клавиатуры.

С помощью данной функции легко написать экранную клавиатуру или калькулятор, наподобие тех, что есть в стандартных программах Windows. Такая функция позволит вводить символы и числа при помощи мышки, а не только с клавиатуры. Область применения эмуляции нажатия кнопки на клавиатуре широка, поэтому знать ее будет полезно каждому.

Для того, что бы выполнить эмуляцию необходимо:
Добавляем на форму компоненты Button и Edit (с вкладки Standart);
На кнопке Button1 создаем обработчик событий OnClick и прописать в нем приведенный ниже код:

1

SendMessage(Edit1.handle, wm_char, ord('E'), 0);

Таким образом, нажатие кнопки эмулирует нажатие клавиши клавиатуры и добавит в Edit1 символ «E».
Тоже самое действие вы можете выполнять например в таймере чтобы после запуска программы с нужной периодичностью нажималась какая-то конкретная клавиша. Это хорошо применять в играх где нужно часто нажимать на какую-то кнопку.

Понравилась статья? Жми:

Поделиться в соц. сетях

Публикатор/Автор: Артём Кашеваров