6.2. Виконання індивідуального завдання

За вказівкою викладача виберіть своє індивідуальне завдання. Створіть застосування і протестуйте його роботу.

Індивідуальні завдання

1. Поля шахівниці характеризуються записом

Type

Pole=record

Ver: 1..8; {вертикальні координати}

Hor: (а,b,c,d,e,f,g,h); {горизонтальні координати}

end;

Вивести шахівницю, помітивши хрестиками всі поля, які «б'є» ферзь, що стоїть на полі з координатами Veri і Hori, і нулями решта всіх полів.

2. Поля шахівниці характеризуються записом (див. завдання 1)

Var Figura:Pole;

Вивести повідомлення чи може кінь за один хід перейти з поля Figurai на полі Figuraj.

3. Type

Karta=record

m: (piki,trefi,bubni,chervi); {масть}

d:(shest,sem,vosem,devjat,desjat,valet,dama,korol,tuz); {значення}

end;

Var k1,k2:Karta;

Вивести повідомлення чи «б'є» карта k1, карту k2, з урахуванням того, що масть mi є козирем.

4. У магазині формується список осіб, що записалися на покупку товару підвищеного попиту. Кожен запис цього списку містить: порядковий номер, Ф.І.О., домашню адресу покупця і дату постановки на облік. Видалити із списку всі повторні записи, перевіряючи Ф.І.О. і домашня адреса.

Лабораторна робота №7 Програмування алгоритмів з використанням файлів

Мета лабораторної роботи: освоїти застосування компонентів OpenDialog і SaveDialog і створити застосування, в якому використовуються файли.

7.1. Приклад створення застосування

Завдання: створити Windows-додаток для запису у файл і читання з файлу відомості про успішність учнів в кількості 10 чоловік. Кожен запис файлу повинен містити прізвище, ініціали, а також оцінки по фізиці, математиці і твору. Вивести список учнів, відсортований в алфавітному порядку і записати цю інформацію в текстовій файл.

Один з можливих варіантів панелі інтерфейсу створюваного застосування показаний на рис.7.1.

7.1.1. Розміщення компонентів на Формі

При роботі з файлами читання і запис інформації зручно організовувати за допомогою компонентів OpenDialog і SaveDialog.

Компоненти OpenDialog та SaveDialog знаходяться на сторінці Dialogs. Всі компоненти цієї сторінки є невізуальними, тобто не видимі в момент виконання додатка. Тому їх можна розмістити в будь-якому зручному місці Форми. Обидва компоненти, які розглядаються, мають ідентичні властивості та відрізняються тільки зовнішнім виглядом.

BitBtn

Рис. 7.1

Для установки компонентів OpenDialog і SaveDialog на Форму необхідно на сторінці Dialogs Палітри Компонентів клацнути “мишею” відповідно до піктограми або і розмістити її в будь-якому вільному місці Форми. При виконанні застосування у момент виклику компонента з'являється діалогове вікно, за допомогою якого користувач вибирає ім'я файлу і маршрут до нього. У разі успішного завершення діалога ім'я вибраного файлу і маршрут пошуку міститься у властивості FileName.

Користувач має можливість набудувати параметри вікна діалога на свій розсуд. Зокрема, змінити заголовок вікна можна за допомогою властивості Title. У властивості DefaultExt можна вказати розширення файлу, якщо воно не задане користувачем. Властивість Filter використовується для пошуку (фільтрації) файлів, що відображаються у вікні. Установка фільтру проводиться таким чином. Виділивши відповідний компонент, необхідно двічі клацнути по правій (білою) частині властивості Filter Інспектора Об'єктів. У вікні редактора фильтра-Filter Editor, що з'явилося, необхідно в колонці Filter Name набрати текст, що характеризує відповідний фільтр, а в колонці Filter–маску. Для компонента OpenDialog1 встановимо значення масок як показано на рис. 7.2.

Ріс.7.2

Маска *.dat означає що, будуть видні файли даних з будь-яким ім'ям і з розширенням dat, а маска *.* - що будуть видні всі файли (з будь-яким ім'ям і з будь-яким розширенням).

Для того, щоб файл автоматично записувався з розширенням dat у властивості DefaultExt запишемо необхідне розширення - dat.

Аналогічним чином набудуємо компонент SaveDialog1 для текстового файлу (розширення txt).