Функции вывода сообщений

Сентябрь 15, 2022

Главная
Алгебра
Функции вывода сообщений

Содержание

2. Замена стандартной иконки .exe файла Проект – параметры проекта – загрузить значок(выбрать иконку) -ОК
3. Процедура ShowMessage (показать сообщения) выводит простое диалоговое окно на экране с кнопкой ОК, содержащее строку Text
4. Функция MessageDlg (диалоговое сообщение) используется для отображения сообщений пользователю procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: boolean); begin
5. Параметры функция MessageDlg Первый параметр задает строку, которая будет показываться в нашем сообщении ’Разрешить выход ?’
6. Параметры функция MessageDlg Второй параметр определяет иконку на messagebox и сообщение в его заголовке. Возможные значения
7. Параметры функция MessageDlg Третий параметр определяет кнопки, которые будут присутствовать на combobox: mbYes (кнопка Yes), mbNo
8. Параметры функция MessageDlg Четвертый параметр - это идентификатор контекстной справки. В качестве результата функции MessageDlg возвращает
9. Изменение цвета формы по событию OnClick (на форме) procedure TForm1.FormClick(Sender: TObject); begin if Color = clLime
10. Задание Внимание! После открытия проекта сохранить его в папке Цвета и сообщения под именем Color. Создать
11. Домашнее задание Задача. Пусть оптимальный вес человека определяется как рост минус 100см. Если фактический вес человека
13. Скачать презентацию

Слайд 2

Замена стандартной иконки .exe файла
Проект – параметры проекта – загрузить

значок(выбрать иконку) -ОК

Слайд 3

Процедура ShowMessage (показать сообщения)
выводит простое диалоговое окно на экране с кнопкой

ОК, содержащее строку Text

procedure TForm1.FormClose(Sender: TObject; var CloseAction: TCloseAction);
begin
ShowMessage('Конец работы!!');
end;

Форма записи

Слайд 4

Функция MessageDlg (диалоговое сообщение)
используется для отображения сообщений пользователю
procedure TForm1.FormCloseQuery(Sender: TObject; var

CanClose: boolean);
begin
if MessageDlg('Разрешить выход ?', mtConfirmation, [mbYes, mbNo], 0) = mrYes
then CanClose := True
else CanClose := False;
end;

Форма записи

Can Close –можно закрыть

Query - запрос

Слайд 5

Параметры функция MessageDlg
Первый параметр задает строку, которая будет показываться в

нашем сообщении ’Разрешить выход ?’

Слайд 6

Параметры функция MessageDlg
Второй параметр определяет иконку на messagebox и сообщение

в его заголовке. Возможные значения для этого параметра:
mtWarning - Отображает символ восклицания mtError - Отображает красный "Х" mtInformation - Отображает "i" в круге mtConfirmation - Отображает знак вопроса mtCustom - Отображает только сообщение

Слайд 7

Параметры функция MessageDlg
Третий параметр определяет кнопки, которые будут присутствовать на

combobox: mbYes (кнопка Yes), mbNo (кнопка No), mbCancel (кнопка Cancel), mbOK (кнопка OK).
Если кнопок несколько, то они объединяются посредством квадратных скобок:
[mbYes, mbNo], 0)

Слайд 8

Параметры функция MessageDlg
Четвертый параметр - это идентификатор контекстной справки.
В качестве

результата функции MessageDlg возвращает значение, информирующее о том, что за кнопку пользователь нажал в messagebox.
Возможные значения: mrYes, mrCancel, mrOK.

Слайд 9

Изменение цвета формы по событию OnClick (на форме)
procedure TForm1.FormClick(Sender: TObject);
begin
if

Color = clLime then
Color := clBlue
else Color := clLime;
end;

Слайд 10

Задание
Внимание! После открытия проекта сохранить его в папке Цвета и сообщения

под именем Color.
Создать форму: название Цвета и сообщения
Изменить стандартную иконку на другую
Форма должна менять цвет с одного (например, малиновый) на другой (голубой) на событие OnClick
4. При закрытии формы выходит сообщение: Вы собираетесь закрыть программу! Должны присутствовать кнопки: Да (Yes), Отмена (….).
5. При положительном ответе появляется окно с кнопкой ОК и текстом: До новых встреч!

Слайд 11

Домашнее задание Задача. Пусть оптимальный вес человека определяется как рост минус 100см.

Если фактический вес человека меньше оптимального, то будем считать его худым (ему надо поправиться на х кг), если больше, то полным (надо похудеть на х кг). Если фактический вес равен оптимальному, то его вес идеален. Создать блок-схему для этой задачи. Примечание. Введите следующие обозначения: оптимальный вес - optW, фактический вес - factW, рост - Rost, Delta – на сколько нужно похудеть или поправиться.

Lasarus

Функции вывода сообщений

Содержание

Замена стандартной иконки .exe файла Проект – параметры проекта – загрузить

Процедура ShowMessage (показать сообщения)выводит простое диалоговое окно на экране с кнопкой

Функция MessageDlg (диалоговое сообщение) используется для отображения сообщений пользователюprocedure TForm1.FormCloseQuery(Sender: TObject; var

Параметры функция MessageDlg Первый параметр задает строку, которая будет показываться в

Параметры функция MessageDlg Второй параметр определяет иконку на messagebox и сообщение

Параметры функция MessageDlg Третий параметр определяет кнопки, которые будут присутствовать на

Параметры функция MessageDlg Четвертый параметр - это идентификатор контекстной справки.В качестве

Изменение цвета формы по событию OnClick (на форме)procedure TForm1.FormClick(Sender: TObject);begin if

ЗаданиеВнимание! После открытия проекта сохранить его в папке Цвета и сообщения