1 Attachment(s)
MultClient Perfect World in AutoiT
Estarei postando um *Multclient* muito simples para 'PerfectWorld'.
English
I'll be posting a very simple Multclient for PerfectWorld
[Only registered and activated users can see links. Click Here To Register...]
Tutorial
1° Digite no primeiro espaço o nome da janela a ser alterada.
[Only registered and activated users can see links. Click Here To Register...]
2° Digite no segundo espaço o novo nome da janela.
[Only registered and activated users can see links. Click Here To Register...]
3° Pressione 'Renomear'.
Tutorial English
1° Enter the first space window name to be changed.
[Only registered and activated users can see links. Click Here To Register...]
2° Enter the second space new window name.
[Only registered and activated users can see links. Click Here To Register...]
3° Press 'Renomear'.
Código em AutoIt.
CÓDIGO ( CODE )
Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Renomeador", 223, 131, 200, 200)
GUISetOnEvent($GUI_EVENT_CLOSE, "exit_")
$input1 = GUICtrlCreateInput("Element Client", 24, 40, 113, 21)
$Input2 = GUICtrlCreateInput("Element Client2", 24, 88, 113, 21)
$Button1 = GUICtrlCreateButton("Renomear", 144, 40, 67, 65)
GUICtrlSetOnEvent($Button1, "rename")
$Button2 = GUICtrlCreateButton("1", 24, 16, 19, 17)
GUICtrlSetOnEvent($Button2, "rename_1")
$Button3 = GUICtrlCreateButton("2", 48, 16, 19, 17)
GUICtrlSetOnEvent($Button3, "rename_2")
$Button4 = GUICtrlCreateButton("3", 72, 16, 19, 17)
GUICtrlSetOnEvent($Button4, "rename_3")
$Button5 = GUICtrlCreateButton("4", 96, 16, 19, 17)
GUICtrlSetOnEvent($Button5, "rename_4")
$Button6 = GUICtrlCreateButton("5", 120, 16, 19, 17)
GUICtrlSetOnEvent($Button6, "rename_5")
$Button7 = GUICtrlCreateButton("1", 24, 64, 19, 17)
GUICtrlSetOnEvent($Button7, "rename_6")
$Button8 = GUICtrlCreateButton("2", 48, 64, 19, 17)
GUICtrlSetOnEvent($Button8, "rename_7")
$Button9 = GUICtrlCreateButton("3", 72, 64, 19, 17)
GUICtrlSetOnEvent($Button9, "rename_8")
$Button10 = GUICtrlCreateButton("4", 96, 64, 19, 17)
GUICtrlSetOnEvent($Button10, "rename_9")
$Button11 = GUICtrlCreateButton("5", 120, 64, 19, 17)
GUICtrlSetOnEvent($Button11, "rename_10")
$Group1 = GUICtrlCreateGroup("Renomear Janelas", 8, 0, 209, 121, BitOR($GUI_SS_DEFAULT_GROUP,$BS_CENTER))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
sleep(100)
WEnd
Func rename()
$old_name = GUICtrlRead($Input1)
$new_name = GuiCtrlRead($Input2)
WinSetTitle($old_name,"",$new_name)
EndFunc
Func rename_1()
GUICtrlSetData ($Input1,"Element Client")
EndFunc
Func rename_2()
GUICtrlSetData ($Input1,"Element Client2")
EndFunc
Func rename_3()
GUICtrlSetData ($Input1,"Element Client3")
EndFunc
Func rename_4()
GUICtrlSetData ($Input1,"Element Client4")
EndFunc
Func rename_5()
GUICtrlSetData ($Input1,"Element Client5")
EndFunc
Func rename_6()
GUICtrlSetData ($Input2,"Element Client2")
EndFunc
Func rename_7()
GUICtrlSetData ($Input2,"Element Client3")
EndFunc
Func rename_8()
GUICtrlSetData ($Input2,"Element Client4")
EndFunc
Func rename_9()
GUICtrlSetData ($Input2,"Element Client5")
EndFunc
Func rename_10()
GUICtrlSetData ($Input2,"Element Client6")
EndFunc
Func exit_()
Exit
EndFunc
Compatibilidade:
Todos sistemas operacionais
Scan:
[Only registered and activated users can see links. Click Here To Register...]
Downloads
