Серый форум — AHK: Задание работы скрипта во встраиваемом окне программы

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (teadrinker) — Wed, 09 Nov 2016 14:02:35 +0000

becauseim пишет:

правильно ли я сделал

Функция timeline() выглядит странно. Почему yCtrl не должно быть равно именно 80? А переменная StateEditing вообще не задана. Как она может быть равна 520?

Чтобы подсказать, как правильно, нужно Premiere Pro иметь.

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (becauseim) — Wed, 09 Nov 2016 12:08:41 +0000

Необходимо задать работу горячей клавиши в определенном контроле. Сейчас не работает клавиша m, но работает g. Подскажите, пожалуйста, в чем ошибка?

timeline()
{
	Global
	IfWinActive ahk_class Premiere Pro
	{
		MouseGetPos,,,, Ctrl, 2
		ControlGetPos, xCtrl, yCtrl,,,, ahk_id %ctrl%
		if ((yCtrl != 80) and (StateEditing = 520))
			{
				return !ErrorLevel
			}
	}
}

#UseHook
Array := ["^+{f2}", "^+{f7}", "^+{f5}", "^+{f6}", "^+{f1}"], max := Array.MaxIndex()
Return

#If processing
*sc32:: Return
#If

#if timeline()
sc32::   ; m
   KeyWait, % A_ThisHotkey, T0.3
   if !ErrorLevel
      SendInput, {%A_ThisHotkey%}
   else  {
      while GetKeyState(A_ThisHotkey, "P") && processing := 1  {
         SendInput, % Array[(k := mod(A_Index, max)) ? k : max]
         Sleep, 500
      }
      processing := ""
   }
   Return

g:: ToolTip g

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (becauseim) — Sat, 31 Oct 2015 18:26:28 +0000

Не знаю, правильно ли я сделал, но не работает.

+ открыть спойлер

#SingleInstance Force

ArrVegas:=	{"F2":{"Label":"F2", "Delay":250}}
		
Hotkey, IfWinActive, ahk_class Vegas.Class.Frame
		
For key in ArrVegas  {
	Hotkey, %key%, Work
	ArrVegas[key]["C"] := 0
}
Return

Work:
	o := ArrVegas[A_ThisHotkey], o["C"] := A_TickCount - o["T"] < o["Delay"] ? o["C"] + 1 : 1 
	o["T"] := A_TickCount, IsLabel(o["Label"] "_" o["C"]) ? 0 : (o["C"] := 1) 
	Try Gosub, % o["Label"] "_" o["C"]
	Return

F2_1:
	SendInput ^!+k
	Return
			
