AHK: Замена "Window Spy" (Страница 7 из 19)

Off:
Глючит у меня эта фича с цитированием, выделяешь фрагмент, а вставляется иногда весь пост, не посмотрел.

Скриншот с таким параметром есть на странице Window Spy в Коллекции — в новых версиях, видимо, произошли изменения)). Другие скрипты — это скрипты для получения путей, стандартные.

Добавил точку. /ypppu/

А нельзя сделать чтобы возвращало также как и WinGet ProcessPath или ProcessName, в плане регистра букв. Например твой код возвращает "Explorer.EXE", а WinGet и диспетчер задач в колонке "Имя образа" - "explorer.exe". Или как пример у меня"ASUSAUDIOCENTER.EXE" и "AsusAudioCenter.exe". Путь до процесса в твоём отображается нормально.

DD, точки в двух своих последний сообщениях добавьте.

serzh82saratov, ну зачем тебе предметно? Он делает то, чего не делают те, которыми располагаю, включая команду StatusBarGetText. Вопрос я задавал тем, у кого AhkSpy, умение и желание извлечь из него фрагмент кода, есть.

Все время забываю про точки, которыми заканчиваются предложения после скобок. Раньше The gray Cardinal напоминал своими сообщениями, а теперь не просто приходится)).

ypppu

OFF: ypppu, так я два последние исправил, и тут же в следующем точку не нарочно пропустил)). У меня кстати таких сообщений без точек много здесь)). Исправлю конечно я сам — довольно с Вас, что Вы их отслеживаете.

#606

А, забыл ответить. Всё правильно, если нужно получить только путь к исполнимому файлу, то достаточно воспользоваться более простой функцией QueryFullProcessImageName или Winget, ProcessPath. Просто NtQueryInformationProcess заодно возвращает и то, и другое, что менее ресурсоёмко. А уж в каком регистре букв — то как есть, вариантов не предлагается.

Обновление.

Параметры подсвечиваются при наведении мыши.
Теперь по RButton копируется то что подсвечено при наведении мыши, или выделено пользователем.

Shift+RButton - Добавляет текст к буферу обмена. В режиме "Hotkey" - удержание RButton.

Кто пользуется инклудом:
ColorSelMouseHover := "#96C3DC" ;  Цвет фона элемента при наведении мыши
ClipAdd_Delimiter разделитель (по умолчанию "`r`n") буфера обмена и копируемого.
Если ClipAdd_Before равно true (по умолчанию false), то копируемое добавляется перед буфером обмена.

В каком смысле — надо? Кодами лучше выводить клавиши, имена которых могут меняться, а у перечисленных вроде не меняются.

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

Хочу добавить красный цвет кнопки в панели задач при паузе. На 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)
}

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

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

В каком формате нужно подставлять переменные для x и y в первой строке?

Acc_ObjectFromPoint(ByRef _idChild_ = "", x = "", y = "")
{
	Acc_Init()
	If	DllCall("oleacc\AccessibleObjectFromPoint", "Int64", x==""||y==""?0*DllCall("GetCursorPos","Int64*",pt)+pt:x&0xFFFFFFFF|y<<32, "Ptr*", pacc, "Ptr", VarSetCapacity(varChild,8+2*A_PtrSize,0)*0+&varChild)=0
	Return	ComObjEnwrap(9,pacc,1), _idChild_:=NumGet(varChild,8,"UInt")
}

Допустим есть координаты

xx := 200 и yy := 100

Пробовал и убирать

и подставлять имя переменной в кавычки, и без кавычек, и в окружении процентов, но ничего не добился.
Помогите, пожалуйста!

Нашёл открытую подходящую тему. http://forum.script-coding.com/viewtopic.php?id=12053 Название говорящее: "AHK: Acc_ObjectFromPoint без наведения мыши в скрытом окне."
   Но там ответа так и не дали.

Мне достаточно понять как подставлять координаты нужного элемента в Acc_ObjectFromPoint. Не цифрами, а через переменную меняющую значение.
Например

Acc_ObjectFromPoint(ByRef _idChild_ = "", x = "var1", y = "var2")

Устроит и для активного окна. Написал в той теме: http://forum.script-coding.com/viewtopi … 99#p115899

В смысле чтобы текст за границу не уходил?
Желания не возникало, но если скажешь как, то может быть добавлю.

Так как сделать? Что за опция для HTMLFile?

Не знаю, как нибудь попробую.

Чтобы не разбивались на несколько строк можно им вписать таг <nobr>.

<nobr>Текст</nobr>

Либо:

<span style="white-space: nowrap">Long line with no breaks</span>

В твоём коде для меня всё мудрёно.
Вот пример, который у меня работает:

Gui, HTML: Add, ActiveX, w333 h111 vIE, HTMLFile   
Gui, HTML: show   
  
html =
(  
<!DOCTYPE html>
<html>
 <head>
  <meta charset="utf-8">
  <title>word-break</title>
  <style>
   .col { 
    background: #f0f0f0; /* Цвет фона */
    width: 180px; /* Ширина блока */
    padding: 10px; /* Поля */
    word-break: break-all; /* Перенос слов */ 
   }
  </style>
 </head>
 <body> 
  <div class="col">
   <p>Cуществительное</p>
   <p>высокопревосходительство</p>
   <p>Одушевленное существительное</p>
   <p>одиннадцатиклассница</p>
   <p>Химическое вещество</p>
   <p><nobr>метоксихлордиэтиламинометилбутиламиноакридин</nobr></p>
  </div>
 </body>
</html>
)   
IE.Close()
IE.Write(html)  
return

Ну я ж говорю - там мудрёно.
Должно переноситься либо так:

white-space: pre-wrap;
word-wrap: break-word;

Либо так:

