¡¡Mostrar Consulta en componente TreeView¡¡

[Iniciante22]

Hola a todos y gracias de antemano por el trabajo que realizan....
Mi interrogante es la siguente....tengo una consulta en un query para mostrar las areas y los roles de una aplicacion de control de acceso a un sistema de inventario....el gerente de proyecto me ha solicitado que mi consulta sea mostrado enTreeView componente que nunca e utilizado e inevestigado pero no estoy clara en como mostrar dicha informacion

Código Delphi [-]
select
u.USUARIO,
p.NOMBRE,
p.ID_PERFILES,
(d.COD_DEPTO  || '  ' ||  d.NOMBRE ) as perfil,
d.ID_DEPTO,
AR.ID_DEPTO,
AR.ID_PERFILES
from PERFILES p,
AREAPORROL ar,
USUARIOS u,
DEPTO d
where p.ID_PERFILES = ar.ID_PERFILES
and d.ID_DEPTO = ar.ID_DEPTO
and ar.ID_USUARIO = u.ID_USUARIO
and u.ID_USUARIO = :Usuario

Lo que tengo que hacer es mostrar en sus items principales los departamentos asociados a ese usuario y en los subitems los perfiles igualmente asociados a ese departamento....
ojala puedan ayudarme y gracias por la atencion prestada