Форма элемента в Управляемом Приложении

[Dethmontt]

Включайте голову......

Код Выделить Развернуть

&НаКлиенте
Процедура Команда1(Команда)

     Если Не ОбработатьНажатеКнопокСервиса(ТекущийЭлемент.Заголовок) Тогда
         Объект.Телефон = Объект.Телефон +ТекущийЭлемент.Заголовок;
    КонецЕсли;


КонецПроцедуры

&НаКлиенте
Функция ОбработатьНажатеКнопокСервиса(ИмяКнопки)

ЭтоСервиснаяКнопка = Ложь;
Если Врег(ИмяКнопки) = "DEL" Тогда
    Объект.Телефон = Сред(Объект.Телефон,1,СтрДлинна(Объект.Телефон)-1);
    ЭтоСервиснаяКнопка = Истина;
ИначеЕсли Врег(ИмяКнопки) = "CLR" Тогда
     Объект.Телефон = "";
    ЭтоСервиснаяКнопка = Истина;
ИначеЕсли Врег(ИмяКнопки) = "OFF" Тогда
    ЭтаФорма.Закрыть();
КонецЕсли;

Возврат ЭтоСервиснаяКнопка;

Конецфункции


[Dethmontt]

Всем кнопкам назначается Команда1

[Pavel779]

Помогите со следующим вопросом.
В форме обработки есть реквизит Тип "Таблица значений" и колонки в это таблице "Реквизит1"
На в эту колонку выводить значение. У меня не получается. Помогите найти решение!!!

[sadovod]

Создаешь одну команду - КОМАНДА1

//В палитре свойств кнопки В ПОЛЕ ИМЯ КОМАНДЫ выбираешь команду (одну для всех кнопок)

Код Выделить Развернуть

&НаКлиенте
Процедура Команда1(Команда)
     Объект.Телефон = Объект.Телефон +ТекущийЭлемент.Заголовок;
КонецПроцедуры

//Радуешься...

Супер идея. Спасибо 

[Pavel779]

Создаешь одну команду - КОМАНДА1

//В палитре свойств кнопки В ПОЛЕ ИМЯ КОМАНДЫ выбираешь команду (одну для всех кнопок)

Код Выделить Развернуть

&НаКлиенте
Процедура Команда1(Команда)
     Объект.Телефон = Объект.Телефон +ТекущийЭлемент.Заголовок;
КонецПроцедуры

//Радуешься...

Супер идея. Спасибо 

А у меня вот это решение не работает

Добавлено: 27 сен 2012, 15:59

А нет работает.

[Dethmontt]

Вот обработка...

[Pavel779]

Вот обработка которая у меня получилась. Помогите со следующим.
В форме обработки есть реквизит формы "Таблица значений" мне надо в эту таблицу помещать значений реквизита справочника.
То есть при наборе номера должен происходить поиск контрагента у этого контрагента есть справочник "Телефон" и в нем записан номер телефона.
Подскажите как это реализовать?

Добавлено: 28 сен 2012, 12:22

Вот моя обработка

[Dethmontt]

Сделать в таблице реквизит с типом СправочникСсылка.ВашСправочникТелефонов и при наборе использовать поиск по какому то полю этого справочника (например запросом или если есть возможность то полнотекстовым поиском) и заполнять найденную Ссылку на справочник в вашу таблицу... Как то так...

[Pavel779]

А как еще сделать, что поиск номера происходил при наборе одной цифры.
Пример:
Ввожу 8 идет поиск всех номеров начинающихся с 8, дале ввожу 9 и в поле выводятся уже номера начинающиеся с 89
и т.д.

[Dethmontt]

Ну можно запросом типа:
"Спр.Ссылка КАК Ссылка Из Справочник.Телефоны КАК Спр ГДЕ ПОДСТРОКА(Спр.Наименование, 1, "+СтрДлина(Объект.Телефон)+") = &Номер"
Запрос.УстановитьПараметры("Номер",Объект.Телефон);
ТабличнаяЧасть.Загрузить(Запрос.Выполнить.Выгрузить()); //Имя реквизита табличной части должно быть "Ссылка" - тип СправочникСсылка.Телефоны