blocks|key|978821|text|根据Vcl.DBCtrls.TDBNavigator.OnClick|type|unstyled|depth|inlineStyleRanges|offset|length|style|CODE|entityRanges|data|978822|在执行操作后单击数据库导航器上的按钮时发生。
使用OnClick事件处理程序编写响应单击事件的代码。因为导航器上的按钮已经具有单击时发生的默认操作，因此不必编写OnClick事件处理程序。
注意事项：在单击按钮的默认操作之后发生OnClick事件。|blockquote|BOLD|978823|所以:不，你不需要自己做任何动作。或者更准确地说:已经太晚了。|978824|根据导航按钮的文档，使用"Post“并不意味着任何记录移位。|978825|entityMap|0|LINK|mutability|MUTABLE|url|https://docwiki.embarcadero.com/Libraries/Sydney/en/Vcl.DBCtrls.TDBNavigator.OnClick|1|https://docwiki.embarcadero.com/RADStudio/Sydney/en/Navigating_and_Manipulating_Records^0|2|W|2|W|0|0|P|7|28|7|2N|4|36|7|0|0|2|7|1|0^^$0|@$1|2|3|4|5|6|7|X|8|@$9|Y|A|Z|B|C]]|D|@$9|10|A|11|1|12]]|E|$]]|$1|F|3|G|5|H|7|13|8|@$9|14|A|15|B|I]|$9|16|A|17|B|I]|$9|18|A|19|B|I]|$9|1A|A|1B|B|I]]|D|@]|E|$]]|$1|J|3|K|5|6|7|1C|8|@]|D|@]|E|$]]|$1|L|3|M|5|6|7|1D|8|@]|D|@$9|1E|A|1F|1|1G]]|E|$]]|$1|N|3|-4|5|6|7|1H|8|@]|D|@]|E|$]]]|O|$P|$5|Q|R|S|E|$T|U]]|V|$5|Q|R|S|E|$T|W]]]]

As per <a href="https://docwiki.embarcadero.com/Libraries/Sydney/en/Vcl.DBCtrls.TDBNavigator.OnClick" rel="nofollow noreferrer">the documentation for <code>Vcl.DBCtrls.TDBNavigator.OnClick</code></a>:
<blockquote>
Occurs when a button on the database navigator is clicked, after the action is executed.
Use the OnClick event handler to write code that responds to the click event. Because the buttons on the navigator already have default actions that occur when they are clicked, it isn't necessary to write an OnClick event handler.
Note: The OnClick event occurs after the default action for the clicked button.
</blockquote>
So: no, you don't need to do any action yourself. Or more precisely: it will be too late already.
As per <a href="https://docwiki.embarcadero.com/RADStudio/Sydney/en/Navigating_and_Manipulating_Records" rel="nofollow noreferrer">the documentation for the navigation buttons</a> using &quot;Post&quot; does not imply any record shift.

blocks|key|1435572|text|另一个答案中引用的文档是正确的，但没有提供任何关于DBNavigator工作方式的洞察。DBNavigator操作仅仅反映了TDataSet的默认操作。|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1435573|每当TDataSet准备执行导航操作(即移动跟踪活动记录的逻辑游标)时，它就调用其CheckBrowseMode方法。|1435574|procedure+TDataSet.CheckBrowseMode;
begin
++CheckActive;
++DataEvent(deCheckBrowseMode,+0);
++case+State+of
++++dsEdit,+dsInsert:
++++++begin
++++++++UpdateRecord;
++++++++if+Modified+then+Post+else+Cancel;
++++++end;
++++dsSetKey:
++++++Post;
++end;
end;|code-block|syntax|javascript|1435575|撇开dsSetKey状态不谈，只有当数据集的状态是dsEdit或dsInsert时，才会这样做。如果是，则调用UpdateRecord将对dataset字段所做的任何更改写回dataset的活动缓冲区。|1435576|如果(但仅限于)调用UpdateRecord将导致设置dataset的修改标志，则CheckBrowseMode将调用其Post方法，否则将调用Cancel，从而放弃任何更改。将修改设置为true的唯一方法是通过TDataLink后代操作将dataset的字段连接到数据库感知控件(如TDBEdits+)。|1435577|重要的是要理解是对Post的调用保存了任何更改，并且无论是什么触发了对CheckBrowseMode的调用都会发生这种情况。其中一个这样的触发器，但只有一个，是dBNavigator的导航按钮之一，被点击的nbFirst、nbPrior、nbNext、nbLast。|1435578|CheckBrowseMode的操作还解释了如果您立即单击nbInsert、nbFirst、nbPrior、nbNext或nbLast会发生什么，即默认情况下，“插入”记录被放弃。|1435579|entityMap^0|0|0|0|0|0|0|0^^$0|@$1|2|3|4|5|6|7|S|8|@]|9|@]|A|$]]|$1|B|3|C|5|6|7|T|8|@]|9|@]|A|$]]|$1|D|3|E|5|F|7|U|8|@]|9|@]|A|$G|H]]|$1|I|3|J|5|6|7|V|8|@]|9|@]|A|$]]|$1|K|3|L|5|6|7|W|8|@]|9|@]|A|$]]|$1|M|3|N|5|6|7|X|8|@]|9|@]|A|$]]|$1|O|3|P|5|6|7|Y|8|@]|9|@]|A|$]]|$1|Q|3|-4|5|6|7|Z|8|@]|9|@]|A|$]]]|R|$]]

