![]() Главная страница Случайная страница КАТЕГОРИИ: АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника |
Практическая Работа № 7
· Создайте новое приложение. Сохраните файл pas с именем Uchange.pas, проект с именем Pchange.dpr. · Разместите на форме невизуальные компоненты доступа к данным по технологии InterBase Express: TIBDataBase, TIBTransaction, 2 компонента TIBQuery Выполните соединение со своей базой данных InterBase. · Разместите на форме: · компонент TMemo; · компонент TEdit; · кнопку Button1 – свойство Caption измените на «Выполнить запрос»; · кнопку Button2 – свойство Caption измените на «Очистить поле ввода»; · копку Button3 - свойство Caption измените на «Открыть набор данных»; · Источник данных. Свяжите его с Query2 через свойство DataSet. · Для компонентов TIBQuery, в свойстве DataBase укажите имя соответствующего компонента; · сетку DBGrid. Свяжите его с DataSource1 через свойство DataSource. · В свойстве SQL компонента Query2 напишите запрос, который выводит все записи из таблицы Books. Откройте набор данных. В сетке DbGrid1 должны отобразиться данные. Просмотрите их. · Для кнопки «Выполнить запрос» напишите обработчик события OnClick: Query1.SQL.Clear; Query1.SQL.AddStrings(memo1.Lines); Query1.ExecSQL · Для кнопки «Открыть набор данных» напишите обработчик события OnClick: Query2.Close; Query2.SQL.Clear; Query2.SQL.add(Edit1.text); Query2.Open · Для кнопки «Очистить поля ввода» напишите обработчик события OnClick: Memo1.Lines.Clear; Edit1.Clear; · Запустите приложение; · В поле ввода многострочного текста напишите запрос на изменение данных таблицы BOOKS, который уменьшает цены оптовой и розничной продажи тех книг, остаток на складе которых меньше пяти. · Выполните команду SQL, нажав на кнопку «Выполнить запрос». · Во второе поле ввода введите запрос на выборку всех записей из таблицы Books. · Просмотрите результат выполнения первого запроса. · Аналогичным образом выполните следующие задачи: 44. Добавьте в таблицу TypeNakl новую запись: в поле TypeID – значение 8, в поле Tname – значение «Брак». 45. Увеличьте на 5% цену покупки книг издательства «Питер». 46. Измените название типа накладной 8 таблицы TypeNakl на «Списание в брак». 47. Добавьте для любой фирмы адрес электронной почты. 48. Удалите из таблицы TypeNakl запись с номером типа 8. 49. Создайте в IB_Console копию таблицы Nakls, дайте ей имя Nakls_CopyXX (XX - № группы) 50. Скопируйте в таблицу Nakls_CopyXX записи из таблицы Nakls, относящиеся к 21 марта 2000 г. Просмотрите результат. 51. Удалите все записи из таблицы Nakls_Copy. Убедитесь в том, что запрос на удаление выполнен. 52. Скопируйте в таблицу Nakls_CopyXX все записи из таблицы Nakls. Убедитесь в правильности написания запроса на добавление записи. 53. Закройте программу, предварительно сохранив все 54. Подготовьте отчет о выполнении практической работы. Отчет должен содержать: q ФИО студента, № группы q Название ПР q цели q Перечень используемых компонентов и их свойств и методов для организации доступа к данным и выполнения запросов. q Команды выполненных запросов. q Анализ ошибок Наименование дисциплины: Разработка и эксплуатация удаленных баз данных Тема (раздел) учебной программы: Проектирование клиентской части приложения БД.
|