Здравствуйте. Не могу понять... Мне нужно добавлять папку в директорию и давать пользователю редактировать ее, как все привыкли в обычном проводнике. С showmessage почему-то все замечательно работает, а без них фокус не ставится, либо ставится совсем не туда, либо вылетает ошибка.

Ответ должен быть прост, но я уже сломал голову. Спасибо заранее.

Обновлять список не пробовал?
Так надо чтоб так было?

А у меня работает.И без SetFocus работает.

Вот эта строчка IncludeTrailingPathDelimiter гораздо лучше того, как я извращался, чтобы не было ошибки с разделителями  
Уже намного лучше, но почему-то все равно редактирование не включается, вот после этого

Все работает как надо) Пробовал вставлять Refresh - ситуация не меняется...

Это сообщение отредактировал(а) neweraser - 2.4.2012, 15:28

Непонятно, что именно не работает?
Я вот тут набросал по клику на кнопке всё работает, или я что-то неправильно понимаю? Как надо-то?


Присоединённый файл ( Кол-во скачиваний: 12 )
 NewFolder.rar 532,66 Kb

Спасибо, тут совсем по-другому и работает как надо, я без функции делал, по идее все было верно, но загвоздка либо в делфях 7-ки портейбл, либо в моих руках или и в том и другом... если не затруднит, напишешь комментарии к функции? Там что-то много нового для меня. И вообще за день влиться в делфи после года-полтора как-то напряжно   Еще раз спасибо, буду дальше разбираться с утра.
И заваливать форум непонятными вопросами   

Ну не сказал бы что совсем по другому, просто разные объекты пространства имен оболочки могут частично ссылаться на одни и те же объекты файловой системы. Так корневой объект Shell Namespace'a Desktop (рабочий стол) частично содержит дочерние элементы физической папки C:\Users\<User>\Desktop, для которой тоже есть объект оболочки. ShellTreeView он на то и Shell* что отображает иерархию объектов оболочки. При этом если создать папку на рабочем столе, то она появится дочерним элементом как у одного объекта, так и у другого. Собственно у меня обновляется тот узел дерева, который выделен, поэтому создается впечатление, что папка появляется именно там, где нужно. Функция FindNodeWithText взята из недр DelphiWorld'a находит новую созданную папку (перебирает дочерние элементы узла TreeView и при совпадении имен возвращает ссылку на этот узел), и мы выделяем её для редактирования имени. 
При этом первый If на случай если выделенный узел в TreeView является виртуальной папкой (Сетевое окружение, Мой компьютер, Панель управления и т.д.), то в этих папках CreateDir по понятным причинам не отработает. Соответственно и выделять нечего. 
SetFocus на TreeView нужен, потому что редактирование имени папки в TreeView как правило завершается нажатием Enter, но без SetFocus'a его принимает Button и из-за этого возникает ошибка (вызывается ещё раз процедура создания папки, но она уже переименована, отсюда и ссылка на несуществующий каталог).
Собственно всё.

Да, возможно этот способ несколько костыльный, в идеале надо бы работать непосредственно с объектами оболочки, но работа с ними это отдельная тема для разговора, и если текущий вариант устраивает, то можно оставить и так.

Спасибо, с предыдущей проблемой разобрался, тут еще...
Суть вопроса изменилась, но новая тема имела бы то же самое название, поэтому не стал создавать.
В OnCreate добавляю к ShellTreeView чекбоксы, есть возможность при выделении каких-либо чекбоксов выделять соответствующие строки в treeview и не снимать фокус (или заново восстанавливать) после рефреша?
Вот код:

Именно строки выделять? В смысле синим подсвечивать?
Тогда наверное придется писать наследника от ShellTreeView и реализовывать в нем мультиселект, как сделано например в этом компоненте: TSelectableTree
Ну а состояния чекбоксов наверное придется самому хранить где-то и после рефреша восстанавливать их. Вот кстати ещё один потомок от TCustomTreeView, в нем реализована работа с чекбоксами у дерева. Тоже можно взять на вооружение. GSCheckedTreeView

А можно как-то таким способом? 


Наверное, циклом перебирать дерево - не лучший вариант, но мне надо попроще и побыстрее, сроки горят 

Ну разве что только не всё дерево обходить, а лишь текущую ноду? Мы ведь только её обновляем, и только у нее чекбоксы сбрасываются...

Согласен, но код все равно не работает. Не подсвечивает синим строки в цикле.. Удерживая control и жмакая лкм в дереве все прекрасно выделяется   

А так?

Так работает, только почему-то иногда выделяет не все строчки (верхняя не подсвечивается), но это не важно, буду разбираться дальше. Спасибо!

Возможно по тому, что верхняя строчка уже выделена на тот момент (Это равносильно тому, как если при нажатом Ctrl кликнуть по выделенной ноде - выделение снимется).