Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)
Кол=1;
Лол = ЭлементыФормы.Добавить(Тип("Кнопка"),"Лол"+Кол,1,);
Лол.Верх=100;
Лол.Лево =20;
Лол.Высота = 100;
Лол.Ширина = 100;
Лол.Заголовок="Комната № "+Кол;
Верт =1;
Еще=0;
Пока Верт<5 Цикл
Пока Кол<5 цикл
Кол=Кол+1;
Лев=Кол;
Им=Кол+Еще;
Лол = ЭлементыФормы.Добавить(Тип("Кнопка"),"Лол"+Им,1,);
Лол.Верх=100+((Верт-1)*(100+20));
Лол.Лево =140+(120)*(Лев-2);
Лол.Высота = 100;
Лол.Ширина = 100;
Лол.Заголовок="Комната № "+Им;
конеццикла;
Еще=Еще+Кол;
Кол=0;
Верт=Верт+1;
конеццикла;
КонецПроцедуры
ПоказатьИтог в прикрепленке....
Там же и вопрос написан
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот