как не при нажатии а при удержании...

[gaziev]

как не при нажатии а при удержании кнопки отрабатывала процедура? возможно ли так сделать? или чем можно заменить кнопку, но надо чтобы была возможность вставить картинку, и и при нажатии она скрывалась а при отпускании опять появлялась

[Stilet]

Ну удержание например можно отследить в таймере (или в доппотоке) функцией GetAsyncKeyState()
Кажись если вернет число меньше нуля - значит нажата и удерживается.

[indexx]

Можно без потоков и таймеров. Запоминаем последний Key и TickCount. При следующем срабатывании сравниваем Key, и смотрим сколько прошло времени. При зажатой клавише время будет по моему около 1 десятой секунды. Человек так быстро нажать не сможет. Значит клавиша была зажата.

[StriderX]

Сообщение от indexx

Можно без потоков и таймеров. Запоминаем последний Key и TickCount. При следующем срабатывании сравниваем Key, и смотрим сколько прошло времени. При зажатой клавише время будет по моему около 1 десятой секунды. Человек так быстро нажать не сможет. Значит клавиша была зажата.

"Около 1 десятой секунды" - лютое решение. Еще можно написать ShiftKeyPressed := Random(2) = 1.
Если вы топчитесь на событиях, ну так и взводите\сбрасывайте флаги по событиям: KeyDown, KeyUp, WindowActivate\Deactivate.
Если запустили цикл процессов (таймер, onidle, поток), то считывайте сразу через GetAsyncKeyState. Хотя никто не мешает и процессам генерировать события.

[gaziev]

А можете сделать готовый проект? Самый простой, чтобы оно работало. Хочу сделать так чтобы при нажатии кнопки начал считать счётчик, а при отпускании переставал)

[indexx]

Обрабатывый keydown, keyup. Писать за тебя тут ни кто не будет.