except
on EMCIDeviceError do ;
end;
ShowMessage(Edit1.Text);
DeleteTrayIcon(1);
end
else
if Label2.Visible
then Label2.Visible := False
else Label2.Visible := True;
end;
end;
Рисунок 2.5 – Работа таймера будильника
Процедура DeleteTrayIcon.
Заполняем структуру инициализации иконки и удаляем из трея иконку по заполненной структуре.
procedure TForm1.DeleteTrayIcon(n: integer);
var
icondata: TNotifyIconData;
begin
with icondata do
begin
cbSize := SizeOf(TNotifyIconData);
Wnd := Self.Handle;
uId := n;
end;
Shell_NotifyIcon(NIM_DELETE, @icondata);
end;
программный файл звуковой спецификация
Исполняемый файл “Будильник” имеет название Alarm2.exe и расположен на сменном носителе в каталоге Projects. Состав проекта (Таблица 2.2.1).
Таблица 2.2.1 – Состав проекта.
Наименование |
Обозначение |
Примечание |
Alarm.pas |
Файл программного модуля для формы №1 |
Определяет функциональность формы №1 |
Alarm2_1.dfm |
Файл формы №1 |
Содержит список всех компонентов, включенных в форму №1 |
Alarm2_1.ddp |
Файл взаимосвязей формы №1 |
Содержит графические схемы, наглядно поясняющие взаимосвязи между компонентами. |
Alarm2.dcu |
Объектный файл для Alarm.pas |
Откомпилированная версия Alarm.pas |
Alarm2.res |
Файл ресурсов |
Содержит пиктограммы, графические изображения |
Alarm2.dpr |
Файл проекта |
Связывает все файлы, из которых состоит приложение |
Alarm2.dof |
Файл параметров проекта |
Содержит текущие установки проекта: настройки компилятора и компоновщика, имена служебных каталогов, условные директивы |
Alarm2.cfg |
Файл настроек проекта |
Содержит настройки для консольного варианта компилятора |
Программа разработана в среде Delphi 7.0 и функционирует в ОС Windows. Функциональное назначение программы заключается в передаче или напоминании оператору в определенное время определенной информации.
Программа представляет собой один модуль Unit1.pas, который представляет собой набор процедур и обработчиков событий, из которых вызываются описанные процедуры.
При работе программы используется персональный компьютер с установленной на нем ОС Windows.
Входными данными при работе с программой являются введенные оператором с клавиатуры значения часов и минут будильника и необходимое сообщение.
Приведем контрольный пример работы программы.
Убедимся в наличии файла “ sound.wav” в директории Windows. Если такого звукового файла нет, то копируем туда файл со сменного носителя, на котором находится программа “Будильник”.
Запускаем файл Alarm2.exe. В полях ввода часов и минут вводим время, на 5 минут большее текущего. Вводим сообщение, например, “Подъем!”, которое, к примеру, означает, что оператору необходимо подняться и уйти. Жмем кнопку “Ok”. Программа сворачивается в трей и работает в фоновом режиме. По прошествии 5 минут программа выдает сообщение введенным с текстом, в данном случае – “Подъем”, сопровождающееся воспроизведением звукового файла sound.wav.
По окончании работы закрываем окно программы.
Среда разработки приложений Deplhi позволяет создавать полноценные приложения, работающие в ОС Windows.
Разработанная программа “Будильник” показывает эффективность использования языков программирования и, в частности, Delphi 7.0 для создания приложений, необходимых человеку в повседневной жизни.
1. Поликарпова Н., Шалыто А. Автоматное программирование / Изд. 2-е Санкт-Петербург: Питер, 2010 г. , 176 с.
2. Программирование алгоритмов обработки данных / Ускова О. [и др.]. Санкт-Петербург: БХВ-Петербург, 2010 г. , 192 с.
3. Тюгашев А.А. Языки программирования. Учебное пособие. Стандарт третьего поколения Санкт-Петербург: Питер, 2014 г. , 336 с.
4. Одинцов И. Профессиональное программирование. Системный подход, 2 изд. Санкт-Петербург: БХВ-Петербург, 2014 г. , 624 с.
5. Орлов С. А., Цилькер Б. Я. Технологии разработки программного обеспечения. Учебник для вузов. 4-е издание. Стандарт третьего поколения Санкт-Петербург: Питер, 2012 г. , 608 с.
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.