Имя: Пароль:
1C
1С v8
Как пронумеровать страницу?
0 Самая счастливая
 
28.11.13
10:06
Добрый день! Подскажи пожалуйста как пронумеровать страницы при выводе на печать????
ЗаголовокТаблицы = Макет.ПолучитьОбласть("ЗаголовокТаблицы");
а=ТабДокумент.КоличествоСтраниц();
ТабДокумент.Вывести(ЗаголовокТаблицы);
.........................................
     МассивТаблиц=Новый Массив;
    МассивТаблиц.Добавить(ОбластьМакета);
    МассивТаблиц.Добавить(ЗаголовокТаблицы);
    МассивТаблиц.Добавить(ОбластьМакетаСтрока);
    МассивТаблиц.Добавить(ОбластьМакетаСтрока);
    МассивТаблиц.Добавить(ОбластьМакетаИтого);
    Если не ТабДокумент.ПроверитьВывод(МассивТаблиц) Тогда
        ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
        а=ТабДокумент.КоличествоСтраниц();  
        ТабДокумент.ПовторятьПриПечатиСтроки= ТабДокумент.Область("ЗаголовокТаблицы");
        
        
      КонецЕсли;                                                                          
    Возврат ТабДокумент;
1 Wobland
 
28.11.13
10:06
воззвать к колонтитулу
2 craxx
 
28.11.13
10:06
(0) фото где?
3 Wobland
 
28.11.13
10:07
(2) нами цинично пользуются
4 Самая счастливая
 
28.11.13
10:30
зачем вам фото?
5 Wobland
 
28.11.13
10:33
(4) это традиция, которую мы не в силах изменить
6 Самая счастливая
 
28.11.13
10:40
craxx а где твоя фотка?
7 Kupogun
 
28.11.13
10:42
(6) традиция на девушек только распространяется
8 Холодильник
 
28.11.13
10:42
заходите, когда будет фото. спасибо
9 Wobland
 
28.11.13
10:43
(6) а ему зачем?
10 craxx
 
28.11.13
10:44
(6) я же не задаю глупых вопросов.
11 Самая счастливая
 
28.11.13
10:54
как сделать нумерацию?
12 Холодильник
 
28.11.13
10:54
(11) карточка-Изменить-фотография-вложить фотографию
13 craxx
 
28.11.13
10:55
(11)
1. выложить фото
14 Wobland
 
28.11.13
10:56
(11) трижды перекреститься и молиться так:
колонтитул-колонтитул, ах ядрёная ты вошь,
покажи мне &НомерСтраницы,
моё сердце не тревожь
15 DmitriyDI
 
28.11.13
10:58
(14) )))
16 Холодильник
 
28.11.13
10:59
колонтитул-колонтитут забери меня на.. небо
17 Kupogun
 
28.11.13
11:00
(11) 24 темы - и на вопросы "где фото?" только сейчас какой-то ответ.
УЖАС!
18 Рэйв
 
28.11.13
11:00
откуда их столько безфоточных понабежало то:-) Гдето тут у них гнездо!
19 Самая счастливая
 
28.11.13
11:01
а в коде как написать?
20 Самая счастливая
 
28.11.13
11:03
в цикле?
21 Рэйв
 
28.11.13
11:04
22 Wobland
 
28.11.13
11:05
(19) а это обязательно?
23 mzelensky
 
28.11.13
11:09
(0) буквально 5 минут назад одной уже закрыли тему за "без фоточничество". Так что лучше выкладывай.
24 mzelensky
 
28.11.13
11:11
(23) Тем более хочется увидеть лицо "Самой счастливой" женщины. :)
25 Самая счастливая
 
28.11.13
11:14
Пока ВыборкаСтрокТовары.Следующий() Цикл
           Ном = Ном + 1;
        //Начинаем новую страницу, если предыдущая строка была последней на странице
        //или пора переносить последнюю строку на последнюю страницу с подвалом.
        ЦелаяСтраница = (СтрокШапки + Ном - 1) / СтрокНаСтранице;
        Если (ЦелаяСтраница = Цел(ЦелаяСтраница)) или ((ПереноситьПоследнююСтроку = 1) и (Ном = КоличествоСтрок)) Тогда
               НомерСтраницы    = НомерСтраницы + 1;
            //ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
            ЗаголовокТаблицы.Параметры.НомерСтраницы = "Страница " + НомерСтраницы;
            ТабДокумент.Вывести(ЗаголовокТаблицы);
        КонецЕсли;
