Delphi - Problema con el TreeView

Hola tengo un problema con el TTreeView y quiero saber si me pueden ayudar, estoy realizando un sistema contable y tengo un plan de cuentas de 5 niveles, en donde cada nivel de cuentas es un SubItem de del TTreeView, mi problema es: ¿Como puedo agregar un SubItem al TTreeView para cada cuenta en sus respectivos niveles?, donde cada nivel de cuenta esta dividido por un punto (.) Ej:1.0.0.00.00, me entienden?
Tengo entendido que tengo que crear modos para luego insertar al TTreeView, pero es que no entiendo mucho de los nodos en delphi, espero que me puedan ayudar y si es con ejemplo mejor.
Tambien quiero saber como puedo agregar una imagen .bmp a mi TTreeView
Estoy trabajando con Base de Datos Interbase 6.5 y Delphi 7, desde ya gracias!!!!!!!!!

Coloca un PoppapMenu, para abrir con el boton derecho del mouse, así tenes rapido acceso a crear nuevos nodos del arbol
Te paso un ejemplo para insertar un nuevo nodo al arbol

Nuevo Nodo:

begin
if tvMenu.Selected = nil then
exit;
{armar el nuevo nivel del nodo}
PosPadre := pInfoNodo(tvMenu.Selected.Data)^.Posicion;
if PosPadre <> '0' then
NuevaPos := PosPadre;
NuevaPos := NuevaPos + IntToStr(tvMenu.Selected.Count + 1) + '.';
{crear el nodo y los datos que lo acompañan}
New(pInfo);
pInfo^.Descrip := '';
pInfo^.Posicion := NuevaPos;

elNodo := tvMenu.Items.AddChildObject(tvMenu.Selected, 'Nuevo Item', pInfo);
{agregar a la base de datos}

if BaseArbol.Active = False then
BaseArbol.Open;
BaseArbol.AppendRecord([NuevaPos, elNodo.Text]);
tvMenu.Selected.Expand(False);
tvMenu.SetFocus;
elNodo.EditText;
end;

Espero te sirva, suerte