-Цитата от Лжэц 
-Цитата от Ридл Гатофель Сделал. См. приложение. Если чё, делал на 2009м, так что хз, с 7кой например могут быть проблемы при открытии проекта, но они решаемы достаточно просто если чё. Ну и вместо TNodeData можно использовать просто указатель на строку, но в record в перспективе можно ещё инфы напихать.
спасибо друг теперь понятно.
Показать скрытый текст
заодно и порнуху по ссылке на торенте качну
у нас например дельфи было 2пары в неделю.весь уклон шел в другое русло,сети и т.д.Хотя спецальность техник-программист
Показать скрытый текст
Ну там если чё все ссылочки интересны, я их чисто на правах рекламы разместил
И да, блядь, я очистку память забыл. На OnDestroy формы добавать вот чё:
var
I: Integer;
NodeData: PNodeData;
begin
for I := 0 to TreeView.Items.Count - 1 do
begin
NodeData:= PNodeData(TreeView.Items[I].Data);
if Assigned(NodeData) then Dispose(NodeData);
end;
Как-то так.