UWSC初心者用スレ2 (285ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

170(3): 2022/08/14(日)00:19 ID:1XEnC456(1/2) AAS
>>169
ごめんなさい、説明不足でした
そのブラウザゲームというのが、ブラウザから独立したアプリ？のような扱いになっているので、
タイトル名にChromeやEdgeといった文字が含まれておらず、ゲーム名だけなのです

---

172(1): 2022/08/14(日)09:26 ID:C9iCXLwP(1/2) AAS
>>170
タイトル指定が面倒な時の裏技みたいなもんだから、ChromeやEdgeがタイトルに含まれてる必要はないよ

---

173(2): 2022/08/14(日)09:58 ID:9+drVVHY(1) AAS
>>170
GETIDはタイトルだけじゃなくてクラス名も指定できる
これでChromeとEdgeの識別ができる
クラス名はChromeとEdgeの片方を起動した状態で
GETALLWIN()
FOR win IN ALL_WIN_ID
IF STATUS(win,ST_TITLE) = "ゲーム名" THEN PRINT STATUS(win,ST_CLASS)
NEXT
で取得できる
何をしてるかはヘルプのGETALLWINとSTATUSを読めばわかるとおもう

---

179: 2022/08/15(月)04:20 ID:pm4LQRan(1/2) AAS
>>170
試しにこれを実行してみてほしい

DIM sSearchTitle = INPUT("指定するブラウザのアクティブなタブ表示を入力")
DIM idWnd = getid(sSearchTitle)

DIM sBrowserName = WhatBrowser(idWnd)
MSGBOX("ブラウザは"+sBrowserName)

FUNCTION WhatBrowser(idWnd)
　RESULT = "不明"
　DIM sFullTitle = STATUS(idWnd, ST_TITLE)
　//MSGBOX(sFullTitle)
　INPUT("ウィンドウのフルタイトル", sFullTitle )
　IFB POS( " - Google Chrome", sFullTitle) THEN
　　RESULT = "Chrome"
　ELSEIF POS( " - Chromium", sFullTitle) THEN
　　RESULT = "Chromium"
//　ELSEIF POS( " - Microsoft​ Edge", sFullTitle) THEN
　　// Microsoftの後ろはゼロ幅スペース: U+200Bに続いて通常のスペース
　　// UTF-8 保存でなら使用できる
　ELSEIF POS( " - Microsoft", sFullTitle) AND POS(" Edge", sFullTitle) THEN
　　RESULT = "Edge"
　ELSEIF POS( " - Vivaldi", sFullTitle) THEN
　　RESULT = "Vivaldi"
　ENDIF
FEND

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ

---

ぬこの手 ぬこTOP 0.014s