Вот если сейчас (поле ввода пустое или указана несуществующая папка), нажать кнопку "ОК", то ММВ "вылетает" с закрытием и 4-кратным предложением отправить отчет об шибках.
Почему, выбранный пункт дерева каталогов не подставляется автоматически в поле ввода текста (EditBox)?.
И ещё, ММВ-шный диалог выбора цвета устроен криво, поэтому лучше в плагин впихнуть свой собственный.
И, перво-наперво, думать об обработке возможных ошибок ввода данных в плагин, а не об авторских правах!

Чтой-то картинка хреново прикрепляется и не желает отображаться....

Чем дорожу... Чем рискую на свете я....
Мигом одним! Только мигом одним!...

WHITESNAKE St.Petersburg - 11.12.2008

Добавлено (17 Январь 2009, 18:25)
---------------------------------------------
+ ошибка: не удается найти файл "Корзина" и "Сетевое окружение" при их "запуске"
А что, так и должно быть, когда после открытия папки она через мгновение закрывается?

Можно сделать коррекцию внутри плагина, но это потом, да и вообще, зачем тогда ммв, просто чтоли как тело, куда вставляем продукты, совсем отдаленного от ммв производства, попросту говоря, нужно и ммв использовать! Плагин чисто для визуализации каталогов, а не для коррекционных рамок под нужный проект! Но всё же, конечно, плагин и был для того создан, чтобы дать ммв-эшнику новые возможности, потому просто вставьте этот скрипт, возможно он не так надежен (могут не оказаться эти папки там), но что есть пока что
-----------------------------------------------------------------------
как запустить рабочий стол?
пишем просто rfDesktop,
Мой компьютер rfMyComputer

но и скрипт тогда измениться:

.............................
If (yes=1) Then
*** функция возвращает 1, значит существует, значит запускаем
***в противном случае нет!
PluginSet("PlugIn","d$")
PluginRun("PlugIn","dir")
Else
If (d$='rfDesktop') Then
PluginSet("PlugIn","d$")
PluginRun("PlugIn","dir")
Else
If (d$='rfMyComputer') Then
PluginSet("PlugIn","d$")
PluginRun("PlugIn","dir")
Else
***однако проверяем, есть ли такой диск
disc$=d$+'Program Files'
FileExist("disc$","yes")
If (yes=1) Then
***если эта папка существует, тогда и диск тоже!:)
.............................
Delphi в этом компоненте принимает именно такие ссылки на рабочий стол, мой компьютер...
вот еще некоторые, думаю сами догадаетесь, что они открывают:
.....
rfInternet
rfPersonal
rfPrinters
rfPrintHood
rfPrograms
rfRecent
rfSendTo
rfStartMenu
rfTemplates
rfNetwork
rfC ommonDesktopDirectory
.....
те, у кого есть делфи смогут найти все ссылки!
------------------------------
Но для удобства можно сделать "ассациацию":
Например, вводим "Рабочий стол", ОК, скрипт находит это условие, т.е. если Рабочий стол, тогда шлем плагину rfDesktop и запускаем!
------------------------------
думаю не все проблемы решил, а только одну
с уважением, Grand

Гранд! Клади, клади исходники, не стесняйся. мне всё равно делать на работе не фиг, посмотрю. правда, делфи тут нет, но кой-чего посоветую всё же.

Пусть критикуют, ты извлечёшь много полезного. Вот, например, о копирайтах. У as-master'a вроде было даже несколько моих плагинов, которые я никак не подписывал. В других я прикалывался в духе "Для дорогого кореша" и т.д. Поставил ты копирайт, и нормально. А вот что действительно стоило бы убрать - это ужасный машинный перевод на английский.

Добавлено (29 Январь 2009, 16:20)
---------------------------------------------
Вот! Сказали почти одно и то же

Если честно, то не знаю почему эта функция так себя ведет

Для вызова сценария в послед версии ММВ существует обратная связь. а ты, судя по всему, используешь старый SDK!

Добавлено (06 Февраль 2009, 10:30)
---------------------------------------------
Сек, ща посмотрю...

Добавлено (06 Февраль 2009, 10:35)
---------------------------------------------
старый, да. с тех пор сдк изменился. да и вообще, у каждого он свой, сделанный под себя. У меня свой, у Алекса свой...

Добавлено (06 Февраль 2009, 10:35)
---------------------------------------------
так, а демка где?