конуються, если Умова Істинна};
Варіант 2:
then-elseУмова
{Інструкції, Які віконуються, если Умова Істинна}
{Інструкції, Які віконуються, если Умова Невірна};
У розроблюємій Програмі Використано інструкцію If Варіант 2, тобто if-then-else.
. 4 Робота програми
Програма, что розроблюється Забезпечує вивід як Усього списком, студентов, что проходять практику, так и его части. Например, у результате виконан SQL запиту виводу інформація лишь на конкретного студента.
Процедура актівізації форми.
Першів процедурою, что віконується при запуску програми є процедура актівації форми. Вона реалізується за помощью такого коду:
Tform1.FormActivate (Sender: TObject) ;. DataSet:=Table1; .Active:=True ;;
Результатом виконан цієї процедури є актівізація створеної форми Завдяк прісвоєнню компоненту Table1.Active значення True, что значити актівізацію файлу даних и Відкриття файлу табліці. Компонент DataSource (джерело даних) Забезпечує зв язок компонента відображення-редагування даних (например, компонента DBGrid) i джерела даних, в якості которого может віступаті таблиця (компонент Table) або результат виконан SQL запиту до табліці (компонент SQL). Компонент DataSource дозволяє оперативно вібіраті джерело даних, використовуват одна и тієї ж компонент, например, DBGrid для відображення даних з табліці або результату виконан SQL запиту до цієї табліці.
У даній процедурі компоненту DataSource прісвоюється значення Table, Що означає, что Джерелом відображення даних компонентом DBGrid є таблиця.
Процедура ОБРОБКИ події Клік на кнопці Всі записи
При натісканні на кнопку Всі записи, что Виглядає так
віконується процедура ОБРОБКИ цієї події. Ця процедура має такий вигляд:
TForm1.Button2Click (Sender: TObject) ;. DataSet:=Table1 ;;
Результатом виконан цієї процедури є вивід на екран Всього списку студентов, что містіться в табліці. Загальна форма после виконан цієї процедури має вигляд, уявлень на малюнку 2.
Для перегляду змісту стовпчіків и рядків цієї табліці Використовують полоси прокрутки.
Процедура ОБРОБКИ події Клік на кнопці запите
Малюнок 2 - Загальна формою додатка после виконан процедури Клік на кнопці Всі записи
Процедура ОБРОБКИ події Клік на кнопці запите, что має вигляд, алгоритм роботи якої уявлень у Додатках В, Виглядає так:
TForm1.Button1Click (Sender: TObject) ;: string [255];:=InputBox ( Вибір информации з бази данних , Вкажіть прізвище, ім я та по батькові студента raquo ;, ); styd lt; gt; thenform1.Query1 do begin; .Clear; .Add ( SELECT Spec, styd, ker, grup, mecto, term, dok, oc ) ;. Add ( FROM : Студенти-практиканти: Робоче мiсце керiвніка практики.dblaquo;raquo;);.Add(laquo;WHEREraquo;);.Add(laquo;(styd=raquo;raquo;+styd+laquo;")raquo;);.Add(laquo;Order by Styd ) ;;; Query1.RecordCount lt; gt; 0 then.DataSet:=Query1begin ( Даних на такого студента немає ) ;. DataSet:=Table1 ;;;;
При натісканні на Цю кнопку спочатку змінній styd, что представляет собою заголовок стовпчики табліці, у якому містяться прізвіща та імена студентов, прісвоюється значення InputBox, в результате чего на екран виводу вікно запиту на ОКРЕМЕ студента. Це вікно має вигляд, Який представлено на малюнку 4:
Малюнок 3 - Вікно запиту на ОКРЕМЕ студента
Далі у це вікно користувач винен ввести прізвище, ім я та по батькові будь-которого студента з табліці (бажано).
Процедура ОБРОБКИ події пріймає від користувача рядок (Щойно введень) и записом рядків у властівість SQL формує текст запиту. После цього ця процедура викликом методу Open актівізує виконан запиту.
Компонент Query (запит) схожий на компонент Table, альо, На Відміну Від последнего, ВІН представляет не всю базу даних (всі записи), а только ее часть - записи, что задовольняють крітерію запиту.
Для того, щоб во время розробки програми Задати, яка інформація буде віділена з бази даних у результате виконан запиту, властівість SQL винна містіті запит на вібірку даних, что подань на мові SQL.
У загально випадка запит на вібірку з табліці даних Виглядає так: Список полів табліціТабліця
(Крітерій) BY Список Полів табліці
де: - команда Вибори запісів з табліці и виводу складу полів, імена якіх вказані в с...