Значение ячейки True DBGrid - VB

Формулировка задачи:

Прошу помочь с определением значения в какой-либо ячейки выбранной строки в True DBGrid.Если в MSHFlexGrid все определялось просто, путем хх= MSHFlexGrid1.TextMatrix(.Row, 0), то в True DBGrid ищу-ищу - никак не найду.

Решение задачи: «Значение ячейки True DBGrid»

textual
                            Листинг программы 
                        

                            [/SRC]<font color="blue">Private</font> <font color="blue">Sub</font> TDBGrid1_MouseUp(Button <font color="blue">As</font> <font color="blue">Integer</font>, Shift <font color="blue">As</font> <font color="blue">Integer</font>, _
                                  X <font color="blue">As</font> <font color="blue">Single</font>, Y <font color="blue">As</font> <font color="blue">Single</font>)
        
         igColumn = TDBGrid1.ColContaining(X)
         igRow = TDBGrid1.RowContaining(Y)
             <font color="blue">If</font> igRow >= <font color="darkblue"><b>0</b></font> <font color="blue">Then</font>
         vargBookmark = TDBGrid1.RowBookmark(igRow)
<font color="blue">On</font> <font color="blue">Error</font> <font color="blue">Resume</font> <font color="blue">Next</font>

TDBGrid1.Columns(<font color="darkblue"><b>2</b></font>).CellValue(vargBookmark)
DTstrok = TDBGrid1.Columns(<font color="darkblue"><b>0</b></font>).CellValue(vargBookmark)

<font color="blue">End</font> <font color="blue">If</font>

      <font color="blue">End</font> <font color="blue">Sub</font>

[SRC vba]
                        