word-break: break-all;

Я не нашел где у тебя в коде пишется html.
Если заменить

oDoc.body.innerHTML := HTML_Win

на

oDoc.Write(HTML_Win)

то переносит.

Я же написал, на 472 строке создаётся переменная HTML_Win которая содержит html.

Если не использовать подгонку слов под разметку html блока, а подгонять под размер окна, то так работает:

gui, HTML: Add, ActiveX, w200 h111 vIE, HTMLFile   
Gui, HTML: show   
  
html =
(  
<html>
<body> 
Одушевленное существительное
<nobr>Одушевленное существительное</nobr>
</body>
</html>
)
IE.body.innerhtml := html
return

А что у тебя не переносит?
Если делать перенос внутри слов, то можно так:

gui, HTML: Add, ActiveX, w50 h111 vIE, HTMLFile   
Gui, HTML: show   
  
html =
(  
Одушевленноесуществительное
)
html := RegexReplace(html, "s).", "$0<wbr>")
IE.body.innerhtml := html
return

Код из 656 поста не переносит по буквам?
У меня на нескольких машинах переносит.

А так?

FixIE(0)
gui, HTML: Add, ActiveX, w50 h111 vIE, HTMLFile   
Gui, HTML: show   
  
html =
(  
Одушевленноесуществительное
)
html := RegexReplace(html, "s).", "$0<wbr>")
IE.body.innerhtml := html
return

FixIE(Fix) {
	Static Key := "Software\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION"
	If A_IsCompiled
		ExeName := A_ScriptName
	Else
		SplitPath, A_AhkPath, ExeName
	If Fix
		RegWrite, REG_DWORD, HKCU, %Key%, %ExeName%, 0
	Else
		RegDelete, HKCU, %Key%, %ExeName%
}

У меня на 10 разных компьютерах (не сетка) код из 654 поста переносит 2 слова.
Получается так:

Пробовал менять всевозможные настройки IE security settings - чтобы не менял - переносит.
Код из 656 поста работает только с FixIE(0), так как иначе с FixIE(1), видно, таг <wbr> не понятен.

Если в простом примере гуи перенос есть, а в ахкспай гуи нету, значит надо смотреть, что переносу мешает.
Может быть красные точки, может еще чего.

А это не работает:

D2 := "<span id='Delimiter' style='color: " ColorDelimiter "'><nobr>" D2 "</nobr></span>"

D2 := "<span id='Delimiter' style='white-space: nowrap'>" D2 "</span>"

#Delimiter  {white-space: 'nowrap'}

У меня нормально показывает если убрать <a></a>.
Для чего там эти таги?

Глюк из за StatusBarText, не пойму что там мешает.

Я это видел, но `n там не в тему, и не ясно почему так.

Лечится ещё, опять же почему то, переносом в конец строки.

%D1% <span id='title'>( Other )</span> %D2%<a></a>

Удалять якоря тоже не хочется, и вообще это всё похоже на метод ненаучного тыка.

Нет, там мой косяк, решил.
Как перенос переключать, через меню?

Сделал.
Ещё бы линии красные подрезать как нибудь по ширине окна, бесит скролл снизу.

Это видел, но у меня не вышло.

Это понятно, но бесит не сам скролл, а то что он отматывает и показывает до конца последней линии, а надо чтобы только текст учитывал. Ну вроде как c <hr>, оно всегда до края, но на скролл не влияет.

Вот то что нужно, но не устраивает перенос строки после Word, и contenteditable='false' в pre.

; http://shpargalkablog.ru/2012/01/css-overflow-word-wrap-text-overflow.html

FixIE(0)
Gui, +ReSize
Gui, Add, ActiveX, w200 h111 HWNDhActiveX vIE, HTMLFile   
Gui, Show
ColorDelimiter := "E14B30"
Loop 1124
	D1 .= "&#9642"

D2 := "<span id='Delimiter' style='color: " ColorDelimiter "'>" D1 "</span>"

html =
(
<body>
<pre contenteditable='false'>
<span id='con'> Word %D2%</span>
TextTextTextTextTextTextTextTextTextTextTextTextTextTextTextTextTextTextTextText 000
</pre>
</body>

<style>
#con {
width: 100`%;
overflow: hidden;
}
</style>
)
IE.body.innerhtml := html
return

GuiSize:
WinMove, ahk_id %hActiveX%, , 0, 0, A_GuiWidth, A_GuiHeight
return

FixIE(Fix) {
	Static Key := "Software\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION"
	If A_IsCompiled
		ExeName := A_ScriptName
	Else
		SplitPath, A_AhkPath, ExeName
	If Fix
		RegWrite, REG_DWORD, HKCU, %Key%, %ExeName%, 0
	Else
		RegDelete, HKCU, %Key%, %ExeName%
}

АП не знаю что было с contenteditable, сейчас с true работает. Сначала с true было:

Еще косяк, при наведении появляется крест, и можно перенести элемент.

АП с FixIE(1) недостатки уходят, но скролл снова "длинный", до конца линии, и под FixIE(1) я сабж не переделаю.

В смысле проще?
Ты сабж запускал с 1?

Не знаю насколько просто, ещё onmouseover отваливается, шрифт не тот...

body {
  overflow-x: hidden;
  -ms-scroll-limit-x-max: 0;
}

Так скролла нет вообще.

Не знаю... Мне бы как onmouseover вызывает функцию анк.

А без него?

На каждое id функцию делать.

Вообще без него, плохо.

Ну так как сейчас с FixIE(1), onmouseover не вызывается.

И зачем сейчас нам FixIE(1), если и с ним нет решения про полосы.

Я уже ничего не понимаю, решение с полосами без word wrap, есть, код, на примере 684?

Нет: