Це стара версія документу!


ISpr Клас

Реалізує інтерфейс списку довідника.

Нагадування При конфігурувані документу в відповдних подіях, умова The.TypeForm=1 вказує, що код відноситься для роботи з списком, The.TypeForm=2-елементом довідника, The.TypeForm=3-групою.

Член Тип Параметри Опис
Init(Spr,[cPar],[oCrs]) L tSpr-довідник; cPar-параметри; oCrs-курсор Конструктор.
loSpr = CreateObject('iSpr','_KSPROF','ID="'+lcID+'"')
loSpr.Show()
If VarType(loSpr)='O'
   MessageBox(loSpr.MD.Choice)
EndIf
OnExit() Дивись опис Викликае та повертае значення функції заданої в конфіураторі в події OnExit. Якщо в конфігураторі ця подія не перекривалась - метод повертае True
OnDel() Дивись опис Викликае та повертае значення функції заданої в конфіураторі в події OnDel. Якщо в конфігураторі ця подія не перекривалась - метод повертае True. Тобто для заборони видалення досить повернути False
OnLoad() Дивись опис Викликае та повертае значення функції заданої в конфіураторі в події OnLoad, яка відбуваеться перед відображенням форми редагування. Якщо в конфігураторі ця подія не перекривалась - метод повертае True. Для заборони редагування досить повернути False. Зручно використовувати для настройки можливостей редагування, якщо стандартні можливості не влаштовуть.
Do Case
   Case The.TypeForm= 2		
      The.Descr.is_Button = .T.
      The.Descr.ModeChoice = .T.
      The.Descr.CommandClick = [BProc.Spr._Posada.SelectKP()]
EndCase
isSelectMode L Ознчає що довідник буде працювати в режимі вибору, і якщо вибір відбувся, то результат буде збережено в ISpr.MD.Choice.
loSpr = CreateObject('iSpr','_KSPROF')
loSpr.isSelectMode = .T.
loSpr.Show()
If VarType(loSpr)='O'
   MessageBox(loSpr.MD.Choice)
EndIf
MD TSpr Посилання на об'ект метаданих якій відображуе інтерфейс

Налаштування сторінки