Инфоурок / Информатика / Конспекты / Диалоговые окна InputBox, ShowMessage. 10 класс

Диалоговые окна InputBox, ShowMessage. 10 класс

Курсы профессиональной переподготовки
124 курса

Выдаем дипломы установленного образца

Заочное обучение - на сайте «Инфоурок»
(в дипломе форма обучения не указывается)

Начало обучения: 22 ноября
(набор групп каждую неделю)

Лицензия на образовательную деятельность
(№5201 выдана ООО «Инфоурок» 20.05.2016)


Скидка 50%

от 13 800  6 900 руб. / 300 часов

от 17 800  8 900 руб. / 600 часов

Выберите квалификацию, которая должна быть указана в Вашем дипломе:
... и ещё 87 других квалификаций, которые Вы можете получить

Получите наградные документы сразу с 38 конкурсов за один орг.взнос: Подробнее ->>

библиотека
материалов

Урок №5 Диалоговые окна InputBox, ShowMessage.

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

Для осуществления ввoда данных мoжнo иcпoльзoвать кoмпoнент TЕdit, для вывoда данных – компoнент Labеl.

Существует дрyгoй способ ввoда и вывoда данныx – иcпoльзoваниe вcтрoeнных диалоговых окон InзutBох, ShоwМеssаgе. Эти диалоговые окна не устанавливаются программистoм на фopмy во время разработки. Операторы их активации нужно вставлять в программный код.

Более подробно остановимся на втором способе.

Ввод данных.

Функция InputBox() выводит на экран диалоговое окно, в котором можно ввести данные.

Аргументами этой функции являются три строки, а значением функции – строка введенная пользователем.

В общем виде строка программного кода с использованием функции InputBox выглядит так:

Переменная := InputBox('Заголовок', 'Подсказка', 'Значение по умолчанию');

где:

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

Заголовок – текст заголовка окна;

Подсказка – текст поясняющего сообщения;

Значение по умолчанию – текст, который будет находиться в поле ввода, когда окно появиться на экране.

Например,

n := InputBox('Ввод числа', 'Введите число:', ' ');

Результат показан на рисунке:

http://static.wixstatic.com/media/94856c_33808b0bd9b04c7ebf65f9534c634273.jpg_srz_p_431_127_75_22_0.50_1.20_0.00_jpg_srz

Если пользователь щелкнет по кнопке ОК, то значением функции станет строка, введенная пользователем в текстовое поле. Если пользователь щелкнет по кнопке Cancel, то значением функции станет строка «Значение по умолчанию».

Значение функции InputBox всегда строкового типа (String), поэтому в случае, если нужно ввести число, то введенная строка должна быть преобразована в число при помощи соответствующей функции преобразования.

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

Ввод исходных данных из окна ввода и последующее преобразование данных может выглядеть так:

Stroka:= InputBox(‘Дюймы-сантиметры’,’Введите длину в сантиметрах:’,’0‘);

Chislo:=StrToFloat(Stroka);

Можно преобразовать в одну строку:

Chislo:= StrToFloat(InputBox(‘Дюймы-сантиметры’,’Введите длину в сантиметрах:’,’0‘));

 http://static.wixstatic.com/media/94856c_88607f676f8c421ebc336a49e7442495.jpg_srz_p_433_129_75_22_0.50_1.20_0.00_jpg_srz

Вывод данных.


Для вывода результата используется процедура ShowMessage(). Она выводит на экран диалоговое окно с текстом и командной кнопкой OK.

Общий вид инструкции вызова процедуры ShowMessage:

ShowMessage(‘Сообщение’);

где Сообщение – текст, который будет выведен в окне.

Например, для того чтобы вывести результат в программе пересчета веса из фунтов в килограммы, можно использовать следующую строку кода:

ShowMessage(‘Длина в сантиметрах: ‘+ FloatToStr(Chislo*2.54));

Результат:

http://static.wixstatic.com/media/94856c_46dbc6feffe94900ba589c7d1b18ebc2.jpg_srz_p_264_126_75_22_0.50_1.20_0.00_jpg_srz

Задание.

Поместить на форму две кнопки: Ввод данных и Выход. Пользователь должен ввести фамилию, имя и возраст. Для ввода данных использовать функцию InputBox. По окончании ввода анкетные данные вывести в поле вывода (компонент Label).

Самые низкие цены на курсы переподготовки

Специально для учителей, воспитателей и других работников системы образования действуют 50% скидки при обучении на курсах профессиональной переподготовки.

После окончания обучения выдаётся диплом о профессиональной переподготовке установленного образца с присвоением квалификации (признаётся при прохождении аттестации по всей России).

Обучение проходит заочно прямо на сайте проекта "Инфоурок", но в дипломе форма обучения не указывается.

Начало обучения ближайшей группы: 22 ноября. Оплата возможна в беспроцентную рассрочку (10% в начале обучения и 90% в конце обучения)!

Подайте заявку на интересующий Вас курс сейчас: https://infourok.ru


Общая информация

Номер материала: ДВ-471134
Курсы профессиональной переподготовки
124 курса

Выдаем дипломы установленного образца

Заочное обучение - на сайте «Инфоурок»
(в дипломе форма обучения не указывается)

Начало обучения: 22 ноября
(набор групп каждую неделю)

Лицензия на образовательную деятельность
(№5201 выдана ООО «Инфоурок» 20.05.2016)


Скидка 50%

от 13 800  6 900 руб. / 300 часов

от 17 800  8 900 руб. / 600 часов

Выберите квалификацию, которая должна быть указана в Вашем дипломе:
... и ещё 87 других квалификаций, которые Вы можете получить

Похожие материалы

Получите наградные документы сразу с 38 конкурсов за один орг.взнос: Подробнее ->>