0
PRESTIGE
22.06.15
✎
09:14
|
Добрый день.
упр приложение. при открытии формы делаю маску для номера телефона.
&НаКлиенте
Процедура ПриОткрытии(Отказ)
Элементы.НомерТелефона.Маска=("+7 (999) 999-99-99");
КонецПроцедуры
А дальше, мне нужно разукрасить поле, что если там ввели меньше 11 чисел, то красить допустим черным цветом, если больше то красным, если как надо то не красить. Но я не могу посчитать там количество символов, потому что оно заложенно в маске. Делаю так
Процедура НомерТелефонаИзменениеТекстаРедактирования(Элемент, Текст, СтандартнаяОбработка)
если СтрДлина(Элемент.ТекстРедактирования)<11 тогда
цвет = новый Цвет(93, 69, 255);
//СтрЗаменить(СтрДлина(Элемент.ТекстРедактирования),Символы.НПП,"")
Элемент.ЦветФона =цвет;
КонецЕсли;
если СтрДлина(Элемент.ТекстРедактирования)>11 тогда
цвет = новый Цвет(255, 0, 0);
Элемент.ЦветФона =цвет;
КонецЕсли;
если СтрДлина(Элемент.ТекстРедактирования)=11 тогда
цвет = новый Цвет(255, 255, 255);
Элемент.ЦветФона =цвет;
КонецЕсли;
КонецПроцедурызовать
Подскажите как можно это реали
|
|