[Андре]

Посмотри АОТ-> System Documentation -> Classes -> TreeNode

Там внизу есть пример - пишет название всех форм. Тебе маленько переделать и будет то, что тебе нужно.
Если не справишься, то когда будет побольше времени помогу