Заказать курсовые, контрольные, рефераты...
Образовательные работы на заказ. Недорого!

Разработка формы «Журнал кредитных договоров»

РефератПомощь в написанииУзнать стоимостьмоей работы

Создаем новую форму New Form, в его свойствах укажем следующее: св-во Caption «Журнал кредитных договоров», NamefJurnalKDogovor. Выделяем компоненту CheckBox1 и в его свойстве Caption укажите «По клиенту, а CheckBox2 — По объекту. Эта процедура производит отмену фильтрации и очистку данных введенных в компоненты Edit. Для удаления не нужных полей необходимо выделить поле и выбрать команду Delete… Читать ещё >

Разработка формы «Журнал кредитных договоров» (реферат, курсовая, диплом, контрольная)

Создаем новую форму New Form, в его свойствах укажем следующее: св-во Caption «Журнал кредитных договоров», NamefJurnalKDogovor.

На форму установить следующие компоненты:

Страница «ADO».

№ п/п.

Компонента.

Количество.

1.

ADOTable.

Страница «Data Access».

№ п/п.

Компонента.

Количество.

1.

DataSource.

Страница «DataControls».

№ п/п.

Компонента.

Количество.

1.

DBGrid.

2.

DBNavigator.

Страница «Standard».

№ п/п.

Компонента.

Количество.

1.

CheckBox.

2.

Button.

Устанавливаем связь между компонентами.

ADOTable1 — свойство Connection установим ADOConnection1, свойство TableName укажем имя таблицы — Credit, свойство NameADOTable1, свойство ActiveTrue.

DataSource1-свойство DataSet установим ADOTable1, свойство Name переименуем на DSCredit.

DBGrid1- св-во DataSourse установим DSCredit.

DBNavigatorсв-во DataSourse установим DSCredit.

Для отражения в компоненте DBGrid имена полей таблицы для этого необходимо двойным нажатием правой кнопки мыши на компоненте открыть окно.

Рис. 4.16 Окно редактора полей

В ней выбрать команду Add all fields для отражения всех полей таблицы.

Для удаления не нужных полей необходимо выделить поле и выбрать команду Delete Selected (Del).

Чтобы переименовать имена полей таблицы необходимо выделить имя поля и в Object Inspertor найти св-во Title и в его подсвойстве указать № Договора.

Рис. 4.17 Окно «Инспектора объектов»

Следующие имена полей переименутся таким образом:

CRED_DOC_SOGLASH-Дата, FIOВалюта и т. д.

Выделяем компоненту CheckBox1 и в его свойстве Caption укажите «По клиенту, а CheckBox2 — По объекту.

Обработчик события OnClick для компонентов CheckBox и Button следующий:

void __fastcall TfJurnalKDogovor: CheckBox2Click (TObject *Sender).

{.

ADOTable1->Filtered=false;

ADOTable1->Filter="FIO="+QuotedStr (Edit1->Text);

ADOTable1->Filtered=true;

fJurnalKDogovor->Height=517;

}.

void __fastcall TfJurnalKDogovor: CheckBox3Click (TObject *Sender).

{.

ADOTable1->Filtered=false;

ADOTable1->Filter="ZALOG_NAME="+QuotedStr (DBEdit1->Text);

ADOTable1->Filtered=true;

fJurnalKDogovor->Height=517;

}.

void __fastcall TfJurnalKDogovor: Button1Click (TObject *Sender).

{.

DBEdit1->Clear ();

CheckBox2->Checked=false;

CheckBox3->Checked=false;

Edit1->Clear ();

ADOTable1->Filtered=false;

fJurnalKDogovor->Height=323;

}.

Эта процедура производит отмену фильтрации и очистку данных введенных в компоненты Edit.

Форма должна иметь следующий вид.

Рис. 4.18 Форма «Журнал кредитных договоров»

Показать весь текст
Заполнить форму текущей работой