SprEdit() Функція

Викликає форму редагування елементу довідника

SprEdit(tSpr, [cPID], [lFolder], [cFormDlg], [cGuiField], [lReadOnly])

Повертане значення Character

Параметри

tSpr ID існуючого елементу довідника (Наприклад : “BAA0001”), або об'єкт класу TSpr
cPID Увага : непусте значення цього параметру, означає створення нового елементу. Вказується ID батьківського вузла (або “0” -якщо елемент верхнього рівня).
lFolder В випадку заведення нового елементу (не пустий cPID) : .T. - заводимо папку, .F. - заводимо звичайний елемент.
cFormDlg GUI форми , яка буде використана для відображення форми за допомогою об'єкту класу iSprDlg (якщо не влаштовує налаштування конфігуратора)
cGuiField GUI елемента форми, на якому потрібно сфокусуватися після відображення діалогу за допомогою об'єкту класу iSprDlg (необов'язковий параметр)
lReadOnly Встановлює режим тільки читання для діалогу

Примітки Якщо функція повертає ID -це означає, що редагування закінчилось з виходом по кнопці <Прийняти> . Во всіх інших випадках повертається пусте значення.

Приклад 1

If Empty(SprEdit(lcExistID))
   MessageBox('Елемент не був  відредагований', 16, 'Повідомлення')
else
   MessageBox('Елемент успішно відредаговано', 16, 'Повідомлення')   
EndIf

Приклад 2

loSpr = CreateObject('tSpr','_OZ')
loSpr.NewPlus(lcExistID)
If Empty(SprEdit(loSpr))
   MessageBox('Новий елемент не було збережено', 16, 'Повідомлення')
else
   MessageBox('Новий елемент створено за шаблоном та збережено успішно', 16, 'Повідомлення')   
EndIf

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