可以响应TTreeview的OnCustomDraw事件和OnCustomDrawItem事件,前一个实现
TreeView本身的定制绘制;后一个实现Treeview中各个Item的定制绘制。可以参看
下面这个小例子。
procedure TForm1.TreeView1CustomDrawItem(Sender: TCustomTreeView;
Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
var Rect:TRect;
begin
Rect:=Node.DisplayRect(true);
Sender.Canvas.Brush.Color:=clRed;
Sender.Canvas.Pen.Color:=clGreen;
Sender.Canvas.TextRect(Rect,0,0,Node.Text);
DefaultDraw:=true;
end;
<p>
如果给我一个期限,我希望是<big><big><blink>一万年</blink></big></big>
</p>