ДЕЛФИ ИГРА УГАДАЙ ЧИСЛО

Delphi - это отличный выбор для создания игры "Угадай число". Начнем с создания главной формы игры. Она должна содержать поле ввода числа и кнопку «Попробовать угадать».

Form1 = class(TForm)
Edit1: TEdit;
Button1: TButton;
end;

Игра должна генерировать случайное число, которое игрок будет пытаться угадать. Каждый раз, когда игрок вводит число и нажимает кнопку, игра должна проверять, правильный ли ввод и выводить сообщение о соответствующем результате.

Randomize;
Target := Random(100);
Guess := StrToInt(Edit1.Text);
if Guess = Target then
begin
ShowMessage('Вы угадали число!');
end
else if Guess < Target then
begin
ShowMessage('Ваше число меньше!');
end
else if Guess > Target then
begin
ShowMessage('Ваше число больше!');
end;

Игра должна продолжаться до тех пор, пока игрок не угадает число. После каждой неудачной попытки игрок должен получать подсказку, чтобы помочь ему ближе подойти к искомому числу.

В конце игры игрок должен иметь возможность начать новую игру или выйти из приложения.

if MessageDlg('Хотите сыграть еще раз?', mtConfirmation,
[mbYes, mbNo], 0) = mrYes then Form1.ResetGame
else Form1.Close;

Программирование в Delphi Урок 11. Компонент Timer / Создаем игру \

Как сделать нейросеть в Delphi

Игра \

Тест на Delphi

Угадай число - Простая игра на JavaScript

[MiniGames. Lazarus] Мини игра \

Игра угадай число на python (питон)

Реклама
Новое
Реклама