Usando ToolTip

Oi gente, eu vo ta ensinando como usa ToolTip no AutoIT, pra dexa o programa um pouco + morderno.
Isso é bem utel, entao vamos lá.

Tutorial



Bom primeiro nois vamos definir HotKeys, faça assim, ou do jeito que vc quizer...:


Citação:

HotKeySet("{F9}","EnviarTecla") HotKeySet("{F10}","ExitApp")

Entendendo...:

HotKeySet : Vamos definir uma Hotkey para um funçao...

("{F9}" : Tecla que deve ser apertada para executar a funçao(entre chaves)

,"EnviarTecla": Nome da funçao que deverá ser chamada ao pressionar a tecla acima.

E a mesma coisa com a Hotkey do "ExitApp".

Logo após definir as Hotkeys do programa, vamos criar o ToolTip, é muito facil
escreva o seguinte:


Citação:

ToolTip("F9-Enviar tecla F10-Sair",0,0)

Entendendo, o uso do ToolTip é assim:

Tooltip("Texto que vai aparecer",Posiçao X,Posiçao Y)

Posiçao X e Y, é aonde o ToolTip vai aparecer...,ali emcima aonde ta ",0,0"
seria a parte Superio Esquerda da Tela ^^

Depois de Colocar sua ToolTip, vamo criar uma variavel,pra fica + facil fazer nosssa funçao, entao declare:


Citação:

Dim $baby=false

Meu codigo até agora ficou assim:


Citação:

HotKeySet("{F9}","EnviarTecla") HotKeySet("{F10}","ExitApp") ToolTip("F9-Enviar tecla F10-Sair",0,0) Dim $baby=false

O codigo da funçao agora:

Vc ja deve saber como envia Teclas, + se nao souber é so da uma olhada nos topicos dessa area, ok?

Vamo pra primeira funçao, a funçao "EnviarTecla"


Citação:

Func EnviarTecla () if $baby=False Then $baby=true ToolTip("Enviando Tecla....",0,0) else $baby=False ToolTip("F9-Enviar tecla F10-Sair",0,0) endif endfunc

Vamos entender o Codigo:

1: Aqui definimos uma funçao, os paretenses vasios "()", diz que é uma funçao sem parâmetros.(outro tutorial explico kkk)

2: Aqui é dada uma condiçao(if= se)....
Se $baby(nossa variavel), estiver "false" entao(then)...
Deixamos a variavel $baby como True
e mudamos o texto do nosso ToolTip para "Enviando Tecla...."

3: Aqui temos outra condiçao,else(senão ou se nao for), que ira acontecer caso a primeira condiçao seja falsa....ficaria assim:

Senão...(caso o $baby nao seja False)
Deixamos a variavel $baby como FALSE
Mudamos o ToolTip para o original...

Fim da condiçao If
Fim da funçao



Bom essa aí e a funçao basica, agora vamos para o nosso While ^^


Citação:

While (1) if $baby = true then send ("1 1") endif endW

entendendo:
1: Começamos o While
2: Se $baby for true entao
3: envie a Tecla (1)
4:fim da condiçao IF
5:fim do While



e agora a ultima funçao, o "ExitApp"


Citação:

Func ExitApp() Exit EndFunc

1: Declaremos a Funçao "ExitApp", sem parâmetros
2: Temos o comando "exit", que encerra a aplicaçao
3: Fim da funçao




o meu codigo inteiro ficou assim :


Citação:

HotKeySet("{F9}","EnviarTecla") HotKeySet("{F10}","ExitApp") ToolTip("F9-Enviar tecla F10-Sair",0,0) Dim $baby=false Func EnviarTecla () if $baby=False Then $baby=true ToolTip("Enviando Tecla....",0,0) else $baby=False ToolTip("F9-Enviar tecla F10-Sair",0,0) endif endfunc Func ExitApp() Exit EndFunc While (1) if $baby = true then send ("1 1") endif endW

Vlw Galera, espero que tenhao entendido, se tiver duvidas só postar aqui, vlw ^^