помогите с задачей в delphi - есть ответ

Ampeklol, 112 просмотров

помогите написать задачу в делфи
условие такое
имеем один edit один button один Label
вводим в edit любую цифру от 1 до 12
нажимает на button и в окне label должно писать какое это время года
в противное случает если вводим цифру 13 и так далее выходит окно с ошибкой что ввели не правильно цифрц

Ответы:

Пользуюсь и той и другой, в обеих есть. Да куда бы делся "windows.h" когда на него ссылается "stdafx.h", который VS по умолчанию включает почт

case StrToInt(Edit1.Text) of
12, 1, 2: Label1.Caption := 'зима';
3, 4, 5: Label1.Caption := 'весна';
6, 7, 8: Label1.Caption := 'лето';
9, 10, 11: Label1.Caption := 'осень';
else
MessageDlg('нет такого месяца', mtError, [mbOk], 0);
end;

12 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

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

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.