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

UptoLike

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

98
ListField на USERNAME;
KeyField на USERNAME.
У компонента DBLookupComboBox4 настроить свойства:
ListSource на DS_Table_privilege_map;
ListField на NAME;
KeyField на NAME.
5.
В методе Click созданной кнопки написать:
try
DBLookupComboBox2.Refresh;
DBLookupComboBox3.Refresh;
DBLookupComboBox4.Refresh;
dm.ADOStoredProc2.Parameters.ParamByName('object').Value:=
DBLookupComboBox2.Text;
dm.ADOStoredProc2.Parameters.ParamByName('name_user').Value:=
DBLookupComboBox3.Text;
dm.ADOStoredProc2.Parameters.ParamByName('privileg').Value:=
DBLookupComboBox4.Text;
DM.ADOStoredProc2.ExecProc;
ShowMessage('Пользователь добавлен');
except
ShowMessage('Невозможно добавление пользователя');
end; // try
6.
В пункте меню Администрирование перед оператором запуска
формы
FormAdmin добавить оператор, чтобы гарантировать для выпа-
дающих списков работоспособность источников данных:
dm.ADO_all_all_tables.Open;
dm.ADO_DBA_USERS.Open;
dm.ADO_Table_privilege_map.Open;
7.
Запустить приложение и проверить работу.
Задания к лабораторной работе 8
В вашей индивидуальной базе данных, которая была выдана по вари-
антам (из лабораторной работы 1), создать 4 хранимые процедуры, кото-
рые будут выполнять операции по добавлению пользователя, удалению
пользователя, добавлению разрешения на одну из таблиц, удалению раз-
решения на одну из таблиц. В клиентском приложении, которое было соз-
дано в лабораторной работе
7 по вашему варианту, добавить на основ-
ную форму в меню пункт
Администрирование, который будет запускать
форму
Администрирование. На форме организовать запуск четырех соз-
данных хранимых процедур с передачей данных в процедуры на сервере