ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Тема для программирования !!! Это продолжение темы, предыдущие части доступны тут ПРОГРАММЫ  1С:Предприятие 1C - 1C: Вопросы по конфигурациям ВАРЕЗНИК   1C:Предприятие 7.7 - 1С:Предприятие v.8.x - 1C Диск ИТС - 1С: Совместимо 8.х Топик 1C Ebooks ЗДЕСЬ (обновлено 27.03.2009) - небольшая библиотечка (книги, документация, видео, утилиты) по 1С, финансам, бухучету и т.п. Все рассортировано по версиям... Для заблудившихся в трех соснах >>> FAQ по форуму RU.Board Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:30 06-02-2008 | Исправлено: vkramnik, 21:26 27-03-2009

Lihonosov Full Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору vadver Ничего не закрашивает Всего записей: 540 | Зарегистр. 05-07-2007 | Отправлено: 16:20 28-03-2008

valerka78 Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Ошибка в том, что надо использовать Остаток.Рассчитать(...)   Добавлено: Цитата: Ничего не закрашивает я тебе написал самый оптимальный вариант не требующий ломания мозгов Всего записей: 248 | Зарегистр. 16-01-2006 | Отправлено: 21:11 28-03-2008

Lihonosov Full Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору valerka78 Цитата: Ошибка в том, что надо использовать Остаток.Рассчитать(...)   Спасибо, получилось. Цитата: я тебе написал самый оптимальный вариант не требующий ломания мозгов   Я так и сделал, но все же хочется знать как можно по другому, с одной секцией Всего записей: 540 | Зарегистр. 05-07-2007 | Отправлено: 10:08 31-03-2008 | Исправлено: Lihonosov, 10:10 31-03-2008

valerka78 Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Lihonosov Самому стало интересно Вот: //******************************************* Процедура Сформировать()     Табл = СоздатьОбъект("Таблица");     Табл.ИсходнаяТаблица("Таблица");          Фон = Табл.Область("R1C1");     Если Числ = 0 Тогда         Фон.ЦветФона(100, 100, 100);     ИначеЕсли Числ = 1 Тогда         Фон.ЦветФона(200, 0, 100);     КонецЕсли;          Табл.ВывестиСекцию("Секция_1");     Табл.Показать(); КонецПроцедуры   //Числ - это у меня реквизит диалога типа "Число" //область можно задавать любую //проверил все работает, цвет меняет. Всего записей: 248 | Зарегистр. 16-01-2006 | Отправлено: 10:45 31-03-2008

Lihonosov Full Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: а если ячейку то фигня получится Да Всего записей: 540 | Зарегистр. 05-07-2007 | Отправлено: 12:03 31-03-2008

DikAll Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Выручите меня, пожалуйста: нужно переконвертировать базу "Бухгалтерский учет 7.7" версии 4.5 в "Торговля и склад 7.7". Конвертор брал с шапки, что в теме по варезнику. Ничего не получется. Опыта не имею в этой области, поэтому просьба, объясните по-подробнее...     ---------- Ну я перец! Всего записей: 2221 | Зарегистр. 08-11-2005 | Отправлено: 13:17 31-03-2008

valerka78 Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору DikAll Я бы тебе посоветовал написать именно в ту тему, из которой ты брал конфу тут обсуждаются другие впросы   Lihonosov Чтото я не догоняю, ячейка что, не принадлежит секции? Всего записей: 248 | Зарегистр. 16-01-2006 | Отправлено: 15:06 31-03-2008

DikAll Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору valerka78 а в какую? Всего записей: 2221 | Зарегистр. 08-11-2005 | Отправлено: 15:08 31-03-2008

valerka78 Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Lihonosov И чем тебе не подходит код, который я написал? DikAll В "Программах" есть тема по 1с, попробуй туда Всего записей: 248 | Зарегистр. 16-01-2006 | Отправлено: 16:21 31-03-2008

