TreeView excepción

[[Lepe]]

una solución sería evitar de alguna manera el drag & drop fuera del "contenedor"

en el dragOver pon : Accept := sender = source;
solo permitirá el arrastrar y soltar dentro del mismo Treeview.

El hecho de que casque es que el elemento seleccionado en el treeview sea nil. Comprueba siempre esa posiblidad:

Código Delphi [-]
if treview1.selected <> nil then //
begin
  treview1.selected.text ===> aqui no hay posible fallo, se puede acceder a Text sin problemas
end

Tienes que hacer esa comprobación tanto para el nodo Origen como Destino de la operacion "arrastrar y soltar"

Para ser más exactos, pon el código de Ondragdrop para localizar el fallo.

Saludos