Руслан Микулович:
&НаСервере
Процедура ПолучитьКнопкуКартинки()
счетчик = 12;
Картинка = Новый Картинка("d:\ОтправитьСМС.png");
АдресКартинки = ПоместитьВоВременноеХранилище(Картинка);
ИмяРеквизита = "Реквизит1";
Реквизит_1 = Новый РеквизитФормы(ИмяРеквизита, Новый ОписаниеТипов("Строка"));
ДобавляемыеРеквизиты = Новый Массив;
ДобавляемыеРеквизиты.Добавить(Реквизит_1);
ИзменитьРеквизиты(ДобавляемыеРеквизиты);
Элемент = ЭтаФорма.Элементы.Добавить("Счетчик"+Строка(Счетчик), Тип("ПолеФормы"));
Элемент.ПутьКДанным = ИмяРеквизита;
Элемент.Вид = ВидПоляФормы.ПолеКартинки;
ЭтаФорма[ИмяРеквизита] = АдресКартинки;
Элемент.Гиперссылка = истина;
Элемент.УстановитьДействие("Нажатие","Проверка");
Элемент.Видимость = Истина;
КонецПроцедуры // ПолучитьКнопкуКартинки()
&НаКлиенте
Процедура Проверка(Элемент, СтандартнаяОбработка)
СтандартнаяОбработка = ложь;
Сообщить("Проверка");
КонецПроцедуры