Page 14 - 2581
P. 14

-  Курс (kurs)         - тип N
                                  2.  Встановіть необхідну мову (російський).
                                  3.  Встановіть індекси по наступних полях:
                                  -  прізвище
                                  -  група
                                  4.  Збережіть таблицю.

                                  Створення додатку «База цих студентів»
                                  1.  Запустіть Delphi, настройте вікно форми (назва і так далі).
                                  2.  Розмістіть на формі такі компоненти: 2 Table, 2 DataSource,
                            2
                                  DBGrid, DBNavigator.
                                  3.  Встановіть  зв'язки,  таблиці  мають  бути  пов'язані  (див.
                            лабораторну роботу №2).
                                  4.  Запустіть додаток і внесіть 3 групи і по чотирьох студентів
                            для кожної  групи.

                                  Оформлення
                                  1.  Внесіть на форму 3 компоненти типу DBEdit.
                                  2.  Встановіть  відповідність  між  ними  і  полями  таблиці
                            Студенти:
                                  -  DBEdit1.DataSource  - DataSource2;
                                  -  DBEdit1.DataField   - Fio1.
                                  3.  Забороніть  зміну  даних  через  сітку  (DBGrid2),  для  цього
                            приберіть прапорець Options.dgEditing, і встановіть поле ReadOnly.

                                  Запити
                                  1.  Помістіть  на  форму  компонент  Query  (запит).  Кнопку  з
                            назва «1 курс», DataSource, DBGrid.
                                  2.  Для  DataSource3  встановіть  поле  DataSet  -  Query1.
                            DBGrid3.DataSource    -   DataSource3.   Query1.DataBaseName    -
                            DBDemos.
                                  3.  Для кнопки «1 курс» в процедуру натиснення внесіть:
                                  Query1.Close;
                                  Query1.SQL.Clear;
                                  Query1.SQL.Add('select * from "Student.dbf" where kurs = 1');
                                                           13
   9   10   11   12   13   14   15   16   17   18   19