Выбор нескольких рядов в MSFlexGrid

[dr-vic]

В описаниях я не нашел описания работы MSFlexGrid с выделением нескольких рядов. То есть, свойство .RowSel возвращает только последний выделенный ряд. А хотелось бы, чтоб возвращалось выделение с... по... Сам я пользуюсь таким кодом отлавливая событие SelChange:
Код:

Private selStart As Integer, selEnd As Integer

Private Sub FGrid1_SelChange()
Dim vInt As Integer
With FGrid1
If .RowSel = selEnd + 1 Then
selEnd = .RowSel
ElseIf .RowSel = selEnd - 1 Then
selEnd = .RowSel
ElseIf .RowSel = selStart - 1 Then
selStart = .RowSel
Else
selEnd = .RowSel
selStart = .RowSel
End If
If selEnd < selStart Then
vInt = selStart
selStart = selEnd
selEnd = vInt
End If
End With
End Sub

Может кто-нибудь подскажет более эстетичное решение? Да и сам код работает не всегда корректно...
Заранее благодарен.

[tyomitch]

RowSel и ColSel возвращают один угол выделения, Row и Col - другой.

[dr-vic]

Tyomitch, или ты меня не понял, или я тебя. Есть грид, у которого выставлено SelectByRows. Зажимаешь шифт и ползешь по гриду. Получается выделение на несколько рядов. Причем RowSel и
Row совпадают. Причем тут углы?

[Leon_]

Выделять несколько строк можно и не исплзуя Shift, просто мышью.
А позиции начальной и последней выделенной строк и есть Row и RowSel -- твои selStart и selEnd.

[dr-vic]

Нет, господа, подождите. Есть выделение, деланное не важно как - мышью или шифтом. Курсор смещается (без изменения выделения), .row изменяется, .rowSel остается прежним, а в этом случае как получить selBegin?

[soljen]

Доброго времени суток!

Я вот ято-то вообще ничего не понял что ребуется получить!
Объясните ПЛЗ поподробнее!

Заранее благодарен!