При добавлении свойств в структуру формы существует возможность добавления опций свойствам формы. Например так:
MODULE Main;
CLASS LockedField;
text = DATA STRING[10] (LockedField);
isLock = DATA BOOLEAN (LockedField);
// здесь я добавляю свойство 'text' сразу с
// опцией 'READONLYIF'
FORM lockedField
OBJECTS lf = LockedField
PROPERTIES (lf) text READONLYIF isLock(lf), isLock, NEW, DELETE
;
NAVIGATOR {
NEW lockedField FIRST;
}
Можно ли подобным образом добавить опцию уже добавленному свойству? Например:
MODULE Main;
CLASS LockedField;
text = DATA STRING[10] (LockedField);
// Здесь в структуру формы я добавляю свойство
// 'text' без опций
FORM lockedField
OBJECTS lf = LockedField
PROPERTIES (lf) text, NEW, DELETE
;
isLock = DATA BOOLEAN (LockedField);
// а здесь свойству 'text' нужно добавить
// опцию 'READONLYIF'
EXTEND FORM lockedField
PROPERTIES (lf) isLock
;
NAVIGATOR {
NEW lockedField FIRST;
}