eightban's memo

残しておきたい記事をまとめてみました。このブログに書いてあるドキュメントやブログで配布しているファイルの使用によって発生するいかなる損害に対してもこのブログの管理者は責任を負いません。使用する場合は自己責任のもとに使用してください。

AutoIt

autoit で指定したウィンドウ 監視してウィンドウを自動的に閉じる

更新日:

簡単な gui を作成

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Opt("GUIOnEventMode", 1)  ; Change to OnEvent mode
$mainwindow = GUICreate("auto close", 70, 70)
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
$msg1="stopping"
$label1=GUICtrlCreateLabel($msg1, 10, 10)
$button1 = GUICtrlCreateButton("push", 10, 20,50, 50)
GUICtrlSetOnEvent($button1, "OKButton")
GUISetState(@SW_SHOW)

While 1
  Sleep(1000)  ; Idle around
  if $msg1="stopping"  Then
  Else
    _osu()
  EndIf
WEnd

Func OKButton()
;  MsgBox(0, "GUI Event", "You pressed OK!")
if $msg1="stopping"  Then
  $msg1="executing"
Else
  $msg1="stopping"
EndIf
GUICtrlSetData ($label1, $msg1)
EndFunc

Func CLOSEClicked()
 ; MsgBox(0, "GUI Event", "You clicked CLOSE! Exiting...")
Exit
EndFunc
;===========================
Func _osu()
if    WinWait("ファイルの削除", "",3) Then
		sleep(50)
    ControlClick ("ファイルの削除","","Button1")
;	ControlSend("ファイルの削除","{ENTER}")
EndIf
EndFunc

ボタンを押して監視を始めてください。監視を止める時はもう一度ボタンを押します

その他

コピペした後は下にある文字は次のように変更してください
&#91; [
&amp; &
&lt; <
&gt; >

-AutoIt

Copyright© eightban's memo , 2024 All Rights Reserved Powered by STINGER.