Телепат 2 (пререлиз) и Опенконф (продолжим 10?) #19616

Выполню в отсутствие именинника ArtBear Его миссию---------------------------------------------------------Начнем 11 ветку о Телепате и Опенконфе - программирование для Конфигуратора, облегчение работы разработчиков 1С!Для тех, кто только что присоединился.---------------------------------------------------------Автор всего этого набора чудес - Александр Орефков---------------------------------------------------------Сабж + скрипты для Опенконф (сайт автора)>Другие плагины/скрипты для Опенконфа можно взять (а также самому положить !!) в Клубе Профессионалов>Предыдущие ветки о Телепате/Опенконфе можно взять на страничке>На итланде.ру есть специальный форум для обсуждения именно Опенконфа и его плагинов (в т.ч. и Телепата)>Если у кого есть что-то интересное для Опенконфа - плагины, скрипты, присылайте мне, я размещу на >Или, что еще лучше, сами выкладывайте свои творения в Клуб Профессионалов в раздел Опенконф>так будет наиболее удобно для всех :)

Выполню в отсутствие именинника ArtBear Его миссию---------------------------------------------------------Начнем 11 ветку о Телепате и Опенконфе - программирование для Конфигуратора, облегчение работы разработчиков 1С!Для тех, кто только что присоединился.---------------------------------------------------------Автор всего этого набора чудес - Александр Орефков---------------------------------------------------------Сабж + скрипты для Опенконф (сайт автора)>Другие плагины/скрипты для Опенконфа можно взять (а также самому положить !!) в Клубе Профессионалов>Предыдущие ветки о Телепате/Опенконфе можно взять на страничке>На итланде.ру есть специальный форум для обсуждения именно Опенконфа и его плагинов (в т.ч. и Телепата)>Если у кого есть что-то интересное для Опенконфа - плагины, скрипты, присылайте мне, я размещу на >Или, что еще лучше, сами выкладывайте свои творения в Клуб Профессионалов в раздел Опенконф>так будет наиболее удобно для всех :)

Выполню в отсутствие именинника ArtBear Его миссию---------------------------------------------------------Начнем 11 ветку о Телепате и Опенконфе - программирование для Конфигуратора, облегчение работы разработчиков 1С!Для тех, кто только что присоединился.---------------------------------------------------------Автор всего этого набора чудес - Александр Орефков---------------------------------------------------------Сабж + скрипты для Опенконф (сайт автора)>Другие плагины/скрипты для Опенконфа можно взять (а также самому положить !!) в Клубе Профессионалов>Предыдущие ветки о Телепате/Опенконфе можно взять на страничке>На итланде.ру есть специальный форум для обсуждения именно Опенконфа и его плагинов (в т.ч. и Телепата)>Если у кого есть что-то интересное для Опенконфа - плагины, скрипты, присылайте мне, я размещу на >Или, что еще лучше, сами выкладывайте свои творения в Клуб Профессионалов в раздел Опенконф>так будет наиболее удобно для всех :)

(Iam) sample.vbs на самом деле 2 штуки было: 1- пример работы с агентом, а 2- как раз с svcsvc.dll

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

посмотри в наборе скриптов от artbear'a. там вроде было что-то подобное

If doc=docWorkBook Then Set doc=doc.Page      If doc<>docText Thenif CheckWindow(doc) = False then exit subif Pos1 = 0 then exit subif Pos2 = 0 then fileName = Mid(doc.Text, Pos1 + 17)

2 спасибо, посмотрю2 тоже спасибо, но ругается на Set NodeObj = CreateObject("wScript.shell"); , чего мне надо установить и где это взять ? ;-)

Заменина Documents.Open Trim(FileName)

вроде работает спасибо, вернее пытается открыть, по текущему пути, а можно как нить привязаться к каталогу текущей ИБ ?и еще можно ли что бы автоматом открывалось , чтобы не нажимать лишних кнопок ?

По текущему можно наверноеDocuments.Open BinDir + Trim(FileName)=================нащёт автомата не знаю

(Lam) вопрос по Интелли:Повесил я хоткей на "Точку", а если я хочу в строке написать так "Счет 62.1", после ввода точки вылазит приглашение что-либо выбрать, но мне не нужно ничего выбирать, я просто хочу поставить точку. Приходится переключаться на инглиш, ставить точку и обратно на рус. Можно канэшно и на др. хоткей повесить, но как то уж привык.

9 Поставь в поле ввода списка точку и нажми Энтер.А что она может предложить выбрать после Счет 62. ???

Так уже пробовал вываливается первая строка "Валюта". Сообщить список выбора?

2 все получилось большое спасибо , только испозовал 'Documents.Open IBDir + Trim(FileName)' , вообще хотелось бы такую штуку по умолчанию например в телепат как опцию .....

