Задание №2. 2. Откройте новое приложение и введите в него модуль данных

1. Data

2. Откройте новое приложение и введите в него модуль данных.

3. Добавьте в модуль данных таблицы Books и Authors.

4. Присвойте таблицам и соответсвующие имена, например AuthorTable, BookLookupTable, AuthorSource, BookLookupSource

5. Откройте Fields Editor для обеих таблиц создайте объект для каждого из полей.

6. Введите в модуль данных второй экземпляр таблицы Book. Присвойте таблице и источнику данных соответствующие имена BookDetailTable, BookDetailSource.

7. Свяжите таблицы BookDetailTable и AuthorTable.

8. Создайте в таблице AuthorTable вычисляемое поле под названием FirstLast.

9. После создания вычисляемого поля присвойте следующий метод событию OnCalcFields:

void __fastcall TMod::AuthorTableCalcFields(TDataSet *DataSet)

{

AuthorTableFiestLast->AsString=AuthorTableFiest->AsString+” “+AuthorTableLast->AsString;

}

10. Создайте поле просмотра. Откройте окно Fields Editor. Создайте новое поле под названием AuthorLookup. Задайте в качестве значения его свойства Type тип String, в качестве значения свойства Field Type –тип Loolup. Свойство KeyField должно иметь свойство AuthNo, свойство DataSet –значение AuthorTable, свойство Lookup Key значение-значение AuthNo, свойство Result Field –значение FirstLast.

11. Поместите в основную форму два компонента TDBGrid. Свяжите их с таблицами модуля данных.

Задание №2. 2. Откройте новое приложение и введите в него модуль данных - student2.ru