UWSC 指定ウィンドウが表示するまで待機してクリック

//「完了」ウィンドウが表示されるまでループ監視
REPEAT

	DIM f = 0
	SLEEP(0.1)
	
UNTIL check_finish(f) <> 1


//「完了」ウィンドウの監視する関数
PROCEDURE check_finish(f)

FOR i = 0 to GETALLWIN()-1

//「MAGI」のウィンドウがあったら、
	IF POS( "MAGI" ,STATUS(ALL_WIN_ID[i],ST_TITLE) ) <> 0 THEN

//ウインドウ内のキャプション文字を取得
		IF  GETITEM(ALL_WIN_ID[i],ITM_ACCTXT) <> 0 THEN

//取得したテキストに「完了」の文言があるか

			IF  POS("完了",ALL_ITEM_LIST[0]) <> 0 THEN //目当ての文字列はALL_ITEM_LIST[0]にある
				
				f = f + 1
				KBD(VK_RETURN,CLICK,10)
				BREAK

			ELSE

				BREAK

			ENDIF


		ENDIF

	ENDIF

NEXT

FEND


この記事が気に入ったらサポートをしてみませんか?