Утро, хорошее настроение. Заходит коллега
- Ага, они уже во всю трудятся, уже сгенерировали тонны кода и килограммы форм!
- Угу..
- Вот ты, Женька, сколько кнопок создал с утра?
- Я то? Ни сколько!
- А сможешь создать кнопку программно?
Я в раздумьях, так-то создать кнопку программно не проблема когда речь о Delphi или C#, но в 1Ске никогда не делал подобного.Тем не менее мои мысли сводят меня к ответу "Да".
- Да.
- Ну до 9 часов ещё 20 минут, время пошло
И тут клавиатура затрещала ). До 9 часов конечно не успел, чуток вышел за рамки установленного срока, но это уже из-за выпендрежа) Не хотелось голую кнопку создавать, без обработчика событий)
И вот что интересно. Я первым делом пошел по пути старых инстинктов)
Что-то вроде
И лишь затем нашел ещё один метод "УстановитьДействие" ) Вот тогда все заработало) Ах это чувство) Некое проявление азарта и интузиазма и ... не знаю как описать)
В общем если кому интересно код получился такой:
- Ага, они уже во всю трудятся, уже сгенерировали тонны кода и килограммы форм!
- Угу..
- Вот ты, Женька, сколько кнопок создал с утра?
- Я то? Ни сколько!
- А сможешь создать кнопку программно?
Я в раздумьях, так-то создать кнопку программно не проблема когда речь о Delphi или C#, но в 1Ске никогда не делал подобного.Тем не менее мои мысли сводят меня к ответу "Да".
- Да.
- Ну до 9 часов ещё 20 минут, время пошло
И тут клавиатура затрещала ). До 9 часов конечно не успел, чуток вышел за рамки установленного срока, но это уже из-за выпендрежа) Не хотелось голую кнопку создавать, без обработчика событий)
И вот что интересно. Я первым делом пошел по пути старых инстинктов)
Что-то вроде
НашаКнопка = Новый Кнопка; ...Но потом понял что нет возможность родителя задать(на чем будет распологаться). Думаю. Гуглю. Ага! Оказывается есть метод Добавить у списка ЭлементовФормы. Тут пошло проще.. Но потом снова я подумал что свойство "ИсточникДействий" у созданной кнопки есть свойство хранящее процедуру.. И пытался как и в Дельфи присвоить этому свойству процедуру) Напрямую) Но облом. Так нельзя..
И лишь затем нашел ещё один метод "УстановитьДействие" ) Вот тогда все заработало) Ах это чувство) Некое проявление азарта и интузиазма и ... не знаю как описать)
В общем если кому интересно код получился такой:
Процедура ПриОткрытии() НашаКнопка = ЭтаФорма.ЭлементыФормы.Добавить(Тип("Кнопка"),"НашаКнопка",Истина); НашаКнопка.Заголовок = "Йа Кнопко"; НашаКнопка.ЦветФонаКнопки = WebЦвета.Красный; НашаКнопка.ЦветТекстаКнопки = WebЦвета.Зеленый; НашаКнопка.Верх = 25; НашаКнопка.Лево = 15; НашаКнопка.Высота = 30; НашаКнопка.Ширина = 70; Событие = Новый Действие("НашаКнопкаНажатие"); НашаКнопка.УстановитьДействие("Нажатие",Событие); КонецПроцедуры Процедура НашаКнопкаНажатие(Элемент) Сообщить("Я кнопко! Йа работаю!"); КонецПроцедуры
а с другой стороны всякие буржуи так ведь все и видят.. бедолаги