The documention, as quoted in the other answer, is correct but does not provide any
insight into how the DBNavigator works. The DBNavigator actions merely reflect the default operation
of TDataSet.
Whenever a TDataSet prepares to perform a navigation action (i.e. moves the logical cursor which tracks the active record),
it calls its CheckBrowseMode method
<pre><code>procedure TDataSet.CheckBrowseMode;
begin
 CheckActive;
 DataEvent(deCheckBrowseMode, 0);
 case State of
 dsEdit, dsInsert:
 begin
 UpdateRecord;
 if Modified then Post else Cancel;
 end;
 dsSetKey:
 Post;
 end;
end;
</code></pre>
Leaving aside dsSetKey state, this only does anything if the dataset's state is dsEdit or dsInsert. If it is, it calls UpdateRecord
to write any changes which have been made to the dataset's fields back to the dataset's active buffer.
If, but only if, calling UpdateRecord results in the dataset's Modified flag being set, CheckBrowseMode
calls its Post method, otherwise it calls Cancel which abandons any changes. The only way that Modified will be set to true is by the operation of TDataLink descendants connecting the dataset's fields to db-aware controls such as TDBEdits.
It is important to understand that it is the call to Post which saves any changes and that
this occurs regardless of what triggered the call to CheckBrowseMode. One such trigger, but only one,
is one of the dBNavigator's navigation buttons, nbFirst, nbPrior, nbNext, nbLast, being clicked.
CheckBrowseMode's operation also explains what happens if you click nbInsert immediately followed
by nbFirst, nbPrior, nbNext or nbLast, namely that by default, the &quot;inserted&quot; record is abandoned.

With the <code>TDBNavigator</code> correctly connected, and without code in the <code>OnClick</code> event it is working as expected. Where I get understanding problems is when I put code in the event:
<ul>
<li><code>nbInsert</code>: Will the INSERT be done or do I have to do it through code?</li>
<li><code>nbPost</code>: Do I have to do it through code or is the post done anyway?</li>
</ul>
When the post is done the record will go up to the next record - is that right?

DBNavigator OnClick event

翻译质量差，导致语言生硬或混乱。

没有提供实际的解决方法或示例。

解答不清晰，无法理解或解决问题。

页面排版不美观，阅读体验差。

文章

问答

视频

学习中心

腾讯云实验室

直播

竞赛

腾讯云代码分析专区

腾讯iOA零信任安全管理系统专区

腾讯云架构师技术同盟交流圈

腾讯云数据库专区

腾讯云顾问专区

腾讯云原生专区

腾讯混元专区

腾讯云TCE专区

腾讯云Lighthouse专区

腾讯云HAI专区

腾讯云Edgeone专区

腾讯云存储专区

腾讯云智能专区

腾讯轻联专区 

腾讯云开发专区

TAPD专区

腾讯轻量云游戏服专区

腾讯云最具价值专家

腾讯云架构师技术同盟

腾讯云创作之星

腾讯云开发者先锋

腾讯云代码助手

云原生构建

TAPD 敏捷项目管理

Cloud Studio

SDK中心

API中心

命令行工具

涵盖代码开发、场景应用、自动测试全流程，助你从零构建专属AI助手

一站式MCP教程库，解锁AI应用新玩法

如果TDBNavigator正确连接，并且没有OnClick事件中的代码，它将按预期工作。我理解问题的地方是当我在事件中放入代码时：nbInsert：插入是完成还是必须通过代码完成？nbPost：我是要通过代码来完成这个任务，还是不管怎么说，帖子都写完了？当发布完成后，记录将上升到下一个记录--对吗？

问DBNavigator OnClick事件
EN

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问DBNavigator OnClick事件EN