移动记录

 

网格中移动记录：

Sub btnFirst_Click()

  MainGrid.SetFocusRow (maingrid.GetFixedRowCount )

End Sub

 

Sub btnLast_Click()

  MainGrid.SetFocusRow (maingrid.GetFixedRowCount + mainGrid.GetRecordCount-1)

End Sub

 

Sub btnNext_Click()

  MainGrid.SetFocusRow (maingrid.GetFixedRowCount + mainGrid.GetCurRecordIndex + 1)

End Sub

 

Sub btnPre_Click()

  MainGrid.SetFocusRow (maingrid.GetFixedRowCount + mainGrid.GetCurRecordIndex - 1)

End Sub