请问怎么用代码设置dxTreelist控件的行颜色? 请问怎么用代码设置dxTreelist控件的行颜色?找了个dxtreelist的column发现是对列的设置,没有row属性,有个items不过找不到color属性郁闷中在线等高手哈 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TFrm_Treelist.dxTreeList1CustomDrawCell(Sender: TObject; ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode; AColumn: TdxTreeListColumn; ASelected, AFocused, ANewItemRow: Boolean; var AText: String; var AColor: TColor; AFont: TFont; var AAlignment: TAlignment; var ADone: Boolean);beginif ANode.Strings[dxTreeList1Column2.Index] = '12 Arial' then begin AFont.Size := 12; AFont.Name := 'Arial'; end;end; delphi里面的listview怎么改变一行的背景色 如何获得query组件更新记录数? fastreport打印问题,总是重复出现一条数据 添加问题 怎选一个数码相机呀? Rave 高手快来啊~~ 发送哪个消息可使窗口最小化 delphi+串口+EPSON ESC/POS指令写pos打印机程序 OleContainer1打开保存文件的问题 如何令计算机重起?需要哪个API函数? 求助:关于QuickReport中StringsBand的显示控制问题 Timer控件简单问题(高分求解)
ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode;
AColumn: TdxTreeListColumn; ASelected, AFocused, ANewItemRow: Boolean;
var AText: String; var AColor: TColor; AFont: TFont;
var AAlignment: TAlignment; var ADone: Boolean);
begin
if ANode.Strings[dxTreeList1Column2.Index] = '12 Arial' then
begin
AFont.Size := 12;
AFont.Name := 'Arial';
end;
end;