Advertisement
Guest User

Untitled

a guest
Aug 18th, 2017
72
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 0.82 KB | None | 0 0
  1. #include <ButtonConstants.au3>
  2. #include <EditConstants.au3>
  3. #include <GUIConstantsEx.au3>
  4. #include <ListViewConstants.au3>
  5. #include <StaticConstants.au3>
  6. #include <WindowsConstants.au3>
  7. #include <GuiListView.au3>
  8. #include <File.au3>
  9. #Include <Misc.au3>
  10. #include <Sound.au3>
  11. #include <ImageSearch.au3>
  12.  
  13. $x = 0
  14. $y = 0
  15. $gui = 0
  16. $active = 0
  17. $button = 0
  18.  
  19.  
  20.  
  21. while 1
  22.     $bild = _ImageSearch("FreeMail Login.bmp", 1, $x, $y, 1)
  23.     If $bild = 1 Then
  24.         if $active = 0 then
  25.             $gui=guicreate("Button", 41, 20, $x + 140, $y - 6, $WS_POPUP, $WS_EX_TOPMOST)
  26.             $button=GUICtrlCreatePic("button.bmp", 0, 0, 41, 20)
  27.             guisetstate(@SW_show)
  28.             $active = 1
  29.         endif  
  30.     Else
  31.         GUIDelete($gui)
  32.         $active = 0
  33.     EndIf
  34.        
  35.     sleep (200)
  36.    
  37.     GUICtrlSetOnEvent($button, aktion())
  38. wend   
  39.  
  40. func aktion()
  41.     MsgBox(1, "teset", "test")
  42. EndFunc
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement