[ Обновленные темы · Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: Andrey_A, simup, ХарВик, chip642  
Различные действия с закладками
Andrey_AДата: Понедельник, 20.01.2014, 18:14 | Сообщение № 1
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7186
Награды: 143
Репутация: 125
Аверин Андрей
Различные действия с закладками
Используется скрипт Functions.vbs - Скрипт с различными Функциями, которые можно использовать в других скриптах

Доступно только для пользователей


 
wq_qweДата: Понедельник, 08.04.2019, 13:25 | Сообщение № 2
Рядовой

На сайте с: 06.04.2019
Город: Москва
Сообщений: 17
Награды: 0
Репутация: 0
при нажатии на кнопку
Код
"Установить закладки открытым  документам из файла ListBookmarks.txt" Call("Scripts::Main", 1, "BookmarksPlus.vbs", `5 "%a\AkelFiles\List\ListBookmarks.txt"`)

закладки обновляются только после клика по фону документа, а не сразу
т.е. надо нажать на кнопку, закладок нет. потом нажать на фон - закладки появляются.
т.е. всегда вместо одного клика нужно делать два
фиксаните обновление закладок после нажатий на кнопки
SDI или PMDI - всё работает нормально, MDI - есть косяк

Добавлено (09.04.2019, 08:41)
---------------------------------------------
добавить в конец кода, тогда работает нормально
или лучше конечно добавить в Case 5, 6
Код

CreateObject("WScript.Shell").SendKeys("{LEFT}")
CreateObject("WScript.Shell").SendKeys("{RIGHT}")

или
Код

.SetSel 0, 0

или
Код

.SetSel .GetSelStart, .GetSelEnd + 1
.SetSel .GetSelStart, .GetSelEnd - 1


Сообщение отредактировал wq_qwe - Вторник, 09.04.2019, 16:37
 
Andrey_AДата: Среда, 10.04.2019, 14:39 | Сообщение № 3
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7186
Награды: 143
Репутация: 125
Аверин Андрей
Цитата wq_qwe ()
SendKeys("{LEFT}")

Вариант, но не совсем безопасный... изменил функцию GetAllTabListBookmarks в Functions.vbs
Добавил:

Код
    Next : SetRedraw MainWnd, True : GetAllTabListBookmarks = DelEndEmptyLine(xText) : SetRedraw 0, True


.


 
wq_qweДата: Четверг, 11.04.2019, 20:59 | Сообщение № 4
Рядовой

На сайте с: 06.04.2019
Город: Москва
Сообщений: 17
Награды: 0
Репутация: 0
Цитата
изменил функцию

по ссылке в шапке темы старый файл?
 
Andrey_AДата: Четверг, 11.04.2019, 23:33 | Сообщение № 5
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7186
Награды: 143
Репутация: 125
Аверин Андрей
wq_qwe, старый - обновит вручную - у у себя все добавлено - и при следующем изменении останется

.


 
  • Страница 1 из 1
  • 1
Поиск:

Интеллектуальные права и отказ от ответственности