26 Самая счастливая
 
28.11.13
11:15
у меня раньше было так ЗаголовокТаблицы.Параметры.НомерСтраницы = "Страница " + НомерСтраницы;
я код переписала
27 Самая счастливая
 
28.11.13
11:16
надо такое условие которое считает количество страниц и присваивает его к параметру
28 Самая счастливая
 
28.11.13
11:17
табДок.КоличествоСтраниц;
29 Самая счастливая
 
28.11.13
11:18
но какое условие поставить?
30 Rebelx
 
28.11.13
11:19
(28) надо соблюдать традиции. Или не задавать глупых вопросов, или уметь читать между строк, или - фото, желательно топлес
31 mzelensky
 
28.11.13
11:19
(25) - (29) Продолжайте, у вас хорошо получается. Просто загляденье!
32 Fish
 
28.11.13
11:20
(25) Человек, который это писал, явно никогда не открывал СП.
33 Самая счастливая
 
28.11.13
11:21
привоила просто а=табДок.КоличествоСтраниц;
потом ЗаголовокТаблицы.Параметры.НомерСтраницы = "Страница " + а;
34 Самая счастливая
 
28.11.13
11:21
надо в цикле
35 Самая счастливая
 
28.11.13
11:22
не пойму какое условие?
36 Самая счастливая
 
28.11.13
11:22
подскажите!!!!!!!!
37 Fish
 
28.11.13
11:22
(35) При чём тут условие?
38 mzelensky
 
28.11.13
11:24
(37) Тсссс....не порть монолог! он прекрасен :)
39 Самая счастливая
 
28.11.13
11:25
Fish а как?
40 XLife
 
28.11.13
11:27
(39) how much is the fish?
41 Fish
 
28.11.13
11:27
(39) Если ты про (33) и (34), то просто напиши строки из (33) внутри цикла. Или ты не об этом?
42 mzelensky
 
28.11.13
11:32
(41) Зачем ты человека плохому учишь?
43 Холодильник
 
28.11.13
12:14
(36)как вариант - построить дерево рекурсионных вызовов к областям макета табличного документа и в соответствии с высотой области печати присваивать номера страниц
44 Gbpltw
 
28.11.13
12:26
в цЫкле же (43)
45 Gbpltw
 
28.11.13
12:27
ой
46 Холодильник
 
28.11.13
12:29
(44) вызовы в цикле, естественно
47 Kupogun
 
28.11.13
13:42
странно, что драйвер к принтеру никто не предложил переписать
48 sgt_koretsky
 
28.11.13
14:26
(47), (0), перепиши драйвер к принтеру. иначе, будет тебе хлопотно.
49 Самая счастливая
 
28.11.13
20:51
всё равно не получилось
50 Рэйв
 
28.11.13
20:57
(49)Да ладно, не расстраивайся.
51 Рэйв
 
28.11.13
21:00
(49)Все просто на самом деле.
Надо просто перестать паниковать и начать думать.
52 Grobik
 
28.11.13
21:05
(51) И сократить ник до двух заглавных буков.
53 kosts
 
28.11.13
21:08
(49) Фотку надо было свою выложить, вопрос бы уже решился...
54 Grobik
 
