If MessageDlg('Выходим из программы?',
mtConfirmation,
[mbYes, mbNo], 0) = mrYes
then
close;
В этом фрагменте у пользователя
спрашивается, надо ли выходить из
программы, и при положительном ответе
программа закрывается.
Теперь обсудим функцию ShowMessage. У неё
только один параметр - текст сообщения.
Вот пример:
ShowMessage('Сообщение');
Отметим, что эта функция
используется для вывода простых
сообщений, которые не требуют ответа
от пользователя (типа Yes, No и т. д.).
Задание
Написать приложение, выполняющее функции
калькулятора. Набирать цифры можно,
как нажимая на соответствующие кнопки
на форме, так и просто на клавиатуре.
Калькулятор должен уметь переводить
10-ные числа в двоичную систему счисления
и выполнять простейшие арифметические
действия с 10-ными числами. При попытке
деления на 0 или нажатии недопустимой
клавиши на клавиатуре (например, клавиши
с буквой) должно выдаваться соответствующее
сообщение.