AXForum  
Вернуться   AXForum > Microsoft Dynamics AX > DAX: Программирование
All
Забыли пароль?
Зарегистрироваться Правила Справка Пользователи Сообщения за день Поиск

 
 
Опции темы Поиск в этой теме Опции просмотра
Старый 11.02.2008, 17:39   #1  
kashperuk is offline
kashperuk
Участник
Аватар для kashperuk
MCBMSS
Соотечественники
Сотрудники Microsoft Dynamics
Лучший по профессии 2017
Лучший по профессии 2015
Лучший по профессии 2014
Лучший по профессии 2011
Лучший по профессии 2009
 
4,361 / 2084 (78) +++++++++
Регистрация: 30.05.2004
Адрес: Atlanta, GA, USA
Когда-то написал вот такой код - пытался учесть выделение "внутри" по вертикали/горизонтали. Вроде работает

X++:
void setRangeBorder(BookMark _bookMark,
                    int _lineStyle = 1, // xlContinuous
                    int _lineWeight = 1, // xlContinuous
                    boolean _inside = False, 
                    int _workSheetNumber = 1,
                    container _lines2Draw = [true, true, true, true])
{
    COM         comRange, comBorders, comBorder, comWorkSheet;
    TextBuffer  textBuffer;
    int         fromRow;
    int         toRow;
    ;
    try
    {
        comWorkSheet = this.getWorkSheet(_workSheetNumber);
        comRange     = comWorkSheet.Range(_bookMark);
        if (comRange)
        {
            comBorders = comRange.Borders();
 
            if (conPeek(_lines2Draw, 1))
            {
                comBorder = comBorders.Item(7); // left
                comBorder.Weight(_lineWeight);
                comBorder.LineStyle(_lineStyle);
            }
            if (conPeek(_lines2Draw, 2))
            {
                comBorder = comBorders.Item(8); // top
                comBorder.Weight(_lineWeight);
                comBorder.LineStyle(_lineStyle);
            }
            if (conPeek(_lines2Draw, 3))
            {
                comBorder = comBorders.Item(9); // bottom
                comBorder.Weight(_lineWeight);
                comBorder.LineStyle(_lineStyle);
            }
            if (conPeek(_lines2Draw, 4))
            {
                comBorder = comBorders.Item(10); // right
                comBorder.Weight(_lineWeight);
                comBorder.LineStyle(_lineStyle);
            }
 
            if (_inside)
            {
                textBuffer = new TextBuffer();
                textBuffer.setText(_bookMark);
 
                textBuffer.find('\\:');
                if (textBuffer.matchPos() > 0 && textBuffer.matchLen() == 1)
                {
                    textBuffer.find(@":a+");
                    fromRow = ZCH_ComExcelExportADO::colName2Num(textBuffer.subStr(textBuffer.matchPos(), textBuffer.matchLen()));
 
                    textBuffer.find(@":a+", textBuffer.matchPos() + textBuffer.matchLen());
                    toRow = ZCH_ComExcelExportADO::colName2Num(textBuffer.subStr(textBuffer.matchPos(), textBuffer.matchLen()));

                    if (fromRow < toRow) 
                    {
                        comBorder = comBorders.Item(11); // inside vertical
                        comBorder.Weight(_lineWeight);
                        comBorder.LineStyle(_lineStyle);
                    }
 
                    textBuffer.find(@":d+");
                    fromRow = str2int(textBuffer.subStr(textBuffer.matchPos(), textBuffer.matchLen()));
 
                    textBuffer.find(@":d+", textBuffer.matchPos() + textBuffer.matchLen());
                    toRow = str2int(textBuffer.subStr(textBuffer.matchPos(), textBuffer.matchLen()));

                    if (fromRow < toRow) 
                    {
                        comBorder = comBorders.Item(12); // inside horizontal
                        comBorder.Weight(_lineWeight);
                        comBorder.LineStyle(_lineStyle);
                    }
                }
            }
        }
    }
    catch (exception::Error)
    {
        this.throwError("Ошибка такая-то");
    }
}
Может кому-то пригодится
Старый 11.02.2008, 17:57   #2  
Gustav is offline
Gustav
Moderator
Аватар для Gustav
SAP
Лучший по профессии 2009
 
1,858 / 1152 (42) ++++++++
Регистрация: 24.01.2006
Адрес: Санкт-Петербург
Записей в блоге: 19
Цитата:
Сообщение от Gustav Посмотреть сообщение
P.S. 2EAlex: Лихо-лихо Вы сообщения переставили. Теперь выглядит так, что я вроде как про 11 и 12 сам с собой поговорил
А для операции обрамления можно использовать метод Range.BorderAround
Так вот, такую операцию обрамления можно выполнить одной строкой кода:
X++:
_range.BorderAround( 1, 
                     COMVariant::createNoValue(), 
                     COMVariant::createNoValue(), 
                     WinAPI::RGB2int(0,0,0) );
Старый 09.12.2008, 17:11   #3  
VKUR is offline
VKUR
Участник
Аватар для VKUR
 
12 / 10 (1) +
Регистрация: 19.03.2007
Цитата:
Сообщение от kashperuk Посмотреть сообщение
Когда-то написал вот такой код - пытался учесть выделение "внутри" по вертикали/горизонтали. Вроде работает ...
ZCH_ComExcelExportADO
Теги
ax3.0, excel

 

Похожие темы
Тема Автор Раздел Ответов Посл. сообщение
Исследование скорости экспорта данных из Axapta в Excel (коллективный эксперимент) Gustav DAX: База знаний и проекты 79 13.02.2014 13:18
gl00mie: Read Excel table via ADO Blog bot DAX Blogs 2 09.04.2010 08:32
[Excel] - Несколько версий Excel на машине клиента Андре DAX: Программирование 11 07.08.2007 13:45
Вызов Item() для коллекций Excel Владимир Максимов DAX: Программирование 15 17.08.2006 19:47
Форматирование Excel-документа из Axapta kostas DAX: Программирование 6 14.04.2004 14:52

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход

Рейтинг@Mail.ru
Часовой пояс GMT +3, время: 14:11.