8.х Как вывести на печать с табличной части один символ

Процедура ЗаявлениеНажатие(Элемент)
ТабДок = Новый ТабличныйДокумент;
Макет = Документы.Договор.ПолучитьМакет("Заявления");
Тело = Макет.ПолучитьОбласть("Тело");
СтрокаФИО = ТабличнаяЧасть.ФИО;
Тело.ПараметрыФИО = (Сред(СтрокаФИО, 5, 1));
Тело.Параметры.Заполнить(ЭтотОбъект);
ТабДок.Вывести(Тело);

ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Ложь;
ТабДок.ТолькоПросмотр = Ложь;
ТабДок.ОтображатьЗаголовки = Ложь;
ТабДок.Показать();

КонецПроцедуры

Извините если не так написал Я новичок в программный кодах 1 С 8. У меня есть документ у котором присутствует табличная часть, мне нужно вывести на печать данные из табличной части с колонки ФИО по отдельной букве в квадратик. Как это сделать, подскажите пожалуйста

Жадность руководства, Вы правы

Спасибо !!! Получить данные нужно с табличной части документа и вставить в квадратики вот в Ваше примере (я чуть подправил форму ) нужно получить с 1 строки и с столбца ФИО .

Ещё раз спасибо !!!

Добрый день ! Пример Ваш неплохой, у меня проблема возникла в том что я не могу получить с табличной части документа для вывода на печать данные в в квадратики. В Вашем примере я добавил табличную часть с двумя колонками. Если Вас не затруднит навести пример как получить данные с колонки ФИО и разместить их в квадратики.

ОГРОМНОЕ СПАСИБО !!!! Всё получилось. Извините если Вас обидел мой ответ (не плохой) . Буду учиться, учебники листать но если чёт не будет получаться буду спрашивать так что не серчайте . Удачного Вам дня !!!

Скачал, оттуда взял код
Для каждого ТекСтрока Из ТабличнаяЧасть Цикл
Область_КвадратикиТелефон = Макет.ПолучитьОбласть("КвадратикиТелефон");
ДлинаСтроки_Телефон = СтрДлина(ТекСтрока.Телефон);
Для i=1 По ДлинаСтроки_Телефон Цикл
// Квадратики
Область_КвадратикиТелефон.Параметры["П" + i] = Прав(Лев(ТекСтрока.Телефон, i), 1);
КонецЦикла;
ТабДок.Вывести(Область_КвадратикиТелефон);
по аналогии сейчас делаю в своём документе.