овної форми проекту програми iConstructor
Даний модуль містить клас форми TfrmMain, основні поля якого відображені в таблиці 11, а методи в таблиці 12.
Таблиця 11 - Основні поля класу форми TfrmMain
ПоляНазначеніеFCurQuestion: TQuestion; У цьому полі зберігаємо інформацію про поточний, редагованому питанні. FLastActive: Integer; Це поле визначає останній компонент TRichEdit, що бере участь у процесі редагування (1 - 4 - варіанти відповідей, 5 - поле введення тексту питання). Використовується для визначення, над яким компонентом необхідно проводити дії, у разі втрати ним фокусу введення. FPicHeight: Integer; Поле висоти додаткової картинка. Використовується для автоматичної перемальовування тексту питання в наступний раз. FTempStr: array [1.4] of String; Масив імен картинок, які були завантажені в процесі редагування поточного питання. FClosingApp: Boolean; Логічна змінна-поле, визначальна, закривається чи додаток (Істина - закривається). FDontCare: Boolean; Поле-прапор, яке визначає в обробниках ряду подій чи потрібно його обробляти. Використовується для установки в методі Draw всіх полів компонентів, що відносяться до поточного питання. FCurQueModified: Boolean; Поле-прапор, що визначає модифікацію поточного, редагованого питання. FTestNameGiven: Boolean; Поле, що, чи було вказано користувачем ім'я файлу для поточного, редагованого тесту. FAnswerTextMemLoaded: array [1.4] of Boolean; Масив змінних-прапорів, що визначають, чи були завантажені в пам'ять файли варіантів відповідей - текстів. FAnswerPicMemLoaded: array [1.4] of Boolean; Масив змінних-прапорів, що визначають, чи були завантажені в пам'ять файли варіантів відповідей - картинок. FExtPicMemLoaded: Boolean; Поле, що, чи була завантажена в пам'ять додаткова картинка. FMainTextMemLoaded: Boolean; Поле, що, чи був завантажений в пам'ять файл з питанням. p align="justify"> Таблиця 12 - Основні методи класу форми TfrmMain
МетодНазначеніеprocedure ClearMemLoadedState; Метод, що заповнює значенням брехні прапори завантаження даних питання в пам'ять. procedure ClearRichEdits; Метод, очищающий компоненти класу TRichEdit. procedure ClearColors; Метод, очищающий підсвітку вибраного варіанту відповіді. procedure ClearLastEmptyQue; Метод, що видаляє порожні питання в кінці. procedure GoToQuestion (Num: Integer); Метод, який реалізує перехід до конкретного питання з номером Num тесту. procedure GetAndDrawCurQuestion; Метод, промальовує поточне питання з налаштуванням всіх параметрів. procedure Draw (Question: TQuestion); Метод, який здійснює промальовування вмісту поточного під проса на формі. procedure SaveQuestion; Метод, який зберігає поточне питання. procedure New; Метод створення нового документа. procedure Save; Метод, який зберігає поточний документ. p align="justify"> Дана форма реалізує роботу конструктора. Вона відображає дані ...
