Необходимо присваивать значение переменной на 20 сек

[CHEburaschka]

Здравствуйте!

Мне необходимо реализовать следующий алгоритм.
По умолчанию k=0.
Если был нажат пробел (не в данном приложении), то k:=1, но через 20 секунд (после нажатия пробела) возвращается исходное значение k:=0.

k:=0;

if getasynckeystate($20)<>0 then //если был нажат пробел, то
    begin
        k:=1; //это значение должно присваиваться на 20 сек
    end
    else begin
        k:=0;
    end;

Может кто-нибудь подсказать решения такой задачи?

[Sciv]

Ага. Закинуть на форму таймер и при нажатии пробела инициировать его на 20000 миллисекунд. А через это время - деактивировать и сбросить переменную К

[min@y™]

Если приложение не использует VCL, а написано на чистом WinAPI, то красивое решение - SetTimer() / KillTimer().