DBNavigator有一个Protected的变量Buttons: array[TNavigateBtn] of TNavButton在程序中定义: type TMyDBNavigator=class(TDBNavigator) end;使用TMyDBNavigator(DBNavigator1).Buttons[i]获取DBNavigator1中按钮
if DBNavigator1.Controls[0].Enabled then DBNavigator1.BtnClick(nbpost) //----------nbFirst Button if DBNavigator1.Controls[1].Enabled then DBNavigator1.BtnClick(nbpost) //nbPrior Button if DBNavigator1.Controls[2].Enabled then DBNavigator1.BtnClick(nbpost) //nbNext Button if DBNavigator1.Controls[3].Enabled then DBNavigator1.BtnClick(nbpost) //nbLast Button if DBNavigator1.Controls[4].Enabled then DBNavigator1.BtnClick(nbpost) //nbInsert Button // 以此类推分别为nbDelete,nbEdit,nbPost,nbCancel, nbPost按钮
type
TMyDBNavigator=class(TDBNavigator)
end;使用TMyDBNavigator(DBNavigator1).Buttons[i]获取DBNavigator1中按钮
//----------nbFirst Button
if DBNavigator1.Controls[1].Enabled then DBNavigator1.BtnClick(nbpost)
//nbPrior Button
if DBNavigator1.Controls[2].Enabled then DBNavigator1.BtnClick(nbpost)
//nbNext Button
if DBNavigator1.Controls[3].Enabled then DBNavigator1.BtnClick(nbpost)
//nbLast Button
if DBNavigator1.Controls[4].Enabled then DBNavigator1.BtnClick(nbpost)
//nbInsert Button
// 以此类推分别为nbDelete,nbEdit,nbPost,nbCancel, nbPost按钮