---

&НаСервере
Процедура СоздатьИгровоеПоле()
    ДополнительныеРеквизиты = Новый Массив;
    Для НомерЯчейки = 1 По 81 Цикл
        ИмяРеквизита = "Ячейка" + Строка(НомерЯчейки);
        НовыйРеквизит = Новый РеквизитФормы(
            ИмяРеквизита,
            Новый ОписаниеТипов("Число"));
        ДополнительныеРеквизиты.Добавить(НовыйРеквизит);
    КонецЦикла;
    ИзменитьРеквизиты(ДополнительныеРеквизиты);
    ГруппаПоля = Элементы.Добавить(
        "ИгровоеПоле",
        Тип("ГруппаФормы"));
    ГруппаПоля.Вид = ВидГруппыФормы.ОбычнаяГруппа;
    ГруппаПоля.Группировка =
        ГруппировкаПодчиненныхЭлементовФормы.Горизонтальная;
    Для НомерСтроки = 1 По 9 Цикл
        ГруппаСтроки = Элементы.Добавить(
            "Строка" + Строка(НомерСтроки),
            Тип("ГруппаФормы"),
            ГруппаПоля);
        ГруппаСтроки.Вид = ВидГруппыФормы.ОбычнаяГруппа;
        ГруппаСтроки.Группировка =
            ГруппировкаПодчиненныхЭлементовФормы.Горизонтальная;
        Для НомерСтолбца = 1 По 9 Цикл
            НомерЯчейки =
                (НомерСтроки - 1) * 9 + НомерСтолбца;
            ИмяЭлемента = "Поле" + Строка(НомерЯчейки);
            ИмяРеквизита = "Ячейка" + Строка(НомерЯчейки);
            ПолеВвода = Элементы.Добавить(
                ИмяЭлемента,
                Тип("ПолеФормы"),
                ГруппаСтроки);
            ПолеВвода.Вид = ВидПоляФормы.ПолеВвода;
            ПолеВвода.ПутьКДанным = ИмяРеквизита;
            ПолеВвода.Заголовок = "";
        КонецЦикла;
    КонецЦикла;
КонецПроцедуры