F2_2:
	SendInput !0+^[
	Return
	
	


#if timeline()
vk44:: SendInput {Delete}
#if

timeline()
{
   IfWinActive ahk_class Vegas.Class.Frame
   {
      ControlGetFocus, control, ahk_class Vegas.Class.Frame
      If Instr(control, "Vegas.Class.Doc")
         return !ErrorLevel
   }
}

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (Alectric) — Sat, 31 Oct 2015 18:04:11 +0000

Уже ж написал выше.

Hotkey,IfWinActive,ahk_class Vegas.Class.Frame

Или в 13ой версии окно не меняет названия, при открытии проекта?

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (becauseim) — Sat, 31 Oct 2015 18:00:45 +0000

Alectric, не подскажете, как все-таки объединить сценарии в один файл? Чтобы горячая клавиша F2 также была активной.

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (Alectric) — Sat, 31 Oct 2015 17:58:09 +0000

Видимо в 12ой версии по другому...

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (becauseim) — Sat, 31 Oct 2015 17:46:46 +0000

Alectric, не совсем Вас понял. Первый скрипт должен работать в в окне программы. Второй же работает только в области таймлана, чего удалось добиться благодаря методу от Malcev. Оба сценария работают необходимым образом, но только из разных файлов. Располагаясь в одном файле, горячая клавиша из первого сценария уже не активна.

upd.: Не равносилен, т.к. срабатывает всюду, а не в заданной области.

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (Alectric) — Sat, 31 Oct 2015 17:43:54 +0000

Hotkey, IfWinActive, Vegas Pro 13.0

Название окна разве не меняется при открытии проекта?

Hotkey,IfWinActive,ahk_class Vegas.Class.Frame

...

На мой взгляд код:

#if timeline()
vk44:: tooltip,Delete
#if

timeline()
{
   IfWinActive ahk_class Vegas.Class.Frame
   {
      ControlGetFocus, control, ahk_class Vegas.Class.Frame
      If Instr(control, "Vegas.Class.Doc")
         return !ErrorLevel
   }
}

равносилен:

#IfWinActive ahk_class Vegas.Class.Frame
vk44:: tooltip,Delete
#if

,т.к. клавиша срабатывает по всей площади окна.

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (becauseim) — Sat, 31 Oct 2015 17:08:06 +0000

Не получается объединить два скрипта в одном файле. А именно, не работает первый сценарий, который должен работать в окне программы целиком. Как правильно их объединить?



ArrVegas:=	{"F2":{"Label":"F2", "Delay":250}}
		
Hotkey, IfWinActive, Vegas Pro 13.0
		
For key in ArrVegas  {
	Hotkey, %key%, Work
	ArrVegas[key]["C"] := 0
}
Return

Work:
	o := ArrVegas[A_ThisHotkey], o["C"] := A_TickCount - o["T"] < o["Delay"] ? o["C"] + 1 : 1 
	o["T"] := A_TickCount, IsLabel(o["Label"] "_" o["C"]) ? 0 : (o["C"] := 1) 
	Try Gosub, % o["Label"] "_" o["C"]
	Return

F2_1:
	SendInput ^!+k
	Return
			
F2_2:
	SendInput !0+^[
	Return

#if timeline()
vk44:: SendInput {Delete}
#if

timeline()
{
   IfWinActive ahk_class Vegas.Class.Frame
   {
      ControlGetFocus, control, ahk_class Vegas.Class.Frame
      If Instr(control, "Vegas.Class.Doc")
         return !ErrorLevel
   }
}

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (Malcev) — Fri, 30 Oct 2015 18:27:38 +0000

#if timeline()
1:: msgbox timeline
#if

timeline()
{
   IfWinActive ahk_class Vegas.Class.Frame
   {
      ControlGetFocus, control, ahk_class Vegas.Class.Frame
      If Instr(control, "Vegas.Class.Doc")
         return !ErrorLevel
   }
}

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (Alectric) — Fri, 30 Oct 2015 18:21:13 +0000

Malcev пишет:

У меня в 13 вегасе контрол таймлайна - vegas.class.doc10.

Если переместить или добавить "под-окно", то число в конце меняется. У меня к примеру doc5 - doc4 (если закрыть 1 "под-окно").

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (Malcev) — Fri, 30 Oct 2015 18:06:41 +0000

#if timeline()
1:: msgbox timeline
#if

timeline()
{
   IfWinActive ahk_class Vegas.Class.Frame
   {
      ControlGetFocus, control, ahk_class Vegas.Class.Frame
      If (control="Vegas.Class.Doc10")
         return !ErrorLevel
   }
}

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (becauseim) — Fri, 30 Oct 2015 17:53:08 +0000

В общем, вариант от Alectric работает, но в качестве сокращений его использовать вряд ли получится. Скорость отзывчивости слишком мала.
Уважаемый Malcev однажды подсказал о таком методе работы с таймлайном в Premiere Pro:

#if timeline()
WheelUp:: Send {=}
WheelDown:: Send {-}
#if

timeline()
{
   IfWinActive ahk_class Premiere Pro
   {
      MouseGetPos, , , id, control    ; узнаем над каким контролом находится мышка
      n := RegExReplace(control, "\D")   ;  присваиваем переменной номер контрола
      If (n>=19) and (n<=50)   ; n находим опытным путем
         return !ErrorLevel
   }
}

Возможно, есть вероятность интерпретации данного метода?

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (Malcev) — Fri, 30 Oct 2015 17:45:11 +0000

Иногда с большой иногда нет, это минус использования Acc, но других способов я не вижу... пока-что. Т.к. контролы все время меняются и как отдельные окна эти "подокна" не определяются, пока их не отделишь...

У меня в 13 вегасе контрол таймлайна - vegas.class.doc10.

Re: AHK: Задание работы скрипта во встраиваемом окне программы

null@example.com (Alectric) — Fri, 30 Oct 2015 17:22:27 +0000

yalanne пишет:

try

Пока еще не разбирался с "попыткой", но кажется там "ловить" (catch) нужно обязательно или нет? Да и не понял пока - как это действует "внутри" (всмысле - делает эту ошибку не критической для системы или просто ловит сообщение об ошибке и не выводит на экран, в плане безопасности таких ошибок...).