Убрать полосы прокрутки на FormTableControl

[samolalex]

Здравствуйте!
Появился следующий вопрос - есть ли возможность скрыть полосы прокрутки на таблице (FormTableControl)? Есть впечатление, что это невозможно реализовать стандартными средствами Axapta, но все же может имеется какое-нибудь решение?

[lev]

Цитата:

Сообщение от samolalex

Здравствуйте!
Появился следующий вопрос - есть ли возможность скрыть полосы прокрутки на таблице (FormTableControl)? Есть впечатление, что это невозможно реализовать стандартными средствами Axapta, но все же может имеется какое-нибудь решение?

а зачем скрывать полосу прокрутки? вы хотите показать фиксированное кол-во строк \ столбцов?

[samolalex]

Цитата:

Сообщение от lev

а зачем скрывать полосу прокрутки? вы хотите показать фиксированное кол-во строк \ столбцов?

Это просьба пользователей. Да, число столбцов и строк будет постоянным.

В таблице отображаются данные двумерного массива, выбрал этот контрол из-за возможности указания подписей (label'ов) как строк, так и столбцов. Конечно, если бы у ListControl'a была бы такая же возможность (label'ы строк), то предпочел бы его.

[lev]

а контрол Table пробовали?

[samolalex]

Цитата:

Сообщение от lev

а контрол Table пробовали?

Так ведь FormTableControl это и есть Table, я про него и спрашивал.

[lev]

Цитата:

Сообщение от samolalex

Так ведь FormTableControl это и есть Table, я про него и спрашивал.

точно, приношу свои извинения, почему то подумал что вы про грид.
такой вопрос, там же можно указать фиксировано сколько надо отображать строк а сколько колонок. если они не влезают все на форму, то полосы прокрутки становятся активными. что в этом плохого?
возможно задача стоит в указании "правильных" размеров в отображаемой форме?

[samolalex]

Цитата:

Сообщение от lev

такой вопрос, там же можно указать фиксировано сколько надо отображать строк а сколько колонок. если они не влезают все на форму, то полосы прокрутки становятся активными. что в этом плохого?
возможно задача стоит в указании "правильных" размеров в отображаемой форме?

Я в этом плохого ничего не вижу. Дело в том, что пользователи хотят, чтобы полос не было видно вовсе (как активных, так и неактивных), пока таблица вмещается в дизайн формы, и появлялись в том случае, когда размеры таблицы превышают размеры формы. Для примера tutorial_Form_ListControl_CheckBox в Axapta 3 - если установить RadioButton в Report и уменьшить размеры формы, там как раз появляются скроллы. Но на этой форме используется ListView, в котором, как я понимаю, нельзя поставить подписи строк.

[Ivanhoe]

Сорри, не удержался. А пользователи не хотят, случайно, окошки не "крестиком" закрывать, а, например "плюсиком"?

Чем аргументируют пользователи свою хотелку? Спонсор проекта знает, во сколько ему обходится ваше время на решение данной конкретной задачи?

[Gustav]

Цитата:

Сообщение от samolalex

Это просьба пользователей. Да, число столбцов и строк будет постоянным.

В таблице отображаются данные двумерного массива, выбрал этот контрол из-за возможности указания подписей (label'ов) как строк, так и столбцов. Конечно, если бы у ListControl'a была бы такая же возможность (label'ы строк), то предпочел бы его.

Возьмите ActiveX OWC Spreadsheet. Там и полосы прокрутки можно скрывать, и диапазон ячеек фиксировать, чтобы пользователь не "уехал" за пределы зоны отображения, и свои заголовки (в отличие от обычного Excel) задавать для строк и колонок.

P.S. Для ознакомления с возможностями этого подхода нарисуйте Spreadsheet на листе Excel (http://www.axforum.info/forums/blog.php?b=48), а потом выполните такой код VBA (взят из оригинального хелпа с небольшой добавкой от меня):

Sub Create_Datasheet()

    Dim hdrColHeadings
    Dim hdrRowHeadings
    Dim wndActive
    Dim Spreadsheet1 As OWC10.Spreadsheet
    
    Set Spreadsheet1 = ActiveSheet.OLEObjects(1).Object

    Set wndActive = Spreadsheet1.ActiveWindow

    ' Hide various UI elements.
    wndActive.DisplayWorkbookTabs = False
    Spreadsheet1.DisplayToolbar = False

    ' Display the title bar and set it's caption.
    Spreadsheet1.DisplayTitleBar = True
    Spreadsheet1.TitleBar.Caption = "Revenue Worksheet"

    ' Resize the spreadsheet component.
    Spreadsheet1.AutoFit = True

    ' Limit the viewable range of the active sheet.
    wndActive.ViewableRange = "A1:D5"

    ' Set a variable to the column headings in the active window.
    Set hdrColHeadings = wndActive.ColumnHeadings

    ' Set a variable to the row headings in the active window.
    Set hdrRowHeadings = wndActive.RowHeadings

    ' Set the headings of columns A through D.
    hdrColHeadings(1).Caption = "Qtr 1"
    hdrColHeadings(2).Caption = "Qtr 2"
    hdrColHeadings(3).Caption = "Qtr 3"
    hdrColHeadings(4).Caption = "Qtr 4"

    ' Set the headings of rows 1 though 5.
    hdrRowHeadings(1).Caption = "1996"
    hdrRowHeadings(2).Caption = "1997"
    hdrRowHeadings(3).Caption = "1998"
    hdrRowHeadings(4).Caption = "1999"
    hdrRowHeadings(5).Caption = "2000"
End Sub

[lev]

в общем в FormTableControl похоже такой возможности нет (по крайней мере я такого не знаю).
да и не надо это. ИМХО. скорее всего пользователи хотят сделать из аксапты какую то другую программу, потому что им так привычно

Цитата:

Сообщение от Ivanhoe

Сорри, не удержался. А пользователи не хотят, случайно, окошки не "крестиком" закрывать, а, например "плюсиком"?

Чем аргументируют пользователи свою хотелку? Спонсор проекта знает, во сколько ему обходится ваше время на решение данной конкретной задачи?

полностью согласен!

[samolalex]

Спасибо всем за мнения и советы по поводу реализации моей задачи, буду использовать их для дальнейшего принятия решения. Главное, что я убедился в нетривиальности задачи, что изначально и предполагал.

[AndyD]

Можно так

public void run()
{
    #winapi
    #define.GWL_STYLE           (-16)
    #define.SWP_FRAMECHANGED    (0x0020)
    int                         long;
    int setWindowLong(HWND _HWND, int _nIndex, int _dwNewLong)
    {
        DLL         DLL;
        DLLFunction DLLFunction;
        ;
        DLL = new DLL("user32");
        DLLFunction = new DLLFunction(DLL,'SetWindowLongA');
        DLLFunction.arg(ExtTypes::DWord, ExtTypes::DWord, ExtTypes::DWord);
        DLLFunction.returns(ExtTypes::DWord);

        return DLLFunction.call(_HWND, _nIndex, _dwNewLong);
    }
    ;
    super();

    long  = WinApi::getWindowLong(TableControl.hWnd(), #GWL_STYLE);
    long = long & ~(#WS_VSCROLL + #WS_HSCROLL);
    setWindowLong(TableControl.hWnd(), #GWL_STYLE, long);

    winapi::setWindowPos(TableControl.hWnd(), 0, 0, 0, 0, true, true, #SWP_NOMOVE | #SWP_NOSIZE | #SWP_FRAMECHANGED );
}

Замечу, что это код метода run() формы - в super() происходит аналогичная установка в коде ядра.

Только при изменении размера контрола это будет не очень красиво отрисовываться - скроллбары появляются с задержкой.

[Gustav]

Цитата:

Сообщение от samolalex

Спасибо всем за мнения и советы по поводу реализации моей задачи, буду использовать их для дальнейшего принятия решения. Главное, что я убедился в нетривиальности задачи, что изначально и предполагал.

Главное, помните о том, что пользователи, осознанно или нет, в 95 % процентов случаев имеют в виду "как в Excel". Вот увидите, следующим их желанием будет копирование вашей таблички по Ctrl+C

[samolalex]

Цитата:

Сообщение от Gustav

Вот увидите, следующим их желанием будет копирование вашей таблички по Ctrl+C

Да уж, это было бы ужасно