0
adv1
04.03.22
✎
23:05
|
Я в цикле создаю игровое поле 9на9 из кнопок, которые можно самому заполнять. Игровое поле создаётся при нажатии "начать игру". Как я могу этим кнопкам присвоить начальное числовое значение?
Процедура НачатьИгруНаСервере()
ИгровоеПоле = Элементы.Найти("ИгровоеПоле");
Если ИгровоеПоле <> Неопределено Тогда
Этаформа.Элементы.Удалить(ИгровоеПоле);
КонецЕсли;
ИгровоеПоле = ЭтаФорма.Элементы.Добавить ("ИгровоеПоле", Тип("ГруппаФормы"),ЭтаФорма);
ИгровоеПоле.Вид = ВидГруппыформы.ОбычнаяГруппа;
ИгровоеПоле.Отображение = ОтображениеОбычнойГруппы.Нет;
ИгровоеПоле.ОтображатьЗаголовок = ЛОЖЬ;
ИгровоеПоле.Группировка = ГруппировкаПодчиненныхЭлементовФормы.Горизонтальная;
ИгровоеПоле.РазрешитьИзменениеСостава = Истина;
ИгровоеПоле.Видимость = Истина;
Для x = 1 По ШиринаИгровогоПоля Цикл
Группа = ЭтаФорма.Элементы.Добавить("Ряд"+x, Тип("Группаформы"), Элементы.ИгровоеПоле);
Группа.Вид = ВидГруппыформы.ОбычнаяГруппа;
Группа.ВертикальноеПоложениеВГруппе = ВертикальноеПоложениеПодчиненных;
Для y = 1 По ВысотаИгровогоПоля Цикл
НоваяКнопка = ЭтаФорма.Элементы.Добавить("кн_"+y+"_"+x, Тип("ДекорацияФормы"), Группа);
НоваяКнопка.Вид = ВидДекорацииФормы.Картинка;
НоваяКнопка.Высота = 2;
НоваяКнопка.Ширина = 4;
НоваяКнопка.Видимость = Истина;
НоваяКнопка.КонтекстноеМеню.Видимость = Истина;
НоваяКнопка.Рамка = Новый Рамка(ТипРамкиЭлементаУправления.Одинарная, 2);
НоваяКнопка.ЦветРамки = WebЦвета.Золотистый;
Новаякнопка.Гиперссылка = Истина;
НоваяКнопка.УстановитьДействие("Нажатие", "КнопкаНажатие");
КомандаНеЗнаю = ЭтаФорма.Элементы.Добавить("кн_"+y+"_"+x+"КонтекстноеМенюНеЗнаю",Тип("КнопкаФормы"), НоваяКнопка.КонтекстноеМеню);
КомандаНеЗнаю.ИмяКоманды = "НеЗнаю";
КомандаНеЗнаю.Картинка = БиблиотекаКартинок.Справка;
КонецЦикла;
КонецЦикла;
КонецПроцедуры
|
|