Aqui hay un error:
Código Delphi
[-]
procedure TForm1.FormCreate(Sender: TObject);
begin
xxx.NodeDataSize := SizeOf(ptgabinete);
end;
El parámetro a SizeOf no debe ser de tipo puntero, sino el propio tipo registro.
Sustituye
Ptgabinete por
ttgabinete. Al darle información errónea al crear el nodo, es normal que muestre basura. Haciéndolo bien, no da problemas y es rapidísimo.
Tu mensaje anterior (el tocho) no lo he leído, edita el mensaje y añade las etiquetas delphi:
[ delphi ]
tu codigo fuente aqui
[ / delphi ]
(sin los espacios dentro de los corchetes)
Es normal empezar un proyecto y tomar una decisión (porque se desconoce otra forma), algunas veces se queda como está y otras se cambia (depende del tiempo y beneficio que obtengas, en $$ jeje).
Los recursos que toma los editores no lo he mirado mucho, pero es UN solo TEdit el usado. Por otra parte lo que en realidad se crea y destruye al entrar y salir del modo edición, es un objeto que enlaza el VT con el Edit en cuestión).