http://www.foxclub.ru/sol/index.php?act=view&id=188

Решение не без глюков, но как работает контекстное меню там есть.

StartLableEdit - это команда, которая говорит, что следует начать редактировавние текста узла. Т.е. это способ начать редактирование текста узла программно . Имеет смысл, при установке

TreeView.LabelEdit = 0 - Automatic

1. Я отвечал на вопрос о TreeView. Имеется в виду, ActiveX компонент Microsoft TreeView.

2. По поводу работы с файлами есть очень хороший объект Scripting.FileSystemObject

Для чтения или изменения имени файла следует воспользоваться методом Name. Пример в синтаксисе FoxPro приведен здесь

http://kodu.neti.ee/~juri4/vfpplus/vbs_fso_04_ru.htm#Name

Solmyrto ВладимирМ.
Я так понимаю, вы ответили в послднем посте не на мой вопрос?
В первом посте ответ на Ваш вопрос. Там нет ничего сложного. Посмотрите во вложении примерчик.

Хотя, более управляемым явялется редактирование через отдельную формочку.

SolmyrАга. Вот теперь работает. Сенкс.
А с меню прикол. Сделал, как ты говоришь, вроде все работает, но перестала закрываться форма. Нажимаю на крестик, он становится серенький, а форма не закрывается. Т.е. зависает. Если убираю код из метода DblClick, все нормально. Кроме отсутствия меню, ест-но.
Что за бред?
Это не бред. Это глюк

Связан с тем, что остались активные объекты Nodes. Точнее, ссылки на эти объекты. Помогает принудительная очистка TreeView перед закрытием формы (ThisForm.MyTree.Clear) или его ручное удаление.

Т.е. в методе Unload-формы нужно написать что-то ворде

SolmyrА скажите, вот с этим HitTest обязательно заморачиваться или все же есть более человеческие пути?
Так ты же обрабатываешь нажатие клавиши мыши. Как иначе можно узнать на какой именно узел внутри TreeView ты надавил? Ведь никаких событий собственно узла еще не происходит, т.е. нельзя привязаться к событию узла.

SolmyrАга, HitTest вставил. Все вроде работает.
Только вот если нажать на один узел правой, а потом на другой тоже правой, не убирая меню от предыдущего нажатия, то фильтрация в гриде справа происходит не всегда, хотя передвижение в таблице каталогов, по которой фильтрация идет, происходит, я отсмотрел. И обновление грида стоит.
Или это правильно?
Правильно. Дело тут в следующем.

Видимо у тебя, как и положено, обновление Grid происходит в событии NodeClick. Но, как я уже заметил выше, событие MouseDown происходит ДО события NodeClick. Более того, в зависимости от обработки, событие NodeClick может вообще не произойти.

Чтобы это обойти, надо первой командой в MouseDown сделать принудительное присвоение:


Здесь This.nTwipX и This.nTwipY - это мои свойства, которые я ввел в TreeView для перевода пикселей в твипы

Правда, в этом случае возможно срабатываение события NodeClick дважды. Но не думаю, что это будет такая уж большая проблема.

SolmyrДа, и еще.
Как сделать, чтобы при открытии формы корневой каталог разворачивался на один уровень?
У меня в Init TreeView стоит:
THIS.Expand(THIS.Nodes(1)).
И ни фига он не разворачивается. Наверно опять что-то не так сделал?
Ты делаешь распространенную ошибку, считая, что узел с индексом 1 - это корневой узел дерева. В общем случае это не всегда так. Т.е. надо определять корневой узел следующим образом

This.Nodes(1).Root

Для раскрытия узла дерева необходимо не вызывать событие, а изменить состояние, которое вызывает это событие. В данном случае - свойство Expanded

This.Nodes(1).Root.Exapnded = .T.

Кроме того, при работе с ActiveX обязательно надо делать глобальную настройку

_VFP.AutoYield = .F.

Solmyrto ВладимирМ.
Друг мой, эту команду можно включить в Main.prg прямо в таком виде, как вы написали?
Имеется в виду

_VFP.AutoYield = .F.

Да. Это глобальная настройка. Не зависит от Private DataSession. Можно назначить один раз при открытии проги.