11 В версии 1.1.0 при появлении списка можно нажать точку(русскую) и энтер и всё будет нормально.

Версия 1.1.0 нажимаю ентер, получается "Счет 62.Валюта"

А-а-а-а-а, караул, отпиарили в прошлой ветке :)

15)(угрожающе) Это Вы написали dots.vbs который не давал работать? И почему так произошло, а? :)

Конечно, я, он так и был задуман. Мне он лично не дает работать постоянно, если есть какая-то задумка, не могу устоять перед её осуществлением, и работа побоку :)

Вобщето, ИМХО куча диалогов - это sample c демонстрацией возможностей Svcsvc.dll. Так что дядку, сначала посмотрите что за скрипт потом юзайте.(All) Не рекомендую мой скрипт вешать на ГК - "точку".

А не было предупреждения, что "это вредоносная программа"... В пятницу вроде нормально работал, а сегодня... :)

Скрипт писал для себя, дабы облегчить набор текста.Выкладываю с мыслью "может кому пригодится". Меня самого он устраивает на 65 %, т.е. на 25 % есть задумки, которые надо написать и 10% глючки и low скоростЬ.

Да брось, что я не понимаю? А у тебя он тоже кучу менюшек при загрузке выдает? Если нет, то почему?

Он не выдает, пока невызовешь процедурину WordOfCaretДумаю переписать в 3-й раз заново, опять начались "глюки объема".Не качайте полз, пока.

Создатель молчит, либо сильно занят, либо готовит бомбу :)

Спрошу ка еще раз, есть ли инструментик для парсинга *.mxl?Выгружать во внешний файл из workbooka не проблема, а вот парсить сей бинарик руки не доходят. Хочу извлечь из сего чуда вертикальные и горизонтальные секции, для подстановки в строки типа Таб.ВывестиСекцию; и Таб.ПрисоединитьСекцию;Заготовку - консольное приложение, принимающие в параметрах входной и выходной файлик сделал, а дальше что-то руки не поднимаются :(

Обновил скрипт. Добавил описание.Из новенького:+ частично научил распознавать "место вызова" - )    вызывается в 1-м параметре  все вышесказанное справедливо для англоязычных синонимов методов

скажите мне, есть ли в природе или можно такое в принципе сделать чтобы по двойному клику или хоткею на форме (кнопке, тексте, ...) открывались не "Свойства" а модуль с переходом к процедуре которая задана в формуле ...как в делфях...в диалог-стриме же есть название этой процедуры/функции.....???

Сам о подобном давно думаю.ИМХО пока нельзя, потому что нет возможности определить активный контрол на форме или даже активный слой :(

с пришествием в онлайн...как ветку оформили? нормально?.... )))уверен, Александр что нибудь придумает по этому поводу...(про активный элемент)

Вроде нормально.Можно попробовать, конечно, активный элемент поискать через ВинАПИ (работа с окнами).

