У меня еще одна проблемка. В программе нельзя пользоваться мышкой. Задействованы только клавиши F1-F5, F7, Enter. Написал метод в котором:
nKeyCode=Inkey(0) - то есть ожидание нажатия клавиши. ПОсле этого идет метод KeyPress, где прописаны все действия при нажатии вышеперечисленных клавиш.
Но по ходу пьесы у меня работает таймер. После окончания интервала у таймера форма должна закрываться. Но она все так и ждет нажатия клавиши. Как бы обойти Inkey(0), если время истекло?
ПРобовал keyboard(' '). Но что-то не срабатывает. Помогите мужики!!!

Тем что у меня циклик. В цикле ожидается нажатие клавиши. После этого идет следующий шаг и опять нажатие клавиши.
В первом методе у меня:

Do while ...
thisformset.form_test.Show()

nKeyCode =INKEY(0)

thisformset.form_test.KeyPress(nKeyCode)
skip
Enddo

В KeyPress у меня:
LPARAMETERS nKeyCode, nShiftAltCtrl

DO CASE
CASE nKeyCode = 28 && F1
IF nKod1=cur3.answer
thisformset.form_znak.label1.Caption = "Правильно"
ELSE
thisformset.form_znak.label1.Caption = "Неправильно"
k=k+1
ENDIF

CASE nkeyCode=32
thisformset.form_znak.label1.Caption = "Время истекло!"
wwww=16

ENDCASE

Но между ними есть вероятность того, что время закончиться до нажатия клавиши, тогда в Timer1.Timer прописываю:

thisformset.form_test.timer1.Enabled = .F.
keyboard(' ')

Ребята, как сделать чтобы не вспотыкалась прога?

Проходящий, а как сделать через KeyPress без нажатия клавиши. Пробовал с nKeyCode=0, то есть клавиша не нажата. Все равно ерунда. А мне нужно, чтобы по истечению времени, у меня форма закрывала и помахала на прощание платочком.