Implemented the new MsgBox() transience on Windows.

1 files changed, 13 insertions, 7 deletions

diff --git a/dialog_windows.go b/dialog_windows.go
index 91507d3..dec06ae 100644
--- a/dialog_windows.go
+++ b/dialog_windows.go
@@ -13,21 +13,27 @@ var (
 	_messageBox = user32.NewProc("MessageBoxW")
 )
 
-func _msgBox(primarytext string, secondarytext string, uType uint32) (result int) {
+func _msgBox(parent *Window, primarytext string, secondarytext string, uType uint32) (result int) {
 	// http://msdn.microsoft.com/en-us/library/windows/desktop/aa511267.aspx says "Use task dialogs whenever appropriate to achieve a consistent look and layout. Task dialogs require Windows Vista® or later, so they aren't suitable for earlier versions of Windows. If you must use a message box, separate the main instruction from the supplemental instruction with two line breaks."
 	text := primarytext
 	if secondarytext != "" {
 		text += "\n\n" + secondarytext
 	}
-	uType |= _MB_TASKMODAL		// make modal to every window in the program (they're all windows of the uitask, which is a single thread)
 	ptext := toUTF16(text)
 	ptitle := toUTF16(os.Args[0])
 	ret := make(chan uiret)
 	defer close(ret)
+	parenthwnd := _HWND(_NULL)
+	if parent != nil {
+		parenthwnd = parent.sysData.hwnd
+		uType |= _MB_APPLMODAL		// only for this window
+	} else {
+		uType |= _MB_TASKMODAL		// make modal to every window in the program (they're all windows of the uitask, which is a single thread)
+	}
 	uitask <- &uimsg{
 		call:		_messageBox,
 		p:		[]uintptr{
-			uintptr(_NULL),
+			uintptr(parenthwnd),
 			utf16ToArg(ptext),
 			utf16ToArg(ptitle),
 			uintptr(uType),
@@ -41,10 +47,10 @@ func _msgBox(primarytext string, secondarytext string, uType uint32) (result int
 	return int(r.ret)
 }
 
-func msgBox(primarytext string, secondarytext string) {
-	_msgBox(primarytext, secondarytext, _MB_OK)
+func msgBox(parent *Window, primarytext string, secondarytext string) {
+	_msgBox(parent, primarytext, secondarytext, _MB_OK)
 }
 
-func msgBoxError(primarytext string, secondarytext string) {
-	_msgBox(primarytext, secondarytext, _MB_OK | _MB_ICONERROR)
+func msgBoxError(parent *Window, primarytext string, secondarytext string) {
+	_msgBox(parent, primarytext, secondarytext, _MB_OK | _MB_ICONERROR)
 }