Разработка клиент-серверных приложений с использованием технологий Oracle. Семенова И.И. - 91 стр.

UptoLike

ВУЗ: 

СибАДИ | Омск

Составители: 

Рубрика: 

90
Caption на Фильтр по текущему названию книги.
В методе
Click кнопки написать код:
dm.ADOBooks.Filter:= 'Title_book = '+ QuotedStr( form-
books.DBGrid1.Columns.Items[1].Field.Text);
dm.ADOBooks.Filtered:= true;
У 3-го компонента Button изменить свойства и метод:
Name на B_Author;
Caption на Фильтр по текущему автору.
В методе
Click кнопки написать код:
dm.ADOBooks.Filter:= 'Code_Author = '+ form-
books.DBGrid1.Columns.Items[0].Field.Text;
dm.ADOBooks.Filtered:= true;
У 4-го компонента Button изменить свойства и метод:
Name на B_Pages;
Caption на Фильтр по количеству страниц в книге.
В методе
Click кнопки написать код:
dm.ADOBooks.Filter:= 'Pages = '+ form-
books.DBGrid1.Columns.Items[3].Field.Text;
dm.ADOBooks.Filtered:= true;
У 5-го компонента Button изменить свойства и метод:
Name на B_Cancel;
Caption на Снять фильтр.
В методе
Click кнопки написать код:
dm.ADOBooks.Filter:= '';
dm.ADOBooks.Filtered:= false;
24. Аналогично для остальных форм добавить элементы типа Button,
которые будут запускать фильтры по соответствующим значениям полей
текущей записи в объекте Grid. Пример интерфейса формы представлен на
рис. 7.1.
25.
Проверить работу приложения.
26.
Создать форму, назвать (изменить свойство Name) FormProcedure.
В главной форме в коде добавить описание этой формы, для этого после
ключевого слова USES в конце списка через запятую дописать название
программного модуля, которое соответствует созданной форме. В создан-
ной форме в коде добавить описание модуля DM, для этого после ключе-
вого слова USES в конце списка поставить
запятую и дописать название
программного модуля, например UNIT2, который соответствует созданной
форме DM.
27.
Добавить на главной форме в меню пункт с названием Работа с
процедурами
. В методе Click пункта меню написать код для запуска фор-
мы
FormProcedure (см. пример кода в пункте 17 текущей лабораторной
работы).

Страницы