пка В«ДаліВ» у властивості vision має значення false, при роботі з іншими панелями true.
Також описана процедура:
procedure BdataKeyPress (Key: Char): Char; - повертає цифру, передану як параметр, якщо вона входить в алфавіт, або ж є спеціальним знаком клавіші видалення # 8, інакше повертає порожній символ # 0. Дана процедура використовуються для запобігання некоректного введення в поле TEdit (наприклад, при введенні букв в поле вводу дати народження анкетируемого).
Після створення форми анкетування змінної povtorSave: boolean цієї форми присвоюється значення false, це означає, що відбувається нове заповнення анкети. p align="justify"> Після правильного заповнення полів, при перегляді останньої панелі, кнопка "Зберегти результатВ» стає активною.
Після її натискання починається перевірка заповнення, якщо ж полі не було заповнена дані не будуть збережені і програма повідомить користувача про етом.Далее відбувається збереження даних у базу SQL і змінної povtorSave привласнити значення true, це означає, що якщо ми не виберемо в меню пункт В«Нова анкетаВ», то при наступному збереженні даних ми будемо бачити діалогове вікно із запитом наших намірів. br/>В
Малюнок 2.1 - Головна форма програми.
В
Малюнок 2.2 - Головна форма програми.
програма база дані анкета
В
Малюнок 2.3 - Головна форма програми.
В
Малюнок 2.4 - Головна форма програми.
В
Рисунок 3 - Форма В«Про програмуВ».
4.3 Форма перегляду анкет Infoform
На малюнку 4 представлена ​​дана форма.
Для роботи з базою SQL на формі розташовуються елементи DataSource1: TDataSource, ADO: TADOQuery, DBGrid1: TDBGrid.
При створенні даної форми відбувається заповнення 1 стовпця InfoGrid: TstringGrid і підрахунок кількості анкет. Кількість анкет оображается в Label2. p align="justify"> Для здійснення переходу до певної анкеті, при натисканні кнопки Button1, відбувається переміщення по таблиці до потрібної анкети і дані виводяться в InfoGrid за допомогою процедури SelectInfo.
Якщо був введений ID неіснуючої анкети, з'явиться вікно попереджувала про це і вікно введення ID буде очищено.
При натисканні на кнопку В«ПопередняВ» відбувається перехід до попередньої анкеті, яка буде показана в InfoGrid.
При натисканні на кнопку В«НаступнаВ» відбувається перехід до наступної анкеті, яка буде показана в InfoGrid.
В
Рисунок 4 - Форма перегляду анкет.
Висновок
В ході курсової роботи було розроблено додаток, щ...
