Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 11:24

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

Автор Pavel779, 25 сен 2012, 15:47

0 Пользователей и 1 гость просматривают эту тему.

Pavel779

С реквизитом тип "СТРОКА" получается.

А можно как то создать одну процедуру для всех команд и назначить её этим командам?

sadovod

ЦитироватьА можно как то создать одну процедуру для всех команд и назначить её этим командам?
нельзя. У каждой команды должен быть свой

sadovod


sadovod

Можно только сделать так:
&НаКлиенте
Процедура Команда1(Команда)
   НажатаКнопка(1);
КонецПроцедуры

// все остальные кнопки -    НажатаКнопка(2..9);

&НаКлиенте
Процедура НажатаКнопка(Цифра)
   Объект.Телефон = Объект.Телефон + Цифра;
КонецПроцедуры

Pavel779

Что то я не понял, что это означает

Можно только сделать так:
&НаКлиенте
Процедура Команда1(Команда)
   НажатаКнопка(1);
КонецПроцедуры

// все остальные кнопки -    НажатаКнопка(2..9);

&НаКлиенте
Процедура НажатаКнопка(Цифра)
   Объект.Телефон = Объект.Телефон + Цифра;
КонецПроцедуры

sadovod

ЦитироватьЧто то я не понял, что это означает
Для каждой кнопки вызывается одна и та же локальная процедура с разным значением параметра.

Pavel779

Если несложно можете её полностью описать!!!!

sadovod

Да всё однотипно:

Процедура Команда1(Команда)
   НажатаКнопка(1);
КонецПроцедуры

Процедура Команда2(Команда)
   НажатаКнопка(2);
КонецПроцедуры

Процедура Команда3(Команда)
   НажатаКнопка(3);
КонецПроцедуры
.....
Процедура Команда9(Команда)
   НажатаКнопка(9);
КонецПроцедуры

&НаКлиенте
Процедура НажатаКнопка(Цифра)
   Объект.Телефон = Объект.Телефон + Цифра;
КонецПроцедуры

Dethmontt

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

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

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

//Радуешься...
Если долго всматриваться в учебник...то в голову может прийти мысль его открыть!

Pavel779

Один человек решил эту задачу вот так, но правда решена она была в обычном приложении.

Повторить тоже самое в УП не получилось вот КОД:

Процедура Отработать(Элемент)
Дл=СтрДлина(Телефон);
Сим=Элемент.Заголовок;
Если Сим="DEL" Тогда
Если Дл=0 Тогда
Возврат;
Конецесли;
Телефон=Лев(Телефон,Дл-1);
Дл=Дл-1;
ИначеЕсли Сим="CLR" Тогда
    Телефон="";
    Дл=0;
Телефоны.Очистить();
Иначе
Если Дл=10 Тогда
Возврат;
КонецЕсли;
Телефон=Телефон+Сим;
Дл=Дл+1;
КонецЕсли;
Если Дл=0 Тогда
Телефоны.Очистить();
КонецЕсли;
КонецПроцедуры;


Процедура у обработки одна. и она присвоена всем кнопкам.
Если кто-то сможет это повторить в УП пусть выложит здесь код!!!!!!!!

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск