Задание №5. 1. Откройте новое приложение

1. Откройте новое приложение. Поместите на форму компоненты TTable, TDataSource, TDBGrid. Свяжите компонент TTable c таблицей Country_r или Country. Свяжите компоненты. Для компонента TTable определите свойство Name tblCountry (чтобы можно было использовать приведенный ниже код) и в свойстве Active оставьте значение False

2. Поместите на форме в верней части панель -компонент TPanel, задайте ее свойству Align значение alTop, а для объекта TDBGrid установите в свойстве Align значение alClient.

3. Для события формы OnCreate поместите код открытия таблицы:

void __fastcall TForm1::FormCreate(TObject *Sender)

{

tblCountry->Open();

}

4. Поместите на панель объект TCheckBox и задайте значение Filter в свойстве Captiоn, в свойстве Name установите значение FFilter. Свяжите следующий метод с событием OnClick для флажка:Для этого перейтите на вкладку Events инспектора объектов и щелкните событие OnClick

void __fastcall TForm1::FFilterClick(TObject *Sender)

{

tblCountry->Filtered=FFilter->Checked;

}

5. Перейдите на вкладку Events (События) объекта TTable и свяжите следующую программу с событием OnFilterRecord:

void __fastcall TForm1::tblCountryFilterRecord(TDataSet *DataSet,

bool &Accept)

{

Accept=tblCountry->FieldByName("Continent")->AsString==DBEdit1->Text;

}

6. Чтобы поле TDBEdit содержало значение текущей записи, нужно установить в свойстве DataSource DataSource1, в свойстве DataField выберите из списка в конце строки значение Continent.

7. Поместите на панель кнопку TButton. Установите в свойстве Name значение FFindNext, а в свойстве Caption значение Find Next. Для события OnClick поместите код :

void __fastcall TForm1::FFindNextClick(TObject *Sender)

{

tblCountry->FindNext();

}

8. Запустите программу на выполнение. Проверьте действие фильтра.

Задание №5. 1. Откройте новое приложение - student2.ru

Контрольные вопросы

1. Для чего создается псевдоним БД и в каких утилитах можно создать псевдоним БД?

2. Какие типы полей используются в Paradox? Как установить вторичный индекс?

3. С помощью каких компонент отобразить на форме данные из таблицы БД и какие свойства при этом используются?

4. С помощью каких функций производится поиск нужных записей?

5. Как установить фильтр?

Наши рекомендации