28.11.13
21:11
Ник меняй
https://www.google.com.ua/search?tbs=sbi:AMhZZivB9rCAGZuJXwSnRGDleSOLoGaYot2bnYi4_18CHklTpt1MJiWybUr3485nRmHeNSFr2skiuGKUoVDvBO1e552z8BI5VYu7I1IGfSXZ9imH8vQEHFvZovhdHfzSR9L-Xdoddrsuhe56k-sbhEclzRwozAV5fILZYI5VIqMDDI3WEvbfh6m4lvgU17QdciNFbuaupGC7SNTqIzJED5JbxlVSRv7j6YVyv953VpdfHBo7ezfdMKHicqpAFnqsEvelQdQlpT-ZCD6sSGfwaUMQVninjwifhwWqBMxbqjC0YlrLdvQjxp-DynWG0IG35fRiVh0aQXEZV1ysTTnrO9SWCmyCzq--LGoktZObft2lhLQmbOPXknsWwcTZBBhC2ZqEa3wpWqGH0ngzlUChk1Gw06HZR4G9Y-LSHxJ7mwKJill52drjAveA3YBv2dsDUa2xXloytZ_1XX4aZFCnzMmDnoPuP6X6UsaCUxPZlpr6jCwTC8XCp0toebt-QtYSRJfR4BlX9wsnEko45GKQ5WgBFnAFeDbviWSgrWMFNH_1sMQiF3YF70eyTRbWea9ftygKzViBbaaYSqUC_1jJHkqbN9ClhIFrht0RqUEldo7vScycoMWBl_1C_15qusHk-jpu21U6lLGddy4OUD5YCfaAw_1ztaCP4-td63utMAdjtmwIEMbg3khXxog6zcPn8QINaLNe9IPaxLD_1y_1B5z2KVaWfvmOqIEYgw1gQUDIYLW5ObUbSaYbOeW2iavyMmg6NKp33qSn5vowQmhsQvz3iLLHakc-JD9-PebTqn6m04e-i32hL410JFi7IJnKunJ2tiwGEbnF0C6QiDiEMljIvc0b2FBFKKrJKQje_1pGDWbFDMcUf4pS8yaWcaqTKSi7ytkLJqZ0BIdxEQdq07-AHyxsV_17nbi4NsV_16Z7bs6V2rgrqIXG6IIY2MIn2_17w3T6oVacLtDZKHabBMhy_1F0mK4LMpaHH93wHL480eS4WHEQTFZixLYG3wEn5ERVzlwH6Yf9mFzNI39GSR-Zw-_1bvw6Ukg2NsPRcqWw9Ktm0li7JEHKlvf3DuVFWUv_1sS41Xk82Owo5YNatSp_1qR5bEduOLaQY0xzfSpuFd-yYnTOKPONAOQkxzC-YfeUkswWhV5JhCkVjM8TJkxcKKeDMx6Mtbm-NYl1vZbMtxWMauIHMvcyT4-EyTU8NqHZSuV3ngtOSUoX3z14pUA7O2UVCj2q768VL8u_1c72IBS3RWN3lMCNOZAQXTjl2itTRiqOF2ck503Oz_1nCbsTQLMeS0FgPgN5h3u7UW7IWAHvrg-xR4UBmkiYCnqDrdSFWcdAbiCHaRYwft0BqsO6KgbOB-s81U9iFKJjgtuSMQk1BFkCwJJVjkx0tTSMGY_1Aqxf4QeeqOKH5ZeXU7DcCi50-hWs4usypJ8KBRGlLe8enjw0DrOmaLxSYZCWIAzWD8Msx_1oHG8hcMqsHtcwv679AwBoDbQaiMGD8qIWwbgXlTIrjgp0B4b32lDyAfhhqNdlFg4IbElzfTA6tFK9E0udFVVis1ZKkgZmmlxBTWfqzRcZdyyNFqTZHK5EfoOgwZgYpt-Rk9x2m1McxSJoShpy5RgKgQ2iy40AG_1EkEbsTdJ8sUZqt_1WTAhMfsBdmfMLkwT_1jcvaw5Fyq7oLqbZeQ8XaZllTsMKdDEFHU6jwHcfEdYuTlIUdT1z8bebkoewz0rDZyU&btnG=Поиск%20по%20картинке
55 kosts
 
28.11.13
21:17
(49) Бедная, смени профессию, не мучай себя. В гугле по первой же ссылке решение.
Что-то в этом роде, в общем.

ТабДок.ВерхнийКолонтитул.Выводить = Истина;
ТабДок.ВерхнийКолонтитул.ТекстСправа="Стр.[&НомерСтраницы] из [&СтраницВсего]";
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой