Форум профессиональных мебельщиков PROMEBELclub
 
PROMEBELclub - Форум для мебельщиков: конструкторов, дизайнеров, мастеров, технологов и всех, кто имеет отношение к производству и изготовлению мебели. Программы для конструирования и дизайна мебели. Мебельная литература и обучающие пособия.
 
 

Вернуться   Форум профессиональных мебельщиков PROMEBELclub > Программы для мебельщиков > Программы для конструирования и дизайна мебели > Система БАЗИС > Базис-мебельщик. Скрипты

Меню

Маркет


Ответ
 
Опции темы Опции просмотра
Старый 02.10.2021, 17:36  
Базис + AutoHotkey
 
Аватар для Bystry
Bystry
Новичок
Регистрация: 02.11.2018
Сообщений: 16

Сказал(а) спасибо: 5
Поблагодарили 22 раз(а) в 3 сообщениях
Версия для печати Отправить по электронной почте
Bystry Bystry вне форума 02.10.2021, 17:36
Рейтинг: ()

Добрый день.
Предлагаю тут развивать тему скриптов AutoHotkey для базиса

Я ужа давно работаю в мебельщике с помощью PieMeny написанное на AutoHotkey. Ну и пару своих скриптов... Снял пару роликов на эту тему на ютьюбе. Кому интересно оставлю тут ссылочки

и

Интересно может кто-то еще использует AutoHotkey в работе? Хотелось бы посмотреть примеры использования.

Официальный сайт | Русскоязычная документация

Я попробовал выложить на гугл диск актуальную версию из второго видео, но гугл диск почему-то считает этот архив зло пакостным поэтому если кому надо пишите в телеграмме(@BNikitaG) поделюсь

Последний раз редактировалось Uncle; 05.10.2021 в 16:45.. Причина: ссылка на актуальную версию
Просмотров: 61564
Ответить с цитированием Вверх
20 пользователя(ей) сказали cпасибо:
Старый 21.06.2022, 18:33   #141
sergio1982
Местный
 
Регистрация: 01.09.2019
Сообщений: 424
Сказал(а) спасибо: 52
Поблагодарили 480 раз(а) в 147 сообщениях
Вес репутации: 196
sergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царстве
По умолчанию

Цитата:
Сообщение от skromvit Посмотреть сообщение
надо на комбинацию клавиш переходить
Что же вы так легко сдаётесь, можно проверять что происходит ввод текста.

Скрытый текст

PHP код:
#If WinActive("ahk_class TFormMain") && !IsFocusEdit() 

$v::
    
KeyWaitv
    KeyWait
vD T0.5 ;Ждем 0.5 cекунды
    Wait 
:= !!ErrorLevel 
    ControlGetPos
CtrlXCtrlYCtrlWCtrlH
    , % 
"ahk_id" FindTSpTBXToolbar("Панель параметров")
    
:= Wait
    i 
+= (CtrlW 367) ; 367 подставить свою ширину
    Send 
{v}+{%i%} 
    return 
#If

IsFocusEdit() { 
    
ControlGetFocus_FocusControlA  
    ControlGet
_FocusControlHwndHwnd, , %_FocusControl%, A  
    ControlGet
LineCountLineCount,,, ahk_id %_FocusControlHwnd%  
    Return !!
LineCount
}

FindTSpTBXToolbar(texthwnd 0id 0) {
    
Win := hwnd "ahk_id" hwnd "A"
    
Loop
    
{
        
ControlGetHWNDHWND, , TSpTBXToolbar%A_Index%, %Win
        If !
HWND
            
Return 
        
If !DllCall("IsWindowVisible""Ptr"HWND
            Continue
        
ControlGetTextgText, , ahk_id %HWND%  
        If (
gText text)
            Return 
HWND 
    
}
    Return 


[свернуть]


Но на одну клавишу тоже надо пальцем попасть.

Можно например на среднюю или правую кнопку мыши 2 функции, на удержание и клик, а их привязать к зоне окна, или лучше к элементам управления.
Например мышь над "Панель параметров", какие то 2 действия, над "Директивы" другие...
sergio1982 вне форума   Ответить с цитированием Вверх
Пользователь сказал cпасибо:
PravCom (21.06.2022)
Старый 11.10.2022, 00:59   #142
skromvit
Местный
 
Аватар для skromvit
 
Регистрация: 22.12.2008
Сообщений: 263
Сказал(а) спасибо: 55
Поблагодарили 237 раз(а) в 170 сообщениях
Вес репутации: 261
skromvit - весьма и весьма положительная личностьskromvit - весьма и весьма положительная личностьskromvit - весьма и весьма положительная личность
По умолчанию Интересненько!

Создавая скрипт для добавления префиксов к названиям деталей, наткнулся на интересный глюк.
Если выделить детали по материалу (именно так, а не просто выделить панели), и если они имеют общие стыки, то скрипт установит последнюю использованную схему крепежа автоматом! НО, только например на горизонты, если будут вертикальные стойки/перегородки - то тут уже не сработает. Сработает только если выделить по материалу детали у которых общие стыки только по вертикали.
PHP код:
F1::
SendInput `%
Send {Enter}{Escape 2}
Return 
Похоже ahk-скрипом можно как-то через SendInput, в никуда так сказать, отправлять какие-то команды.

P.S. Работает и с просто выделенными панелями. SendInput `% - запускает установку схем крепежа на общие стыки.
P.S.S. Дополнение, почему-то срабатывает не всегда с первого раза. Видимо зависит от способа выделения панелей.

P.S.S.S. Команды работают с выделенными мышкой панелями:
SendInput `% - Крепеж на общие стыки
SendInput `$ - Крепеж на общие стыки (как и первая)
SendInput `@ - Создание сборки

Последний раз редактировалось skromvit; 11.10.2022 в 21:45. Причина: Дополнение
skromvit вне форума   Ответить с цитированием Вверх
Пользователь сказал cпасибо:
PravCom (11.10.2022)
Старый 22.10.2022, 22:55   #143
skromvit
Местный
 
Аватар для skromvit
 
Регистрация: 22.12.2008
Сообщений: 263
Сказал(а) спасибо: 55
Поблагодарили 237 раз(а) в 170 сообщениях
Вес репутации: 261
skromvit - весьма и весьма положительная личностьskromvit - весьма и весьма положительная личностьskromvit - весьма и весьма положительная личность
Восклицание Панель скриптов в БМ8/10

Ahk-скрипт выводит панель с иконками на 10 скриптов, сверху по середине (у меня разрешение монитора 1920х1080px, расчет координаты появления окна смотрите в скрипте). Для 8-ки изменить имя Bazis10.exe на Bazis_.exe (если я правильно помню).

Собственно, работа скрипта проста. Запущенный ahk-скрипт висит в трее. По хоткею F1 появляется панелька, после нажатия одной из иконок - команда передает хоткей(или комбинацию), в скрипте заменить ХОТКЕЙ_1 на свой, который назначен для запуска того или иного скрипта. После этого панелька исчезает.

Если надобность в открытой панельке отпала, то либо закрыть окно, либо нажать эскейп.

Код конечно раздут
Уверен, что можно его и существенно подсократить или улучшить (например, прикрутить всплывающие подсказки с названием/описанием скриптов, при наведении на иконки) , но ковыряться пока нет охоты

PanelScriptov.ahk


PHP код:
#singleInstance force
#IfWinActive БАЗИС-Мебельщик

F1::
GuiAddPicturex5 y5 w40 h40  0x400000 vSc01  gScript1Sc01.png
Gui
AddPicturex55 y5 w40 h40  0x400000  vSc02  gScript2Sc02.png
Gui
AddPicturex105 y5 w40 h40  0x400000  vSc03  gScript3Sc03.png
Gui
AddPicturex155 y5 w40 h40  0x400000  vSc04  gScript4Sc04.png
Gui
AddPicturex205 y5 w40 h40  0x400000  vSc05  gScript5Sc05.png
Gui
AddPicturex255 y5 w40 h40  0x400000  vSc06  gScript6Sc06.png
Gui
AddPicturex305 y5 w40 h40  0x400000  vSc07  gScript7Sc07.png
Gui
AddPicturex355 y5 w40 h40  0x400000  vSc08  gScript8Sc08.png
Gui
AddPicturex405 y5 w40 h40  0x400000  vSc09  gScript9Sc09.png
Gui
AddPicturex455 y5 w40 h40  0x400000  vSc10  gScript10Sc10.png
Gui
Showx707 y150 h55 w505Панель скриптов для БМ ;x=(1920-w)/-> x707=(1920-505)/2где 1920 разрешение экрана монитора по ширине
Return

GuiClose:
GuiEscape:
GuiDestroy
Return

Script1:
GuiControlHideSc01
KeyWait
Lbutton
GuiControl
ShowSc01
ControlSend
, , ХОТКЕЙ_1ahk_exe Bazis10.exe ;команда в БМ
Send 
{Escape}
Return

Script2:
GuiControlHideSc02
KeyWait
Lbutton
GuiControl
ShowSc02
ControlSend
, , ХОТКЕЙ_2ahk_exe Bazis10.exe ;команда в БМ
Send 
{Escape}
Return

Script3:
GuiControlHideSc03
KeyWait
Lbutton
GuiControl
ShowSc03
ControlSend
, , ХОТКЕЙ_3ahk_exe Bazis10.exe ;команда в БМ
Send 
{Escape}
Return

Script4:
GuiControlHideSc04
KeyWait
Lbutton
GuiControl
ShowSc04
ControlSend
, , ХОТКЕЙ_4ahk_exe Bazis10.exe ;команда в БМ
Send 
{Escape}
Return

Script5:
GuiControlHideSc05
KeyWait
Lbutton
GuiControl
ShowSc05
ControlSend
, , ХОТКЕЙ_5ahk_exe Bazis10.exe ;команда в БМ
Send 
{Escape}
Return

Script6:
GuiControlHideSc06
KeyWait
Lbutton
GuiControl
ShowSc06
ControlSend
, , ХОТКЕЙ_6ahk_exe Bazis10.exe ;команда в БМ
Send 
{Escape}
Return

Script7:
GuiControlHideSc07
KeyWait
Lbutton
GuiControl
ShowSc07
ControlSend
, , ХОТКЕЙ_7ahk_exe Bazis10.exe ;команда в БМ
Send 
{Escape}
Return

Script8:
GuiControlHideSc08
KeyWait
Lbutton
GuiControl
ShowSc08
ControlSend
, , ХОТКЕЙ_8ahk_exe Bazis10.exe ;команда в БМ
Send 
{Escape}
Return

Script9:
GuiControlHideSc09
KeyWait
Lbutton
GuiControl
ShowSc09
ControlSend
, , ХОТКЕЙ_9ahk_exe Bazis10.exe ;команда в БМ
Send 
{Escape}
Return

Script10:
GuiControlHideSc10
KeyWait
Lbutton
GuiControl
ShowSc10
ControlSend
, , ХОТКЕЙ_10ahk_exe Bazis10.exe ;команда в БМ
Send 
{Escape}
Return 
[свернуть]

Иконки для примера см. в архиве. Должны лежать в папке со скриптом. Заменить на свои 40х40px (или меньше/больше, в скрипте изменить на свой).

P.S. Надо тестировать, т.к. у самого нет ни 8-ки, ни 10-ки. А качать и ставить - лень)
Миниатюры
2022-10-23_00-08-50.jpg  
Вложения
Тип файла: zip IconsPanelScriptov.zip (3.2 Кб, 22 просмотров)

Последний раз редактировалось skromvit; 23.10.2022 в 00:10.
skromvit вне форума   Ответить с цитированием Вверх
Пользователь сказал cпасибо:
PravCom (23.10.2022)
Старый 30.10.2022, 15:31   #144
Джекидс
Модератор
 
Регистрация: 07.05.2009
Адрес: Украина, Харьков
Сообщений: 702
Сказал(а) спасибо: 843
Поблагодарили 2,491 раз(а) в 370 сообщениях
Вес репутации: 751
Джекидс репутация неоспоримаДжекидс репутация неоспоримаДжекидс репутация неоспоримаДжекидс репутация неоспоримаДжекидс репутация неоспоримаДжекидс репутация неоспоримаДжекидс репутация неоспоримаДжекидс репутация неоспоримаДжекидс репутация неоспоримаДжекидс репутация неоспоримаДжекидс репутация неоспорима
По умолчанию

Всем доброго, дошли руки до PieMenu, там не с первого раза все получилось, запутался с версиями и ожиданиями, в итоге сделал все как нужно на V2, вылез нюанс, только сейсас обратил внимание, не знаю вопрос сюда или в общую тему БМ, во всяком случае может кто-то уже нашел способ как решить. Дело в том, что БМ в инструментах "Строить" в режиме модели вызывает инструменты так, как они прописаны в настройка, т.к. (например "Параллель" Шифт+1, ит.д) а вот в режиме редактирования детали почему то вызывает совсем другой инструмент, например "Биссектриса", в общем кто сталкивался, кто что думает? это конечно вопрос не к PieMenu или AHK, но всеже кто так решил, или забил, или сделал доп меню под режим редактирования деталей?


p.s. Пойду задам вопрос в соседних темах
Джекидс вне форума   Ответить с цитированием Вверх
Старый 03.11.2022, 19:34   #145
skromvit
Местный
 
Аватар для skromvit
 
Регистрация: 22.12.2008
Сообщений: 263
Сказал(а) спасибо: 55
Поблагодарили 237 раз(а) в 170 сообщениях
Вес репутации: 261
skromvit - весьма и весьма положительная личностьskromvit - весьма и весьма положительная личностьskromvit - весьма и весьма положительная личность
По умолчанию

Всем привет!
Кто может подсказать, как получить в переменную заголовок из активного окошка (см.скриншот https://radikal.host/i/kmBPO )с используемыми материалами?
Такое не канает
PHP код:
WinGetTitleTitleA
MsgBox
Сейчас активно окно "%Title%"
skromvit вне форума   Ответить с цитированием Вверх
Старый 03.11.2022, 19:39   #146
sergio1982
Местный
 
Регистрация: 01.09.2019
Сообщений: 424
Сказал(а) спасибо: 52
Поблагодарили 480 раз(а) в 147 сообщениях
Вес репутации: 196
sergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царстве
По умолчанию

а где там в заголовке материал?
sergio1982 вне форума   Ответить с цитированием Вверх
Старый 03.11.2022, 19:52   #147
skromvit
Местный
 
Аватар для skromvit
 
Регистрация: 22.12.2008
Сообщений: 263
Сказал(а) спасибо: 55
Поблагодарили 237 раз(а) в 170 сообщениях
Вес репутации: 261
skromvit - весьма и весьма положительная личностьskromvit - весьма и весьма положительная личностьskromvit - весьма и весьма положительная личность
По умолчанию

Цитата:
Сообщение от sergio1982 Посмотреть сообщение
а где там в заголовке материал?
Там название файла со списком материалов [Тест1.lmtx], нужно получить название этого файла.
skromvit вне форума   Ответить с цитированием Вверх
Старый 03.11.2022, 19:56   #148
sergio1982
Местный
 
Регистрация: 01.09.2019
Сообщений: 424
Сказал(а) спасибо: 52
Поблагодарили 480 раз(а) в 147 сообщениях
Вес репутации: 196
sergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царстве
По умолчанию

а что за окно. как вызывается?
sergio1982 вне форума   Ответить с цитированием Вверх
Старый 03.11.2022, 20:01   #149
skromvit
Местный
 
Аватар для skromvit
 
Регистрация: 22.12.2008
Сообщений: 263
Сказал(а) спасибо: 55
Поблагодарили 237 раз(а) в 170 сообщениях
Вес репутации: 261
skromvit - весьма и весьма положительная личностьskromvit - весьма и весьма положительная личностьskromvit - весьма и весьма положительная личность
По умолчанию

Цитата:
Сообщение от sergio1982 Посмотреть сообщение
а что за окно. как вызывается?
Так скриншот же есть https://radikal.host/i/191919.kmBPO
skromvit вне форума   Ответить с цитированием Вверх
Старый 03.11.2022, 20:04   #150
sergio1982
Местный
 
Регистрация: 01.09.2019
Сообщений: 424
Сказал(а) спасибо: 52
Поблагодарили 480 раз(а) в 147 сообщениях
Вес репутации: 196
sergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царствеsergio1982 - луч света в тёмном царстве
По умолчанию

я видел. у меня в 22 такого окна нет.

Добавлено через 2 минуты
есть Используемый материал без файла
sergio1982 вне форума   Ответить с цитированием Вверх
Ответ

Нижняя навигация
Вернуться   Форум профессиональных мебельщиков PROMEBELclub > Программы для мебельщиков > Программы для конструирования и дизайна мебели > Система БАЗИС > Базис-мебельщик. Скрипты


Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Базис-7,"Народный Базис"и Windows-8 sergeyzak18 "НАРОДНЫЙ" базис 23 16.01.2014 00:37


Текущее время: 23:43. Часовой пояс GMT +3.


Powered by vBulletin® Version 3.8.12 by vBS
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
© 2007-2023 PROMEBEL

џндекс.Њетрика