Benutz das OnAdvancedCustomItemDraw (jaja oder so ähnlich halt). Das liefert dir das Item in der Parameterliste gleich mit, über die Property Level kannst du dann ja die Ebene abfragen.
Delphi-Quellcode:
procedure TreeView1.OnAdvancedCustomItemDraw(...);
begin
if Item.Level = 0 then
Sender.Canvas.Font.Style := [fsBold] else
Sender.Canvas.Font.Style := [];
end;