HSPTV!掲示板

スレッド一覧 | 新規書き込み | 新着一覧 | 使い方 | 過去ログ

未解決

解決

停止

削除要請


	2014 1031	回答者	IEの閉じるリンクを押したことを検出するには	2

回答者

2014/10/31(Fri) 19:03:21|NO.65829

突然ですがIEコンポネントについての質問をさせていただきます。

HSPで一番下のスクリプトを、実行させて画面の閉じるボタンを押したとき、
「ウィンドウは、表示中の Web ページにより閉じられようとしています。
このウィンドウを閉じますか?」
と警告が出て、はいを押すと、ウィンドウは閉じずにIEコンポネントのオブジェクト
だけが、IEのコントロールが切れたみたいになっています。
どうやって、IEが閉じたことを検出すればいいですか。
教えてください。

スクリプトはこれです↓




	//HTMLスクリプトはIEにしか対応していません
	html = {"
	
			<html>
			<head>
			<title>Window Close</title>
			</head>
			<body>
			<script>
			function closeMyself(){
			 window.opener = "myself";
			 window.close();
			}
			</script>
			<input type="button" value="閉じる" onmouseup="return closeMyself();"/>
			</body>
			</html>


	"}
	axobj IE, "Shell.Explorer.2"
	IE -> "Navigate" "about:blank"
	doc = IE("Document")
	doc -> "Open"
	doc -> "Write" html
	doc -> "Close"

この記事に返信する

seasalt

2014/10/31(Fri) 21:36:49|NO.65832

こんな感じでどうでしょうか。IE11で動作確認しました。



	//HTMLスクリプトはIEにしか対応していません
	html = {"
	
			<html>
			<head>
			<title>Window Close</title>
			</head>
			<body>
			<script>
			function closeMyself(){
			 window.opener = "myself";
			 window.close();
			}
			</script>
			<input type="button" value="閉じる" onmouseup="return closeMyself();"/>
			</body>
			</html>


	"}
	axobj IE, "Shell.Explorer.2"

	#define DIID_DWebBrowserEvents2     "{34A715A0-6587-11D0-924A-0020AFC7AC4D}"
	comevent ie_event, IE, DIID_DWebBrowserEvents2,*event

	IE -> "Navigate" "about:blank"
	doc = IE("Document")
	doc -> "Open"
	doc -> "Write" html
	doc -> "Close"

stop

*event
	;	COMイベント処理
	#define DISPID_WINDOWCLOSING	263
	dispid = comevdisp(ie_event)
	if dispid = DISPID_WINDOWCLOSING : gosub *WindowClosing
	return

*WindowClosing
	dialog "ウィンドウを閉じようとしています"
	return

回答者

2014/11/1(Sat) 11:18:28|NO.65834

ありがとうございます！
うまくできました。