How to send a command to close a window

[WiorDi37]

Hello, Everyone!

I want when clicking the exit button the window will close. If content changes upon exit the program will automatically choose not save.

Look forward to the help, thanks.

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <AutoItConstants.au3>

$GUI = GUICreate("Form1", 220, 119, 192, 124, $WS_SYSMENU)
GUISetFont(10, 400, 0, "Tahoma")
GUICtrlCreateGroup("Chuẩn bị trình chiếu", 16, 16, 185, 65)
$ok_Button = GUICtrlCreateButton("Ok", 32, 48, 75, 25)
$exit_Button = GUICtrlCreateButton("Exit", 112, 48, 75, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $ok_Button
            ShellExecute(@MyDocumentsDir&'\Dich-thuat\Short-Document.pdf', "", "", Default, @SW_MAXIMIZE)
            WinWaitActive("Data and Computer Communications (Eighth Edition) - Google Chrome")
            ShellExecute(@MyDocumentsDir&'\Dich-thuat\Document.rtf', "", "", Default, @SW_MAXIMIZE)
            WinWaitActive("Document.rtf [Compatibility Mode] - Word")
            ShellExecute(@MyDocumentsDir&'\Dich-thuat\Presentation1.pptx', "", "", Default, @SW_MAXIMIZE)
            WinWaitActive("Presentation1.pptx - PowerPoint")
            MouseClick("left", 1381, 886, 1)
            Sleep(2000)
            MsgBox(64, "Thông báo", "Đã chuẩn bị xong")
        Case $exit_Button
            WinClose("Presentation1.pptx - PowerPoint")
            
            ;I need help handling this place
        
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

 

[WiorDi37]

Sorry because my English is bad.

Edited September 23, 2017 by WiorDi37

[careca]

Winwait for that window and controlclick the button you want.

[WiorDi37]

 

I do not want to use ControlClick or MouseClick. Is there a way to use with "send" not?

Example:

WinActivate("Microsoft PowerPoint", "&Don't Save")
Send("!n")

I have tried but it's failed.

 

[careca]

What about this?

WinWaitActive("Microsoft PowerPoint", "Save")
Send("!n")