VBStyleCode , Проблемы со стилем Windows XP было полностью решено. Цветная палитра теперь показывается ...

[coder]

Пришлось сделать Add-in заново, несколько годов назад потерял проект (из-за винта ...).

Add-in поддерживает предыдущие возможности:

• Авто-форматирование строк кода в зависимости от операторов;
• Авто-вставка недостающих конечных конструкторов.
• Скроллинг с помощью мышиного колеса в окне кода.

Исправлены предыдущие баги, недостатки:

• Поддержка режима SDI;
• Смягчен влияние на историю изменений.
• Скроллинг с помощью мышиного колеса тепер работает и в других окнах тоже.

Добавлены новые возможности:

• Установка Add-in'а в среду VBA;
• Авто-вставка Then для конструкции If-ElseIf в случаи его отсутствия (теперь без сообщений об ошибках);
• Авто-вставка знака комментария;
• Авто-вставка шаблона текста при добавлении функции/процедуры;
• Авто-текст;
• Авто-замена инкрементные (++) и декрементные (--) операции;
• Авто-замена составное присваивание (+=, -=, *=, /=, \=, &=);
• Авто-замена инициализации переменных с объявлением;
• Нумерация строк кода;
• Объявление функций, типов и констант (через #include);
• Настройка обработчиков ошибок;
• Подсветка синтаксиса;
• Выбор стиля интерфейса;
• Выбор языка интерфейса;
• MDI-вкладки;
• Быстрый переход к функциям и процедурам;
• Архивация проекта;

Управления клавишами:

• Ctrl + Alt + Tab - Форматировать выделенный фрагмент кода;
• Ctrl + S - Сохранение модулей в режиме отладки;
• Ctrl + B - Возврат отменённых изменений по коду;
• Ctrl + ' - Добавить знак комментария;
• Ctrl + Shift + ' - Удалить знак комментария;
• F6 - Установка / удаление закладки;
• Shift + F6 - Переход между закладками;
• F11 - Вызов окна перехода к функциям и процедурам;

Прикреплённый файлVBStyleCode.rar (289,68 Кбайт, скачиваний: 2604)

Для установки языков интерфейса нужно распаковать архив в путь, который находится установочный файл.
Прикреплённый файлLanguages.rar (471,75 Кбайт, скачиваний: 1675)

Примерные варианты include файлов:
Прикреплённый файлInclude.rar (129,59 Кбайт, скачиваний: 1515)

Сообщение отредактировано: coder - 18.02.12, 16:32

[coder]

Исправлены предыдущие недостатки:

• Скроллинг с помощью мышиного колеса тепер работает и в других окнах тоже.

[coder]

Подправил аддин к лучшему. Тепер замена строк происходит мгновенно.

Предыдущем случае замена происходило на двух этапах.
1) добавление форматированного кода
2) удаление предыдущего (из-за возожностей среды, невозможно было заменить сразу нескольких строк).

Нашел метод по оптимальнее, и теперь после нажатие Ctrl+Z уже можно видеть предыдущую состоянию. (На предыдущем версии надо было нажать два раза).

Это исправление касается к "Cмягчение влияний на историю изменений".

[coder]

Добавлены несколько новых возможностей.

Теперь поддерживается новые операторы-директивы: '#Region "My region" - '#End Region и подсветка тоже.

Проблемы со стилем Windows XP было полностью решено.

Сообщение отредактировано: coder - 01.01.12, 16:45

[DIS]

За аддин огромное спасибо, пользуюсь довольно давно, очень удобно
Есть несколько замечаний:

• При записи Sub XXX()/Function XXX() не вставляется End Sub/End Function;
• В окне настройки некоторые элементы закрашены черным (в IDE VB6 включен ХР стиль);
• Не получилось воспользоваться автозаменой (т.е. Ift, Ife и т.п. как описано в настройках), то ли не понял как, то ли не работает.

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

[coder]

Цитата DIS @ 02.01.12, 15:22

При записи Sub XXX()/Function XXX() не вставляется End Sub/End Function;

Я уже менял архив.

Цитата DIS @ 02.01.12, 15:22

В окне настройки некоторые элементы закрашены черным (в IDE VB6 включен ХР стиль);

Какие именно. Знаю что на старом было.

Цитата DIS @ 02.01.12, 15:22

Не получилось воспользоваться автозаменой (т.е. Ift, Ife и т.п. как описано в настройках), то ли не понял как, то ли не работает

Какой режим MDI или SDI. Почему-то я много пользуюсь, после ift нужно нажать пробел, нужно было вставить If-End If конструкцию.

[DIS]

Автозамена работает, до пробела не додумался для процедур и функций все тоже ок.

Вот что у меня в окне настроек (в первой вкладке там где авто-отступ все в порядке)

Прикреплённая картинка

Прикреплённая картинка

Прикреплённая картинка

Прикреплённая картинка

Прикреплённая картинка

Сообщение отредактировано: DIS - 02.01.12, 16:16

[coder]

Почему-то я не могу открыть рисунки. Там выдает сообщение форума.

[DIS]

Перезалил рисунки

Сообщение отредактировано: DIS - 02.01.12, 16:17

[coder]

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

[DIS]

Да, теперь все отображается! Спасибо!

[Сергей85]

Прошу сделать доработку, если возможно.

При создании нового события какого-либо элемента в VB создаются 2 строчки вида

Private Sub Button_Сlick()

End Sub.


Однако много людей вставляют в события обработчик ошибок примерно таким способом:

Private Sub Button_Click()
On Error goto ErrorHandler

Exit Sub
ErrorHandler:
MsgBox Erl (или более длинное сообщение
End sub


Смысл доработки: автоматическая вставка обработчика во вновь создаваемое событие или функцию (на текущий момент без адд-ина: при наборе function xxx() и ентер - автоматически добавляется только End Function).

Если не сложно - можно придумать некое поле для ввода произвольного кода и брать вставляемые строки именно оттуда. Т.о. получаем универсальное решение.

[coder]

Посмотрим.

[coder]

Цитата Сергей85 @ 02.01.12, 17:16

Прошу сделать доработку, если возможно.

Пофиксена.

Добавлены новые возможности:

• Авто-вставка шаблона текста при добавлении функции/процедуры
• Нумерация строк кода

[Сергей85]

Мой порядок установки:
Add-Ins->Add-In Manager.
Включаю VB 6 Add-In Toolbar.
Жму на появившуюся кнопку добавления новых ADD-IN'ов и выбираю вашу длл.
Получаю результат на скриншоте, верно для обоих файлов.

Прикреплённая картинка

Что я не так делаю или чего не хватает?
Версия VB:
Microsoft Visual Basic 6.0
For 32-bit Windows Development
Version 8176 VBA: Retail 6.0.8169 Forms3: 2.01

Добавлено 03.01.12, 14:45
Copyright 1987-1998 Microsoft Corp.

А ос -
Microsoft Windows XP x64
Bepcия 5.2 (cбopкa 3790.srv03_sp2_gdr.101019-0340 : Service Pack 2)
Кopпopaция Maйкpocoфт, 1985-2006

[Сергей85]

Я читал ваше сообщение о том, что вам пришлось Add-in переписывать заново из-за потери исходников (умер носитель). Хочу вам порекомендовать данную программу для резервного копирования. Называется SyncBackup, успешно применяю и на работе, и дома.

Описание в середине моего обзора:
http://www.bad-good.ru/2011menu/2011septembermenu/264-file-server-xp.html