[Bomber]

Игра "Угадай число". Программа "загадывает" двузначное целое число, а пользователь пытается его угадать. Число попыток не ограничено. После очередной попытки программа сообщает результат сравнения (больше - меньше) "задуманного" числа с ответом пользователя. Игра прекращается, если число угадано, либо "зажато" между двумя ответами пользователя. В главном меню программы предусмотреть возможность просмотра числа, задуманного программой, в любой момент игры; просмотр защитить паролем.

Нужно написать такую прогу на дельфи. Помогите пожалуйста.

[Winny]

Вот написал, только зажатость между двумя числами не сделал, лови:

[Bomber]

Winny: Спасибо. А ты не мог бы пояснить, как ты сделал, чтоб пользователь не мог кроме чисел буквы вводить. Т.е как ты исключил эту ошибку?

[Winny]

Конструкция case в событии OnKeyPress у поля ввода. Поясню:

Код:

case Key of //Key - знак нажатой клавиши
'0'..'9':;//если введённый знак в диапозоне от 0 до 9, то ничего не делать
#8://если код введённого знака равен 8 (кнопка Backspace),то ничего не делать
else//иначе
Key:=Chr(0)//Присваеваем Key нулевое значение Char
end;

[moo2k]

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

А ты не мог бы пояснить, как ты сделал, чтоб пользователь не мог кроме чисел буквы вводить. Т.е как ты исключил эту ошибку?

Код:

if(Key<'0') or (Key>'9') then Key:=#0;

P.S. Winny, ты опередил меня.

[Bomber]

Winny: Благодарю.
А можно, чтобы пользователь видел числа, которые вводил, не все, а только два, которые наиболее приближены сверху и снизу к загаданному.
Ещё нужно страницу статистики замутить с профилями. Ну типа кто угадывал и с какой поытки ему это удалось.

[Winny]

Это разве так трудно?