FOLD Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору valerka78 Сделай таблицу посложней, чтобы секция, в котрой ты раскрашиваешь  фон, имела адрес НЕ "R1C1". и перед этим выведи другие секции.. и увидишь. Lihonosov Если секцию, в которой ты раскрашивашь фон, сделать в таблице первой, тогда работает правильно             Код: ПечТабл = СоздатьОбъект("Таблица");     ПечТабл.ИсходнаяТаблица("Табл");         ПечТабл.ВывестиСекцию("Заголовок");       ПечТабл.ВывестиСекцию("ШапкаТаблицы" );                       НомСтроки = 0;     ВыбратьСтроки();     Пока ПолучитьСтроку() = 1 Цикл         НомСтроки = НомСтроки + 1;                                                                  Секция = ПечТабл.ПолучитьСекцию("Строка" );        Секция.Область("R1C6:R1C22").ЦветФона(255,0,0);     КонецЦикла   Условие  только  добавь Всего записей: 1238 | Зарегистр. 26-01-2004 | Отправлено: 17:16 31-03-2008 | Исправлено: FOLD, 17:24 31-03-2008

valerka78 Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору FOLD Ну если вопрос в том, чтоб передать в процедуру адрес секции, то это, знаете ли я в первом классе решал такие задачи...   Цитата: перед этим выведи другие секции.. и увидишь. Сделал, увидел, все работает.   Для всех, кто в танке: // =============================== // Назначение: Закрашивает область секции. // // Аргументы: Стр1,Столб1, Стр1,Столб2 - соответственно, начальныя и конечные //           положения секции, которую необходимо закрасить; // для тех кто вообще в танке, обратим внимание, что позицию вывода // всегда можно посчитать (шапка, допустим, занимает 4 строки, а 5-ю надо // вывести, со столбцами такая же ситуация) // работает с таблицами ЛЮБОЙ сложности // при желании можно передавать и цвет Процедура РамкаСекции(Стр1, Столб1, Стр2, Столб2)     СекцияФон = Т.Область(Стр1, Столб1, Стр2, Столб2);     СекцияФон.ЦветФона(100, 100, 100); КонецПроцедуры //РамкаСекции   З.Ы.: Если скажете что не получается, тогда я не знаю... З.Ы.Ы.: А что вы зациклились на ...ПолучитьСекцию()??? топик выше не есть эталон и образец для подражания, без этой команды все прекрасно работает... Всего записей: 248 | Зарегистр. 16-01-2006 | Отправлено: 17:36 31-03-2008 | Исправлено: valerka78, 17:42 31-03-2008

FOLD Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору valerka78 Цитата: Для всех, кто в танке Для тех кто об этот так головой ударился.. Где ты видел что проблема в том, чтобы передать адрес ..? Никакой проблемы здесь никто не видел..., кроме тебя  наверно .Я предлагал, кстати вариант получения адреса, а не передачи   Цитата: З.Ы.Ы.: А что вы зациклились на ...ПолучитьСекцию()??? топик выше не есть эталон и образец для подражания, без этой команды все прекрасно работает...   Без секции действительно работает. НО не надо вести себя так высокомерно, ты в этом разобрался только сегодня, час назад, ,иначе не писал бы все выше..а я на секции зациклся, потому что пошел по свему же пути.. Кстати вариант с выводом секции  вполне  рабочий..Не идеал, но перборы проведуемые тобой, еще дальше далеки от идеала А мне просто некогда особо разбираться, у меня таких балбесов 5ь штук в подчинении, и работают ,кстати ,в дружеской атмосфере, и никогда не кричат, решив пустяковую задачу для дошкольного возраста    - Вы в Танке! - я их таких сразу гоню..   ЗЫЫ И вообще, решение кроссвордов затянулось     Всего записей: 1238 | Зарегистр. 26-01-2004 | Отправлено: 18:24 31-03-2008 | Исправлено: FOLD, 18:32 31-03-2008

valerka78 Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Ну вот еще не хватало себя вести высокомерно я меня будун просто, два дня ДР жены отмечал бошку ломит, нервный немного, извините если что. Главное, разобрались Всего записей: 248 | Зарегистр. 16-01-2006 | Отправлено: 18:30 31-03-2008

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » 1C Программирование и поддержка

ShIvADeSt (03-04-2009 02:03): Продолжение тут http://forum.ru-board.com/topic.cgi?forum=33&topic=10256#1

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование