0
Drunk_Snake
22.01.13
✎
09:13
|
ЭлементКартинка = ЭтаФорма.Элементы.Добавить("П"+Спр.Код,Тип("ПолеФормы"),ЭлементГруппаОбъекта);
ЭлементКартинка.ПутьКДанным = ИмяНовогоРеквизита;
ЭлементКартинка.Вид = ВидПоляФормы.ПолеКартинки;
ЭлементКартинка.ПоложениеЗаголовка = ПоложениеЗаголовкаЭлементаФормы.Нет;
ЭлементКартинка.РастягиватьПоГоризонтали = Ложь;
ЭлементКартинка.РастягиватьПоВертикали = Ложь;
ЭлементКартинка.ГоризонтальноеПоложение = ГоризонтальноеПоложениеЭлемента.Центр;
ЭлементКартинка.РазмерКартинки = РазмерКартинки.Пропорционально;
ЭлементКартинка.Гиперссылка = Истина;
ЭлементКартинка.ГоризонтальноеПоложение = ГоризонтальноеПоложениеЭлемента.Центр;
ЭлементКартинка.УстановитьДействие("Нажатие", "ПодатьЗаявку");
&НаКлиенте
Процедура ПодатьЗаявку(Команда)
ОткрытьФорму("Документ.ПодачаЗаявки.Форма.ФормаДокумента",,,,);
КонецПроцедуры
Результат вот такой:
Вопрос: Как отключить всплывающее сообщение?
Заранее спасибо.
|
|
4
Reset
22.01.13
✎
10:08
|
(0)
&НаКлиенте
Процедура ПодатьЗаявку(Команда,СтандартнаОбработка)
СтандартнаОбработка=Ложь;
ОткрытьФорму("Документ.ПодачаЗаявки.Форма.ФормаДокумента",,,,);
КонецПроцедуры
|
|