Содержание
-
Функции вывода сообщений.Замена стандартной иконки файла .exeИзменение цвета формы по событию OnClick
Lasarus МАОУ Лицей № 17 г. Сухой Лог учитель информатики Семенова Светлана Вениаминовна
-
Замена стандартной иконки .exe файла
Проект – параметры проекта – загрузить значок(выбрать иконку) -ОК
-
Процедура ShowMessage(показать сообщения)
выводит простое диалоговое окно на экране с кнопкой ОК, содержащее строку Text procedure TForm1.FormClose(Sender: TObject; varCloseAction: TCloseAction); begin ShowMessage('Конец работы!!'); end; Форма записи
-
Функция MessageDlg(диалоговое сообщение)
используется для отображения сообщений пользователю procedure TForm1.FormCloseQuery(Sender: TObject; varCanClose: boolean); begin if MessageDlg('Разрешить выход ?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then CanClose := True else CanClose := False; end; Форма записи CanClose–можно закрыть Query - запрос
-
Параметры функция MessageDlg
Первый параметр задает строку, которая будет показываться в нашем сообщении’Разрешить выход ?’
-
Второй параметр определяет иконку на messageboxи сообщение в его заголовке. Возможные значения для этого параметра: mtWarning - Отображает символ восклицанияmtError - Отображает красный "Х" mtInformation - Отображает "i" в кругеmtConfirmation - Отображает знак вопросаmtCustom - Отображает только сообщение
-
Третий параметр определяет кнопки, которые будут присутствовать на combobox: mbYes(кнопка Yes), mbNo (кнопка No), mbCancel (кнопка Cancel), mbOK(кнопка OK). Если кнопок несколько, то они объединяются посредством квадратных скобок: [mbYes, mbNo], 0)
-
Четвертый параметр - это идентификатор контекстной справки. В качестве результата функции MessageDlg возвращает значение, информирующее о том, что за кнопку пользователь нажал в messagebox. Возможные значения: mrYes, mrCancel, mrOK.
-
Изменение цвета формы по событию OnClick (на форме)
procedure TForm1.FormClick(Sender: TObject); begin if Color = clLime then Color := clBlue else Color := clLime; end;
-
Задание
Внимание! После открытия проекта сохранитьего в папке Цвета и сообщения под именем Color. Создать форму: название Цвета и сообщения Изменить стандартную иконку на другую Форма должна менять цвет с одного (например, малиновый) на другой (голубой) на событие OnClick 4. При закрытии формы выходит сообщение: Вы собираетесь закрыть программу! Должны присутствовать кнопки: Да (Yes), Отмена (….). 5. При положительном ответе появляется окно с кнопкой ОК и текстом: До новых встреч!
-
Домашнее заданиеЗадача. Пусть оптимальный вес человека определяется как рост минус 100см. Если фактический вес человека меньше оптимального, то будем считать его худым (ему надо поправиться на х кг), если больше, то полным (надо похудеть на х кг). Если фактический вес равен оптимальному, то его вес идеален. Создать блок-схему для этой задачи.Примечание. Введите следующие обозначения: оптимальный вес - optW, фактический вес - factW, рост - Rost, Delta – на сколько нужно похудеть или поправиться.
Lasarus
-
Источники
http://www.bdrc.ru/publ/2-1-0-7 http://physics.herzen.spb.ru/library/03/01/delphi/LR_1/L_05.htm
Нет комментариев для данной презентации
Помогите другим пользователям — будьте первым, кто поделится своим мнением об этой презентации.