增加显示记录数的label及隐藏refresh按钮

1. 在UniDBgrid的extEvent属性中写入以下代码：

1. function OnAfterCreate(sender)
2. {
3. var toolbar=sender.getDockedItems()[1]; //取出固定在bottom的ToolBar
4. toolbar.items.getAt(10).hide(); //取出ToolBar中的Refresh按钮，序号10,隐藏他
5. //增加一个显示总记录数的tbtext
6. toolbar.add(
7. [{
8. 'id':'pagecount99',
9. 'xtype':'tbtext',
10. 'text': '记录总数:'
11. }
12. ]
13. );
14. }

2.在Delphi中数据集有变化的地方写入类似代码，这里是在uniFormShow事件中：

1. procedure TMainForm.UniFormShow(Sender: TObject);
2. begin
3. ClientDataSet1.Last;
4. UniSession.AddJS(Format('Ext.getCmp("pagecount99").setText("%s");',[' 记录数:'+inttostr(clientdataset1.recordcount)]));
5. end;

实现的效果：增加了显示记录数的label，隐藏了refresh按钮。