там два кода. Обращение c:=ReadKey возвращает код нажатой клавиши (точнее, соотв. символ), если был введён обычный символ, и $00 в противном случае. Тогда надо подать эту команду ещё раз, чтобы получить вторую половину кода.
-----------------------------------------------------------------------------
я, наверное, невнятно выразился. Формальные правила игры такие. Обращение к этой функции сбрасывает ожидание -- но только в том случае, когда возврат ненулевой. Если же он оказался вдруг нулевым, то надобно вызвать эту функцию ещё раз, а иначе повторный вызов функции приведёт вовсе не к приостановке счёта, а попросту вернёт вторую половинку кода.
|