Имя: Пароль:
1C
1C 7.7
v7: Вывод календаря в горизонтальной плоскости
0 ech2000
 
16.08.13
10:46
Есть код, который выводит календарь за выбранный период. Все работает, вот только выводит в столбец, т.е. вертикально каждый месяц. Как сделать чтобы выводило по горизонтали, т.е. каждый месяц добавлялся справа, а не вниз. Уже пробывал и присоединить секцию, ниче не получается, выводит но некорректно. Вот код вывода календаря:

к = ДатаМесяц(ДатаНач)-1;
    Пока к <= ДатаМесяц(ДатаКон)-1 Цикл
        к = к + 1;
        м01=СоздатьОбъект("ТаблицаЗначений");
        м01.НоваяКолонка("Неделя1","Строка");    
        Для с=1 по 7 цикл
            м01.НоваяСтрока();
            м01.Неделя1="";
        КонецЦикла;
        тд=Дата(ДатаГод(ДатаНач),к,1);
        Для д=1 по ДатаЧисло(КонМесяца(тд)) цикл
            тд=Дата(ДатаГод(ДатаНач),к,д);
            м01.УстановитьЗначение(НомерДняНедели(тд),м01.КоличествоКолонок(),""+д);
            Если НомерДняНедели(тд)=7 тогда
                м01.НоваяКолонка("Неделя"+м01.КоличествоКолонок()+1,"Строка");
                Для с=1 по м01.КоличествоСтрок() цикл    
                    м01.УстановитьЗначение(с,м01.КоличествоКолонок(),"");
                КонецЦикла;
            КонецЕсли;
        КонецЦикла;
        м01.ВыбратьСтроки();
        Пока м01.ПолучитьСтроку() = 1 Цикл
            Таб.ВывестиСекцию("СтрокаТ");
        КонецЦикла;
    КонецЦикла;
1 Tatitutu
 
16.08.13
10:50
что за бред ? конечный результат
ты сам понимаешь что написал ?
2 ech2000
 
16.08.13
10:53
(1) я понимаю, а ты?
3 Tatitutu
 
16.08.13
10:59
ты создаешь сначала ТЗ (таблицу значений)
а потом выводишь в макет - для чего такой гемор ?

и вот это конструкцию не пойму
4 Tatitutu
 
16.08.13
10:59
к = ДатаМесяц(ДатаНач)-1;
    Пока к <= ДатаМесяц(ДатаКон)-1 Цикл
        к = к + 1;
5 ech2000
 
16.08.13
11:09
(4) это для вывода календаря не всего, а за определенный период, т.е. на форме выбираю дата1 = 1, дата2 = 6, и выводит месяцы с января по июнь.
(3) тз заполняют числами для вывода в макет. Как по другому?
6 Tatitutu
 
16.08.13
11:12
(5) про (4) мой косяк - глаз "Замылился" думал две переменные одинаковые.

Скинуть http://infostart.ru/public/19952/
7 ech2000
 
16.08.13
11:14
вот например вывод календаря с мая по август. Вывод по вертикали, а надо по горизонтали.

http://s018.radikal.ru/i526/1308/63/9d474f6c1b22.png
8 ech2000
 
16.08.13
11:15
(6) было бы неплохо.
9 Tatitutu
 
16.08.13
11:58
(8) http://www.magazka.com/kalendar-na-vse-vremena.html
всего (10 кб) код открыт
10 ech2000
 
16.08.13
12:02
(9) спасибо, щас гляну.