如何获取dbnavigator上的单个按扭的单击事件?等
日期:2007-01-11 荐:
如何获取dbnavigator上的单个按扭的单击事件?等如何获取dbnavigator上的单个按扭的单击事件?等我想在单击后出一个提示框,谢谢。我等procedure TForm1.DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);begin case Button of nbFirst: ShowMessage('第一条'); nbPrior: ShowMessage('前一条'); nbNext: ShowMessage('后一条'); nbLast: ShowMessage('最后一条'); nbInsert: ShowMessage('插入'); nbDelete: ShowMessage('删除'); nbEdit: ShowMessage('编辑'); nbPost: ShowMessage('提交'); nbCancel: ShowMessage('取消'); nbRefresh: ShowMessage('刷新'); end;end;
标签: