ПО Rastrwin: макрос загрузки файла с определением шаблона по типу файла

Есть два пути открытия файлов для Rastr: перетаскиванием файлов на панель или протокол (Rastr3) или в окно программы (rastr2) и открытие через встроенную комманду Загрузить в меню Файл. Самый простой способ, конечно, остается перетаскивание, потому что позволяет очень быстро и оперативно загрузить несколько файлов (комплект файлов). Команда Загрузить может понадобиться, когда идет работа с каким-то одним файлом.

Проблема вся в том, что Rastr грузит файлы по шаблонам (в общем случае, стандартных шаблонов хватает вполне). Но когда открывается стандартное окно загрузки, то

  1. нельзя увидеть все файлы, так как по умолчанию стоит фильтр rg2
  2. при загрузке файла можно перепутать шаблон (если вставить готовую ссылку на файл)

Окно загрузки

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

Для Rastr3 удобно зафиксировать макрос в меню

Настройка меню

и можно переименовать и дать горячую кнопку.

Одна беда с Rastr3, что окно сохранения (ctrl+S) при загрузке через макрос не будет появлятся и rastr3 не понимает, какой файл загружен, нужно сохранить через команду Сохранить как, после этого появится окно сохранения

Окно сохранения

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

Для Rastr2 все работает нормально, жалко, что нельзя ничего добавить в меню.

Установка обычная, закидываем файл в папку macro.

Версия (см. UPD1)

Скачать OpenFileWithShablon.zip

Версия без дополнительных установок

Скачать OpenFileWithShablon-old.zip

UPD1: На некоторых машинах код может не заработать со следующей ошибкой «Класс не лицензирован для использования». Для того, чтобы все заработало, нужно установить бесплатный VB5 CCE (Microsoft Visual Basic 5 Control Creation Edition) VB5_CCE_install.zip
UPD2: С версии Rastrwin 1.76 сделали открытие файлов по учету типа
Оцените статью
В коробке инженера
Добавить комментарий

Нажимая на кнопку "Добавить комментарий", я даю согласие на обработку персональных данных и принимаю политику конфиденциальности

Введите буквы на русском языке : *

Reload Image