На PORTA.ru
ОГРОМНЫЙ выбор портативной техники:
MD-плееры CD-плееры MP3-плееры Кассетные плееры Диктофоны Радио Цифр. камеры Сотовые Дешевые ноутбуки |
||
Есть 2-х уровневый справочник. Как сделать, чтобы на первом уровне вводились только группы? Если
ввод нового осуществляется в диалоге:
В модуль формы ЭЛЕМЕНТА, в ПриОткрытии: Если ПустоеЗначение(Родитель)=1 тогда сообщить("На этом уровне справочника можно вводить ТОЛЬКО группы"); СтатусВозврата(0); КонецЕсли; Если в списке: Код предложил NS: Процедура ПриЗаписи() // Если элемент уже редактировался, то его можно сохранить // Если просто нажали клавишу новый, то если можно вводить, // Тогда перейдет в режим редактирования // Иначе сохранится, перейдет в процедуру приЗакрытии(), и будет удален... Если МожноЗаписать=0 Тогда МожноЗаписать=1; Если ЭтоГруппа()=1 Тогда СтатусВозврата(0); ИначеЕсли Родитель.Выбран()=1 Тогда СтатусВозврата(0); Иначе НужноЗакрыть=0; КонецЕсли; КонецЕсли; КонецПроцедуры Процедура ПриВводеСтроки() НужноЗакрыть=1; МожноЗаписать=0; ПослЭл=ТекущийЭлемент(); Форма.Закрыть(0); // Пойдет сначала на ПриЗаписи(), // И если можно записать, тогда // Элемент Останется в Режиме редактирования (Без Записи!!!!) КонецПроцедуры Процедура ПриЗакрытии() Если НужноЗакрыть=0 Тогда // Если Новый элемент, который нельзя вводить...... // Можно еще добавить Сообщение или Предупреждение..... спр=СоздатьОбъект("Справочник."+вид()); спр.НайтиЭлемент(ТекущийЭлемент()); спр.Удалить(1); НужноЗакрыть=1; МожноЗаписать=1; АктивизироватьОбъект(ПослЭл); СтатусВозврата(0); КонецЕсли; КонецПроцедуры -
Наверх -
|
В качестве благодарности за решение проблемы, щелкните здесь. Поддержите развитие сайта. Спасибо! |
Автор и разработчик: Кайгородов Андрей aka mszsuz. mszsuz@online.sinor.ru ICQ#33993114. Дата последнего обновления страницы: Friday 09.04.2004 16:52 |