Пробовал через TreeView1Collapsing
Код:
if TreeView1.Tag=1 then begin
AllowCollapse:=false;
TreeView1.Tag:=0;
end;
тег устанавливаю в TreeView1DblClick: if qnode.Expanded then TreeView1.Tag:=1;
Но это как-то "не по феншую" и работает коряво - через раз: вроде бы и блокирует сворачивание, но пропускает первый клик по значку ноды и при чередовании кликов по значку и двойного по ноде тоже позволяет свернуть ноду двойным кликом. Может кто подскажет более рабочий и правильный способ?