在实现Firemonkey绑定对象列表的过程中，我遇到的一些现有教程当中没有提到的细节，分享一下。
1、追加对象
用Navigator插入记录，位置总是在当前记录之前插入，没有在最后追加一个对象的方法。
使用下面的代码，可以在最后添加记录。
Pascal Code
|
1
2 3 4 5 6 7 |
procedure TListItemsEditorDlg.btnAppendClick(Sender: TObject);
begin if AdapterBindSource1.Editing then AdapterBindSource1.Post; FItems.Add(TSimpleListItem.Create); AdapterBindSource1.Refresh; end; |
2、修改GridLine的颜色
默认Style的GridLine颜色太浅，需要加深，使用Edit Default Style修改，运行时出错。
解决办法是，只保留gridstyle
然后修改linefill
将Brush.Color修改为想要的颜色即可。
以下是实际效果：
http://blog.sina.com.cn/s/blog_591968570102w2w3.html