Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Delphi 1.doc
Скачиваний:
9
Добавлен:
14.11.2019
Размер:
90.62 Кб
Скачать

If MessageDlg('Выходим из программы?',

mtConfirmation, [mbYes, mbNo], 0) = mrYes

then close;

В этом фрагменте у пользователя спрашивается, надо ли выходить из программы, и при положительном ответе программа закрывается.

Теперь обсудим функцию ShowMessage. У неё только один параметр - текст сообщения. Вот пример:

ShowMessage('Сообщение');

Отметим, что эта функция используется для вывода простых сообщений, которые не требуют ответа от пользователя (типа Yes, No и т. д.).

Задание

Написать приложение, выполняющее функции калькулятора. Набирать цифры можно, как нажимая на соответствующие кнопки на форме, так и просто на клавиатуре. Калькулятор должен уметь переводить 10-ные числа в двоичную систему счисления и выполнять простейшие арифметические действия с 10-ными числами. При попытке деления на 0 или нажатии недопустимой клавиши на клавиатуре (например, клавиши с буквой) должно выдаваться соответствующее сообщение.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]