мо в форму №1 (елемент меню View | Forms ), вибравши з діалогового вікна < i align="justify"> Form1 натиснемо на кнопку Ok . Розташуємо у формі компонент MainMenu з сторінки Standard палітри компонентів. Потім викличемо засоби розробки меню (це можна зробити двома способами):
· Подвійне натискання на компонент MainMenu всередині форми №1
· Переходимо у вікно Object Inspector при виділеному компоненті на формі. Клацнемо на властивості Items і натиснемо кнопку.
Перебуваючи в Конструкторі меню Form1.MainMenu1 (це ім'я, присвоєне Delphi за замовчуванням створеному нами перед цим компоненту TMainMenu), дамо назви пунктам меню (властивості Caption в Object Inspector ) Файл/Введення/Перегляд/Звіт/Вихід. Для переходу на наступний рівень натискаємо на lt; Enter gt ;. Для візуального розділення пунктів меню на окремі групи після Звіт використовуємо декілька символів мінус (-), призначати ім'я разделителю необов'язково. Для пункту меню Введення створимо підміню Назва матеріалу/Надходження матеріалу. Для цього виділимо його і клацнемо правою кнопкою миші, у вікні виберемо пункт Create Submenu .
Тепер, коли меню створено, можна пов'язати з кожним пунктом меню код, який буде виконуватися при виборі даного пункту користувачем. Для створення процедури обробки цієї події - OnClick , перебуваючи в Конструкторі меню, двічі клацнемо мишею на пункті меню. У вікні Редактора коду процедурі обробки події OnClick напишемо код, який буде виконуватися при виборі цього пункту меню. Такого ж результату можна досягти за допомогою подвійного клацання мишею на імені процедури обробки, яке знаходиться на сторінці Events вікна Object Inspector .
Наприклад, в пункт Перегляд введемо наступний код:
Form1.Visible:=False; .Visible:=True;
елемент меню Надходження матеріалу:
Form1.Visible:=False;
Form2.Visible:=True;
елемент меню Вихід: Сlose;
Виберемо елемент меню File | Save Project As і збережемо проект. Спочатку запитується ім'я форми проекту (у нас п'ять форм, з іменами Form1 ... Form4, DataModule5 ). Збережемо форми під іменами Unit * .pas raquo ;. Потім запитується ім'я проекту. Збережемо проект під ім'ям appl.dpr raquo ;.
Додамо імена модулів Unit2 і Unit3 в текст модулів unit форми №1.
Після цього виконаємо додаток. (Щоб виконати додаток не виходячи з середовища Delphi, достатньо натиснути кнопку F9. Щоб створити додаток і запустити його поза середовищем Delphi, слід натиснути комбінацію кнопок Ctrl + F9 і потім запустити створений файл з розширенням .ехе і ім'ям, що збігається з ім'ям проекту. У нашому випадку слід запускати файл appl.exe .
Зупинити працює додаток можна командою Run | Program Reset.
Створення екранної форми для подання змісту БД
1. Представлення змісту однієї таблиці БД на екранній формі.
Спочатку побудуємо просту екранну форму, яка має доступ тільки до однієї таблиці БД.
Перейдемо в форму №3 шляхом вибору елемента (або команди) меню View | Forms , натиснемо на кнопку Ok вибравши з діалогового вікна Form3. Розташуємо у формі компонент TDBGrid, взявши його з палітри компонентів (сторінка Data Controls). Встановимо властивість DataSource компонента TDBGrid в значення DataSource1 ( це ім'я створеного нами вище компонента TDataSource, присвоєне Delphi за замовчуванням) попередньо додавши ім'я модуля Unit5, в якому описаний TDataModule, в текст модулів unit форми №3. Компонент TDBGrid служить для відображення записів набору даних в табличній формі.
Додамо в форму компонент кнопки TButton (сторінка Standard палітри компонентів), дамо ім'я цьому компоненту (властивість Name ), використовуючи інспектор об'єктів, CancelButton . Змінимо заголовок кнопки (властивість Caption ) на Скасування.
Вид розроблюваної форми представлений на...
