Контролы ButtonEdit в MIS3
Материал из ИбисоПедии
Базовый класс TSFButtonEdit
Изменяет только внешний вид кнопок, добавляет горячие клавиши.
Контролы для стандартных элементов
- Право: fGetRigth.SetaAsIBISRightEdit(bbRight,'right_id', SetButtonSave );
- Страховой документ: fGetIDOC.SetaAsIBISIDocEdit(bbPayDoc, 'idoc_id', SetButtonSave,uqMDOC, 'people_id', False, uqHosp.FieldByName('pay_type_id'));
- Страховая компания
- медицинская компания
- Место работы: fGetCompanyWork.SetaAsIBISCompanyWorkEdit(bbWorkPlace,'company_id', SetButtonSave);
- Документ, удостоверяющий личность
- Отчета
- Пользователь
- Доктора
- Доктора для определенного отделения
Алгоритм создания
- Пишем запрос в котором будет key_field и val_field
- Размещаем на форме TcxDBButtonEdit, связываем с полем val_field
- На OnCreate вызываем процедуру вида SetaAsIBISRightEdit(bbRight,'right_id', SetButtonSave );
