Войти

Показать полную графическую версию : [решено] Изменить название окна


AlexM
26-11-2010, 22:06
Хочется изменять названия окон скриптом VBS (можно и autoIt или nircmd).
Пока в инете наткнулся на программу "EPC Title bar changer" - меняет, но вручную нужно - значить менять можно.

И на программу на Visual Basic (немного изменил, не будучи уверен, что для VBS подойдет):
Private Const WM_SETTEXT = &HC
Private Sub Title_Change()
target_name = "Get"
new_caption = "Get-2"
target_hwnd = FindWindow(vbNullString, target_name)
SendMessage target_hwnd, WM_SETTEXT, 0, ByVal new_caption
End Sub
Однако в виде VBS файла строка SendMessage не компилируется.

Может кто подсказать скрипт? Спасибо!

Iska
26-11-2010, 23:33
Под VBScript понадобятся сторонние библиотеки, например, AutoItX3.dll (http://www.script-coding.info/AutiItX.html) из комплекта AutoItOption Explicit

Dim objAutoItX

Set objAutoItX = WScript.CreateObject("AutoItX3.Control")

With objAutoItX
.Run "notepad.exe"
.Sleep 1000

.AutoItSetOption "WinTitleMatchMode", 4
.WinSetTitle "[CLASS:Notepad; REGEXPTITLE:.*Блокнот]", "", "Мой Блокнот"
End With

Set objAutoItX = Nothing

WScript.Quit 0або dynwrapx.dll (http://www.script-coding.info/dynwrapx.html) (для «FindWindow»/«SetWindowText»).

Естественно, так же можно пользовать и указанные Вами Выше AutoIt или NirCmd.

AlexM
26-11-2010, 23:45
Спасибо! по ссылке по AutoIt нашел функцию WinSetTitle, которую и применил напрямую в AutoIt.

Iska
26-11-2010, 23:58
Коль AutoIt был предпочтителен, тогда бы следовало именно его указывать в первую очередь ;), коллега:…изменять названия окон скриптом VBS (можно и autoIt или nircmd). »
и создавать тему в соседнем (http://forum.oszone.net/forum-103.html) форуме.




© OSzone.net 2001-2012