Использование диалоговых окон.

Цель работы: Применение теоретических навыков на практике. Ознакомить учащихся с использованием диалоговых окон. Закрепить полученные на лекции знания. Написать и отладить программу

Теория:

Работа со стандартными диалоговыми окнами осуществляется в три этапа:

1. На форму помещается соответствующий компонент и осуществляется настройка его свойств. Следует обратить внимание на то, что компонент-диалог не виден в момент работы программы, видно лишь создаваемое им стандартное окно.

2. Осуществляется вызов стандартного для диалогов метода Execute, который создает и показывает настроенное окно на экране. Вызов этого метода обычно располагается внутри обработчика какого-либо события. После обращения к Execute на экране появляется соответствующее диалоговое окно.Окно диалога является модальным окном, поэтому сразу после обращения к нему дальнейшее выполнение программы приостанавливается до тех пор, пока пользователь не закроет окно.

3. Использование введенных из диалогового окна данных (имя файла, настройки принтера и т.д.) для продолжения работы программы.

TOpenDialog и TSaveDialog

Эти компоненты имеют идентичные свойства и различаются только внешним видом. Свойство FileName: (тип String) содержит маршрут поиска и имя выбранного файла при успешном завершении диалога программы.

Для проверки наличия файла на диске глобальная функция FileExists Свойство Filter: String используется для фильтрации (отбора) файлов, показываемых в диалоговом окне. Это свойство можно устанавливать с помощью специального редактора или программно. Для доступа к редактору достаточно щелкнуть по кнопке в строке Filter окна инспектора объектов. При программном вводе фильтры задаются одной длинной строкой, в которой символы «|» служат для отделения фильтров друг от друга, а также для отделения описания фильтруемых файлов от соответствующей маски выбора. С помощью свойства DefaultExt: String[3] формируется полное имя файла, если при ручном вводе пользователь не указал расширение. В этом случае к имени файла прибавляется разделительная точка и содержимое этого свойства.Настройка диалога может варьироваться с помощью свойства

TOpenOption = (of Readonly, ofOverwritePrompt, ofHideReadOnly,

ofNoChangeDir, ofShowHelp, ofNoValidate, ofAllowMuItiSelect, ofExtensionDifferent, ofOldStyleDialog

ofPathMustExist, ofFileMustExist, ofCreatePrompt, ofShareAware, ofNoReadOnlyReturn, ofNoTestFileCreate, ofNoNetworkButton, ofNoLongNames,, ofNoDereferenceLinks);

TOpenOptions = set of TOpenOption;

property Options: TOpenOptions;

Значения этого свойства имеют следующий смысл:

ofReadOnly	Устанавливает переключатель “Только для чтения”
ofOverwritePrompt	Требует согласия пользователя при записи в существующий файл
ofHideReadOnly	Прячет переключатель “Только для чтения”
ofNoChangeDir	Запрещает смену каталога.
ofShowHelp	Включает в окно кнопку Help
ofNoValidate	Запрещает автоматическую проверку правильности набираемых в имени файла символов
ofAllowMultiSelec	Разрешает множественный выбор файлов
ofExtensionDiffer	При завершении диалога наличие этого значения в свойстве Options говорит о том, что пользователь ввел расширение, отличающееся от умалчиваемого
ofPathMustExist	Разрешает указывать файлы только из существующих каталогов
ofFileMustExist	Разрешает указывать только существующие файлы.
ofCreatePrompt	Требует подтверждения для создания несуществующего файла
ofShareAware	Разрешает выбирать файлы, используемые другими параллельно выполняемыми программами
ofNoReadOnlyRetur	Запрещает выбор файлов, имеющих атрибут “Только для чтения“
ofNoTestFileCreat	Запрещает проверку доступности сетевого или локального диска
ofNoNetworkButton	Запрещает вставку кнопки для создания сетевого диска
ofNoLongNames	Запрещает использование длинных имен файлов
ofOldStyleDialog	Создает диалог в стиле Windows З.х

Задание: Создать диалоговые окна для примеров

1. Вывести на экран 1 или 0 в зависимости от того, имеют три заданных целых числа одинаковую четность или нет.

2. Найти сумму цифр заданного четырехзначного числа.

3. Определить число, полученное выписыванием в обратном порядке цифр заданного трехзначного числа.

4. Вывести на экран 1 или 0 в зависимости от того, равна ли сумма двух первых цифр заданного четырехзначного числа сумме двух его последних цифр.

5. Вывести на экран 1 или 0 в зависимости от того, равен ли квадрат заданного трехзначного числа кубу суммы цифр этого числа.

6. Вывести на экран 1 или 0 в зависимости от того, есть ли среди первых трех цифр дробной части заданного положительного вещественного числа цифра ноль.

7. Вывести на экран 1 или 0 в зависимости от того, есть ли среди цифр заданного трехзначного числа одинаковые.

8. Присвоить целой переменной k третью от конца цифру в записи положительного целого числа n.

9. Присвоить целой переменной k первую цифру из дробной части положительного вещественного числа.

10. Целой переменной S присвоить сумму цифр трехзначного целого числа k.

11. Идет k-я секунда суток. Определить, сколько полных часов (h) и полных минут (m)прошло к этому моменту.

12. Определить f – угол (в градусах) между положением часовой стрелки в начале суток и ее положением в h часов, m минут и s секунд (0< =h< =11, 0< =m, s< =59).

13. Определить h – полное количество часов и m – полное количество минут, прошедших от начала суток до того момента( в первой половине дня), когда часовая стрелка повернулась на f градусов(0< =f< 360, f – вещественное число).

14. Пусть k – целое от 1 до 365. Присвоить целой переменной n значение 1, 2, …6 или 7 в зависимости от того, на какой день недели ( понедельник, вторник, …, суббота или воскресенье) приходится k- й день невисокосного года, в котором 1 января - понедельник.

15. Поменять местами значения целых переменных x и y, не используя дополнительные переменные.

Контрольные вопросы:

1. Какие 3 вида диалоговых окон ввода-вывода вы знаете?

2. Что возращает функция MessageDlg?

3. Какие системные диалоги вы знаете?

4. Опишите компонент OpenDialog?

Лабораторная работа №22

Использование операторов обработки исключений.

Цель работы: Применение теоретических навыков на практике. Ознакомить учащихся с обработкой исключительных ситуации. Закрепить полученные на лекции знания. Написать и отладить программу

Теория:

Структурная обработка исключительных ситуаций - это система, позволяющая программисту при возникновении ошибки (исключительной ситуации) связаться с кодом программы, подготовленным для обработки такой ошибки.

Новое ключевое слово, добавленное в язык Object Pascal - try. Оно используется для обозначения первой части защищенного участка кода. Существует два типа защищенных участков:

try..except, try..finally

Первый тип используется для обработки исключительных ситуаций. Егосинтаксис:
try

Statement 1;

Statement 2;

...

except

on Exception1 do Statement;

on Exception2 do Statement;

...

else

Statements; {default exception-handler}

end;

Для уверенности в том, что ресурсы, занятые вашим приложением, освободятся в любом случае, Вы можете использовать конструкцию второго типа. Код, расположенный в части finally, выполняется в любом случае, даже если возникает исключительная ситуация. Соответствующийсинтаксис:

try

Statement1;

Statement2;

...

finally

Statements; { These statements always execute }

end;

Задания: ВычислитьзначениеY, используяоператоры «try-except-end» или «try-finally-end». Проверка на неверный ввод данных, подкоренное выражение не отрицательное и при делении на «ноль».

Вариант №1 Вариант №2