【UWSC】指定ウィンドウ内のキャプション文字取得

//全角入力の場合は半角入力に直しておく

IF GETKEYSTATE(TGL_IME) THEN KBD(VK_KANJI,CLICK)

DIM get_ID[GETALLWIN()]

DIM m = 0
DIM count_m = 0

//DIM array[] = "BTN", "LIST", "TAB", "MENU", "TREEVIEW", "LISTVIEW", "EDIT", "STATIC", "STATUSBAR", "TOOLBAR", "LINK", "ACCCLK", "ACCCLK2", "ACCEDIT", "FROMLAST", "BACK"



FOR i = 0 to GETALLWIN()-1

IFB POS("MAGI" ,STATUS(ALL_WIN_ID[i],ST_TITLE)) <> 0 THEN

		get_ID[m] = ALL_WIN_ID[i]

		

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

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

	//FOR item IN array

		DIM num = GETITEM(ALL_WIN_ID[i], EVAL("ITM_ACCTXT"))

		FOR k =  0 TO num - 1

			IF  POS("終了(ESC)",ALL_ITEM_LIST[k]) <> 0 THEN

				CTRLWIN(get_ID[m], MAX)
				CTRLWIN(get_ID[m], ACTIVATE)


				CLKITEM(get_ID[m], "終了(ESC)", CLK_ACC)

			ENDIF

			IF  POS("クリア",ALL_ITEM_LIST[k]) <> 0 THEN

				CTRLWIN(get_ID[m], MAX)
				CTRLWIN(get_ID[m], ACTIVATE)

				CLKITEM(get_ID[m], "終了", CLK_ACC)

			ENDIF

		NEXT

	//NEXT

	ENDIF

ENDIF

m = m + 1

NEXT

count_m = m

//FOR m = 0 TO count_m - 1

//	CTRLWIN(get_ID[m], MAX)
//	CTRLWIN(get_ID[m], ACTIVATE)

//	CLKITEM(get_ID[m], "終了")

//	SLEEP(1)

//NEXT

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