Cambiar la fuente a un solo Item de un TreeView!

[fide]

Hola amiogos. Mi problema es el siguiente. Existe alguna forma de por ejemplo, poner un item de un treeview en negrita, mientras los demas se quedan con la fuente normal???

Es que sucede lo siguiente

+ Nombre de cuenta
      - Entrada
      - Enviados
      - Borradores
      - Papelera

Esa es la estructura basica de mi correo, es decir de las carpetas que hay ahi. Pero el Item Padre, que es el nombre de la cuenta de correo, ese Item en especifico necesito ponerlo con la fuente en negrita!

Como lo puedo lograr he???
Gracias desde ya por si me sacan de este apuro!

[keyboy]

Usa el evento OnCustomDrawItem del TreeView. Por ejemplo,

Código Delphi [-]
procedure TForm1.TreeView1CustomDrawItem(
  Sender: TCustomTreeView;
  Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
  with Sender as TTreeView do
    if Node.Level = 0 then
      Canvas.Font.Style := Canvas.Font.Style + [fsBold];
end;

Esto lo que hace es poner en negritas el texto de cualquier nodo a nivel cero, que creo, es lo que necesitas. En cualquier caso, el punto es que el parámetro Node es el nodo que se está pintando y puedes acceder a sus propiedades para determinar qué nodo es y saber cómo pintarlo.

Bye

[fide]

Oyeme, muchas gracias por tu ayuda keyboy. A la verdad que es justo eso lo que necesitaba!

Muchas gracias!