Вопрос по TrueDBGrid - VB
Формулировка задачи:
Допустим на форме есть грид с колонками Цена и Количество (соотв. поля из рекордсета price и qty) с возможностью изменять значения ячеек прямо из грида.
Есть другая колонка Сумма (unbound column). Все сделано в соответствии с документацией по гриду:
Private Sub myGrid_UnboundColumnFetch(Bookmark As Variant, ByVal col As Integer, Value As Variant)
rslClone.Bookmark = Bookmark
Value = rslClone!qty * rsClone!price
End Sub
Вопрос: как сделать чтобы значение в ячейке Сумма изменялось после смены текущей ячейки (а не строки), т.е. изменяется Цена или Количество и при передвижении крсора на другое поле нужно чтобы изменилось значение ячейки Сумма?
Есть другая колонка Сумма (unbound column). Все сделано в соответствии с документацией по гриду:
Private Sub myGrid_UnboundColumnFetch(Bookmark As Variant, ByVal col As Integer, Value As Variant)
rslClone.Bookmark = Bookmark
Value = rslClone!qty * rsClone!price
End Sub
Вопрос: как сделать чтобы значение в ячейке Сумма изменялось после смены текущей ячейки (а не строки), т.е. изменяется Цена или Количество и при передвижении крсора на другое поле нужно чтобы изменилось значение ячейки Сумма?
Решение задачи: «Вопрос по TrueDBGrid»
textual
Листинг программы
<font color="00AA00">'Так</font> <font color="blue">Private</font> <font color="blue">Sub</font> TDBGrid1_RowColChange(LastRow <font color="blue">As</font> Variant, <font color="blue">ByVal</font> LastCol <font color="blue">As</font> <font color="blue">Integer</font>) TDBGrid1.Update <font color="blue">End</font> <font color="blue">Sub</font>
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д