626

Re: AHK: Замена "Window Spy"

А, ну тогда да. Собственно, как выводить клавиши, решает кодер, а твоё приложение должно определять любые.

Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Skype dmitry_fiveg

627

Re: AHK: Замена "Window Spy"

Есть приложение в котором не определяются ни имена контролов, ни их HWND. Но AhkSpy успешно выводит часть информации из контрола в поле "Name". Помогите, пожалуйста, выделить часть кода, отвечающего за поле "Name" в отдельный скрипт, чтобы можно было добыть и сохранить все данные из этого контрола. Хорошо бы, чтобы выдало сразу всё, но если поштучно при наведении на каждый участок, как в AhkSpy сейчас, то тоже нормально.

628

Re: AHK: Замена "Window Spy"

Хочу добавить красный цвет кнопки в панели задач при паузе. На 7 работает, протестируйте на ХР и 10 данный код. При запуске, кнопка должна быть красной, на ХР интересует - будет ли ошибка.

ComObjError(false)
Gui, +HWNDhGui
Gui, Show, NA
TaskbarProgress(4, hGui, 100)
Return

TaskbarProgress(state, hwnd, pct = "") {
	static tbl := ComObjCreate("{56FDF344-FD6D-11d0-958A-006097C9A090}", "{ea1afb91-9e28-4b86-90e9-9e9f8a5eefaf}")
	DllCall(NumGet(NumGet(tbl+0)+10*A_PtrSize), "ptr", tbl, "ptr", hwnd, "uint", state)
	if pct !=
		DllCall(NumGet(NumGet(tbl+0)+9*A_PtrSize), "ptr", tbl, "ptr", hwnd, "int64", pct, "int64", 100)
}
По вопросам возмездной помощи пишите в личку
E-Mail: serzh82saratov@mail.ru
OS: Win7x64, AutoHotkey_L v1.1.25.01 (Unicode 32-bit).

629

Re: AHK: Замена "Window Spy"

Win XP sp3.

Active Window Info пишет:

&Да
&Нет
Error:  0x80004002 - Интерфейс не поддерживается

Line#
---> 008: tbl := ComObjCreate("{56FDF344-FD6D-11d0-958A-006097C9A090}", "{ea1afb91-9e28-4b86-90e9-9e9f8a5eefaf}")
001: ComObjError(false) 
002: Gui,+HWNDhGui
003: Gui,Show,NA
004: TaskbarProgress(4, hGui, 100) 
005: Return
007: {
009: DllCall(NumGet(NumGet(tbl+0)+10*A_PtrSize), "ptr", tbl, "ptr", hwnd, "uint", state) 

Continue running the script?

630

Re: AHK: Замена "Window Spy"

serzh82saratov пишет:

При запуске, кнопка должна быть красной

Если имеется в виду цвет фона, то на 10 работает.

631

Re: AHK: Замена "Window Spy"

YMP всё верно, спасибо.

ypppu а так нет ошибки:

ComObjError(false)
Gui, +HWNDhGui
Gui, Show, NA
loop 3
	TaskbarProgress(4, hGui, 100) 
Return

TaskbarProgress(state, hwnd, pct = "") {
	static tbl
	if !tbl {
		try tbl := ComObjCreate("{56FDF344-FD6D-11d0-958A-006097C9A090}", "{ea1afb91-9e28-4b86-90e9-9e9f8a5eefaf}")
		catch
			tbl := "error"
	}
	if tbl = error
		Return
	DllCall(NumGet(NumGet(tbl+0)+10*A_PtrSize), "ptr", tbl, "ptr", hwnd, "uint", state)
	if pct !=
		DllCall(NumGet(NumGet(tbl+0)+9*A_PtrSize), "ptr", tbl, "ptr", hwnd, "int64", pct, "int64", 100)
}
По вопросам возмездной помощи пишите в личку
E-Mail: serzh82saratov@mail.ru
OS: Win7x64, AutoHotkey_L v1.1.25.01 (Unicode 32-bit).

632

Re: AHK: Замена "Window Spy"

Так просто ничего не происходит. Стандартная кнопка на панели задач.

633

Re: AHK: Замена "Window Spy"

Хорошо, добавил.

По вопросам возмездной помощи пишите в личку
E-Mail: serzh82saratov@mail.ru
OS: Win7x64, AutoHotkey_L v1.1.25.01 (Unicode 32-bit).