Внимательно изучи .ЗЫ ведь специально пишется :(

(to artbear)будь добр стукнись в аську 97718371 (есть несколько вопросов)

Скажи, пожалуйста, что за ошибка:"Инструкция по адресу "0х27581771" обратилась к памяти по адресу "0х27581771". Память не может быть "read".". Вылазит, когда открыто много баз, а потом поочередно закрываю. ОС WinXP, памяти 397 Mb. ОпенКонф 1.0.1.7, Телепат v2.0.0.0o

... "много баз" - это 5 баз

Возможно, виноват какой-то плагин.И вполне вероятно, что это мой плагин "История".

Да, есть такой плагин. Выключить?

Как хочешь. Плагин мой, за исключением пары несущественных глюков (один как раз твой) работает нормально.Пока меня устраивает.Если тебе не нужен его функционал, удаляй :(

Не далал никто скрипт "Сохранения конфы без модальных окошек"?Чтоб по нажатии кнСохранитьКонфу (Дисктека нарисована) на всех модальных окошках нажималось OK, а их текст слался в Message (подобно тому как в AutoSave, только при ручном нажатии кнЗаписать)

Плагин-то прикольный, просто я думаю может еще каким-нибудь "раком" выползет, а я буду грешить на другое :-)

40 - Это точно history...(

И еще вопрос не по существу. Artbear и artbear - это разные люди?

Если будешь дорабатывать свой плагин "История" то сделай плиз возможность выделения нескольких строк чтоб при удалении сразу кучу ненужных эл-тов удалить. а то влом одно и то же действие делать. и еще периодически появляются записи след. вида: "C:DOCUME`1....Temp*.tmp" возможно ли сделать их автоматическое удаление , например при нажатии кнопки "Удалить" они удалялись?

Один я :)

А зачем из истории что-то удалять?Для истории у меня в TODO:деление по группам (например, видам);фильтрация (как в "Методах модуля" от Александра);сохранение/восстановление закладок для файлов;естественно, устранить баги.Но вопрос времени (:

Посмотри autoload.vbs - там всё что надо есть.

(45+) опечатался: нужносохранение/восстановление закладок для любых открытых модулей;

+43 Хочу еще историю открытых "Форм настроек доков и спр-ков" (те, которые по дабл-клику в дереве открываются...)

46! А как отловить момент, когда пользователь нажал "Дисктетку". Что-то запись вызывать отдельным скриптом не хочется, привык: ^S | F11 - enter.

уже много раз писали, нельзя это пока сделать, НЕЛЬЗЯ :(многие сидят, с нетерпением ждут этого функционала.

ну например посмотрел какие-нибудь модули,внешние файлы и все они мне больше не нужны в истории. ну ты же и кнопочку "Удалить" сделал. :)

Orefkov!При работе над несохраненной конфой поменял кол симв., с кот. "подсказывать" Телепатом с 1 на 5. Он 1 раз подсказал, другой долго думал и обвалил (( конфигуратор, вот!PS: Win2K, Telepat O, OC 1.7 ...

Так ведь там приведён пример обработки _событий_. Не надо никаких макросов вызывать. Скрипт будет выглядеть примерно так:    Answer = DefAnswer    Message Text, mExclamation 'выдадим в окно сообщений текст модального окна

- Сие возможно, надо просто внимательно посмотреть на диалогстрим, где то я на это натыкался.

2 А можно скриптом в диалогстим писать? Хочу функцию прописывать в контролы, а не получается :(

Конечно, можно.Можешь посмотреть "Мой набор скриптов" - мой скрипт "Добавление кнопки на форму" или разработки IAm-а из этого же набора.

да было бы неплохо разом во все контролы в "фукнцию" прописывать вызов единой функции обрабатывающей выбор, а то достает прощелкивать все элементы ....

А ты откуда этот скрипт "Переходы по модулю" взял?Там же есть и файл common.vbs - достаточно переписать его в папку БинКонфиг

(59+) Упс, BinConfigScripts

А идея неплохая :) Если кто сделает, не стесняйтесь выложить на проклуб :)

на выходных рассказывал в предыдущей ветке, многие пропустили, поэтому повторюсь...---------------------------------------------------->еще две недели назад написал парсер диалог-стрима, а потом - по инерции - и DialogStream.wsc - скриплет, позволяющий работать с диалог-стримом как с объектом, например, на JScript это будет выглядеть так:.---------------------------------------------------{---------------------------------------------------.Естественно, также можно и на бейсик-скрипте..Для работы нужно распаковать куда-нибудь архив и с помощью regsvr32 зарегистрировать все файлы с расширением *.wsc..На простых диалогах работать можно, а вот на больших - тормоза...Узкое место - парсер, он разбирает стрим посимвольно....Еще также пока не поддерживается browser (по причине тормозов делать не стал)..И на последок. Поскольку у меня с 6 декабря начинается последняя сессия (ну да, студент я зеленый...), то я до следующего года на месяц сворачиваю совою активную деятельность.Возможно, кому-либо будет интересно заняться оптимизацией того, что сделал я, либо написать свое аналогичное....В первом случае, достаточно переписать только парсер, сохранив его интерфесы... Кстати, возникла идея написать парсер в виде COM-dll, будет гораздо быстрее, а с сохранением интерфесов, повторюсь, остальное переписывать совсем не надо будет....Is there anyone to be a volounteer? ;-)

53. Слушайте! А если я хочу, чтоб при сохранении вопрос "Хотите ли вы сохранить?" задавался (желательно не VB-окошко, а стд 1С-кое msgBox, как оно сейчас есть), а вот при положительном ответе уже все остальное без модальных окон и только в Message, тогда как? Как такое сделать?

+63 Как в Configurator_OnMsgBox отловить, что нажали mbOK?

а с какой целью? что бы нажать в остальных окнах все по дефолту?вроде никак,но ведь достаточно зарегистрировать факт появления этого окна,ведь, если пользователь ответит Ok, то вы заведомо знаете, какое окошко откроется следующим

(ALL) в опенконфе есть событие:Event OnActivateWindow(Wnd As ICfgWindow, ByVal bActive As Boolean)в ICfgWindow возвращается какое-то значение или нужно указывать что-то?

не возвращается, а передается значение - окно, которое активизируется// максимизирует все открываемые окна внутри конфигуратораfunction Configurator::OnActivateWindow(cfgWnd, bActive)

Оочень хочется, чтоб при записи конфы как по F11, так по ^s, вместо модальных окон все шло в Message. Однако все ж хочется, чтоб окно с вопросом "А надо ли вообще сохранять? Или может передумали?" появлялось и реагировало соответственно ответу. Т.е., если почитаете выше, тут пердложили флаг, по которому на всех модальных окнах нажимать Default, а флаг этот предлагают устанавливать при появлении окошка с текстом "Выполнить сохоранение метаданных?", само же окошко там не появляется, т.к. тоже наж-ся Def. А мне надо как раз узнать ответ юзера и толшько по "Да" устанавливать этот флаг.Может проще можно?

А чьё это сообщение "Окно не текстовое" телепата или Intellisence? Выскакивает, когда я точку хочу ввести например в строке поиска.Нельзя ли сделать так, что бы телепат (или Intellisence?) работал только в модуле, то есть только там где пишеться код.

... если на вопрос о сохранении мд пользователь нажал ОК, то следующим окошком будет "Реорганизация данных"...

69 Версию интеллисенс скачай поновей

2 Упс, не могу. Похоже проклуб в ауте. Ну ладно, тогда до завтра.

не факт...

Вверх

Ну тогда вот такDim SavingStarted, AutoProcessSavingStarted = false

Ой, а куда делись все эти русские буквочки? Попробую ещё разик    Message Text, mExclamation 'выдадим в окно сообщений текст модального окна    Message Text, mExclamation 'выдадим в окно сообщений текст модального окна  ElseIf AutoProcess Then    Answer = DefAnswer    Message Text, mExclamation 'выдадим в окно сообщений текст модального окна    SavingStarted = false  ElseIf SavingStarted Then

Так ты определи по тексту, что собираемся сохранять, испроси сам через VB MsgBox.

спасибо. думал что это событие отработает при даблклике по реквизиту. ан нет :(

При открытии формы настроек доков/справочников скриптSub Configurator_OnActivateWindow(cfgWnd, bActive)End Subвыдает сообщение Dxxx. чтобы это значило?

может уже поправили, но вот такая недоработка :при вводе создатьОбъект(".... нет выбора из списка типов объектов СписокЗначений и ТаблицаЗначений (Справочник, Документ етц - есть )

2 скачал новую версию Intellisence. Опять немного не то, что хотелось.А хочеться самую малость. Отключить срабатывание скрипта по хоткею если курсор НЕ в Модуле, где редактируеться код.

Версия Intellisence 1.1.0Последовательность действий.Вешаем скрипт на "точку" в русской раскладке.Открываем окно "Текст" и переходим в строку поиска.Жмём "." Уже баян. Курсор перескакивает в окно текста и открывает список подбора.Жмем ещё раз "." и Ентер. Получаем ошибку скрипта.Можно вводить "." в английской раскладке, но это костыли.

up

Может я не в тему?Не сможет ли кто-нибудь наваять скрипт для поиска с заменой Н раз. Поясняю: найти слово "Дебет" и заменить на "Кредит" 3 раза.Очень хочется.

вместо апапоследний раз... пост все проигнорировали или как?

81, 82 Не хватает сейчас ни времени ни знаний в этом разбираться, сам переключаю на латинскую.

Версия Intellisence 1.1.0Нажатие точки во внешней обработке после переменной ТемпТЗ в следующем скрипте безнадежно вешает конфигуратор:

87 Знаю, исправлю в следующей версии. Сугубо vbs-шные глюки с переменной цикла. Если лень ждать до след. версии - то в функции GetVTColumnsв начале каждого цикла поставь SaveI = iв конце каждого цикла i = SaveI

почему вылетает синтаксическая ошибка наDeclare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Longстрока 1 символ 8...я васик знаю плохо...

Нет, не проигнорировали!Мне интересно!Только, вот, пока, руки не дошли твои исходники посмотреть.

с чистым vb не помогу, а вот на vbScript'e многие функции из Win32API можно вызывать с помощью DynaWrap>там капельная dll c примерами на vb.а вот здесь пример на jScript)<br" target="_blank">http://cwashington.netreach.net/depo/view.asp?Index=34&ScriptType=jscript<br>.<br><br>если что, с радостью помогу разобраться / icq#338758861 или kuntashov-собака!-ru/yandex

- Помогло, спасибо!

91) dynacall.dll и dynawrap.dll - это одно и тоже ?

dynacall - предыдущая версия dynawrap вроде, по крайней мере исходники у них одинаковые...  у меня dynawrap for nt

Кульная вещь, пользовался, когда начинал изучение ВБСкрипт, понравилось, а затем забросил :(

95) можно ли как нибудь из скрипта найти нужное окно(или ForegroundWindow) и получить текст из его фокуса ввода...вот мне вспринципе чего надо...

А подскажите ссылочку пож. чтоб скачать опенконф.снм, а то на сайте не нашел

После окончания отладки скрипта через MSE7.exe конфигуратор ни на что не реагирует, хотя окно эдитора закрыто. Как вывести его из состояния спячки?

ищи ocdoc.zip а из режима отладки не забыл выйти?

99 Не знаю, допустим забыл, чего дальше делать?