DBNavigator的控制(100分)

  • 主题发起人 主题发起人 rdm
  • 开始时间 开始时间
R

rdm

Unregistered / Unconfirmed
GUEST, unregistred user!
要求做到:点击dbnavigator的确认按钮(nbpost),首先执行自己的判断程序,然后
能根据判断结果再执行nbpost操作或不执行nbpost操作。
 
自己做组按钮吧!
 
用(TABLE,QUERY)的BEFOREPOST事件
 
如l2000所言
在onBeforPost事件中写
if your 条件不满足 then abort;
 
dbnavigator.click()事件中,对单击的按钮进行判断!
 
table的before post事件。
 
自己模拟哪个导航按钮嘛!
 
我觉得还是自己做个导航navigator,一来不难,二来有个性。
 
procedure TForm1.DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);
begin
If Button=nbPost Then
Begin
...;
End
Else
Begin
...;
End;
end;
 
有两种方法:
1:重载DBNavigator控件
2:自己做组按钮,然后在按钮事件添加对应的代码,并实现你想要的控制,如:
DBNavigator1.BtnClick(nbFirst);
DBNavigator1.BtnClick(nbPrior);
……
 
1、在onBeforPost事件中处理
2、自己编写一个,如果水平不是很低的话,肯定做的比DBNavigator要好(尤其是界面)
 
在DATESET(table,query)的beforepost事件中判断就行了!
if 满足条件 then
post;
else
abort;
 
多人接受答案了。
 
后退
顶部