Базы данных и знаний. Проектирование баз данных по технологии "клиент-сервер" и разработка клиентских приложений. Токмаков Г.П. - 96 стр.

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

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

Рубрика: 

-96-
constructor Groups.Create;
begin
inherited;
kod_groupp := 0;
name__group := ' ';
kol_students := 0;
sredniy_ball := 0;
changed := false;
end;
end.
Класс TGroups содержит четыре элемента - kod__group, name_group,
kol__students и sredniy_ball, имена которых совпадают с именами полей
таблицы БД. Кроме этого, у класса имеется свойство - признак changed, кото-
рый используется для того, чтобы определить, изменились ли значения осталь-
ных членов класса. Понятно, что TGroups является наследником базового клас-
са TObject.
3.4.3.3. СОЗДАНИЕ ФОРМ Ы ЭЛЕМ ЕНТА
Теперь создадим форму элемента.
1. Добавьте к проекту dlglib0l новую форму элемента, воспользовавшись
помещенной в репозитарий формой «Базовая форма элемента». Для этого
необходимо выбрать в меню «File/New», а затем в диалоговом окне «New
Item» указать на странице «Forms» значок «Базовая форма элемента» И ОК.
В нижней части диалогового окна «New item» имеется переключатель, позво-
ляющий выбрать способ, которым форма из репозитария будет вставлена в
проект. Он имеет несколько положений:
• Сору - в проекте создается точная копия выбранной формы или модуля
данных из репозитария.
• inherit - наследование - это наиболее гибкий способ использования
форм. Он особенно эффективен, когда на основе одной формы из репозитария в
приложении создается несколько однотипных форм. При наследовании в про-
ект включается базовая форма из репозитария, кроме того, создается новая
форма, класс которой является наследником
класса из репозитария.
• Use - используемая форма добавляется в
проект, и изменения в ней затронут все другие
приложения, которые тоже используют эту
форму. В первую очередь этот режим предна-
значен для модулей данных.
Так как каждая DLL содержит у нас только
одну форму, мы используем копирование.
Нажмите ОК. Сохраните новый модуль unitl
в каталоге dlglib0l под именем ueGroups. Рис. 66. Форма
fBaseElemForml

Страницы