Замена ListView

[justas1507]

Здравствуйте! У меня вот такая проблема - По некоторым причинам не устроил listview control, в связи с чем я ищу ему замену. Единственное до чего самостоятельно додумался - заменить в данном примере listview на обычную форму(в виде таблицы). Но тут возникает другая проблема - сделать так чтобы она заполнялась в соответствии с деревом... Помогите пожалуйста, или посоветуйте. Возможно есть лучшее решение данной проблемы? Если так то нужен пример... Основное требование, чтобы таблицу можно было редактировать, применять что-то подобное Conditional formatting. Да и еще... Есть ли в Access возможность или контрол какой, чтобы разделить в данном примере дерево и таблицу с помощью сплит разделителя, который можно передвигать вправо-влево?
Заранее благодарен.

[Julia_R]

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

Здравствуйте! У меня вот такая проблема - По некоторым причинам не устроил listview control, в связи с чем я ищу ему замену. Единственное до чего самостоятельно додумался - заменить в данном примере listview на обычную форму(в виде таблицы). Но тут возникает другая проблема - сделать так чтобы она заполнялась в соответствии с деревом... Помогите пожалуйста, или посоветуйте. Возможно есть лучшее решение данной проблемы? Если так то нужен пример... Основное требование, чтобы таблицу можно было редактировать, применять что-то подобное Conditional formatting. Да и еще... Есть ли в Access возможность или контрол какой, чтобы разделить в данном примере дерево и таблицу с помощью сплит разделителя, который можно передвигать вправо-влево?
Заранее благодарен.

Здравствуйте! рассмотрите вот такой грид ... http://SoftDbGrid.ru
или vsFlexGrid

[Teslenko_EA]

Здравствуйте justas1507.
для наполнения таблицы соответствующими данными достаточно подредактировать код обработчика, например так:

Private Sub TreeView2_NodeClick(ByVal Node As Object)
    Dim sNode$, s$
    sNode = Node.Key
    s = Left(sNode, 3)
    sNode = Mid(sNode, 4)
    Const sQ = "SELECT * FROM Query1 WHERE "
    Select Case s
    Case "DPT": s = "CategoryID = "
    Case "CLS": s = "GroupID = "
    Case "SUB": s = "SubGroupID = "
    End Select
    s = sQ + s + sNode
    Me.Query1.Form.RecordSource = s
End Sub

похоже источник для Grid'а (запросQuery1) не совсем корректный, да и структура нуждается в корректировке

"..По некоторым причинам не устроил listview.." - просветите пожалуйста, по каким причинам?
Евгений.

[justas1507]

Спасибо, Евгений за помощь Все получилоссь. А по поводу того, что не устроил ListView, мне показалось что он довольно-таки ограничен в своем использовании, т.е. используется только для отображения информации, не более того... А мне необходимо чтобы строки виделялись в зависимости от определенных условий, возможность вводить данные. Я понимаю что скорее всего для этой цели лучше подходит GridView но это для меня как-то сложновато пока...
Да, вопрос - в данном примере что надо сделать, чтобы по клику в таблице открывалась форма с более детальной информацией по продукту?
Заранее спасибо!