DataTreeList问题

hanbei20 · 发表于 2009-11-30 09:24:05

在OnCustomDrawCell事件中根据绑定数据某字段值设置节点的字体颜色，数据库中，父节点的值和子节点的值是一样的，但是显示的时候，子节点的字体颜色改变了，父节点的颜色没有改变，怎么回事啊？

jiahaiming · 发表于 2009-11-30 09:47:10

楼主，这个估计是代码问题。
你调试运行一下吧，看看两条记录的“颜色变更条件”有什么不同。

hanbei20 · 发表于 2009-11-30 09:49:15

procedure TMBSC.DataTreeList1CustomDrawCell(Sender: TObject; ACanvas: TCanvas; ARect: TRect; ANode: TTreeListNode; AColumn: TTreeListColumn; ASelected, AFocused, ANewItemRow: Boolean; var AText: string; var AColor: Integer; AFont: TFont; var AAlignment: TAlignment; var ADone: Boolean);
begin
  if not(ASelected or AFocused) then
  begin
if ANode.HasChildren then
begin
   AColor := $FFFFFF; //设置奇数行颜色
   Exit;
end;
if (ANode.Index mod 2) = 1 then //设置偶数行颜色
   AColor := $FFECDD;
if (ANode.Strings[0] <> '1') And (ANode.Strings[1] <> '1') then
   AFont.Color := $0000FF
else
   AFont.Color := $000000;
  end;
end;
代码就是这样了，数据库里面的数据却是一样的

atiger · 发表于 2009-11-30 10:09:28

你跟踪看了吗？应该是逻辑出问题了，你用“DataTreeList*颜色”在bbs上搜索一下吧

atiger · 发表于 2009-12-4 10:15:24

ok没有呢?楼主

		自动登录	找回密码
密码			立即注册