从数据库中提取字段形成树形列表怎么做啊

Delphi 从数据库中提取字段形成树形列表怎么做啊
具体操作是
 数据库表结构
    区域     事业部   项目号    工程号
-------------------------------------------
    北方区    媒体     P001     PN000123
    南方区    非编     PCD523   MSD2456
    ....      ....     ....     ....要求生成的目录结构是
     --按照区域
     -   北方
     -   南方
     -
     - 按照事业部
        --媒体
        --非编
        --....这样的东西应该怎么做啊，，，，