MsgBoxes with OK & Cancel

[James]

Hello.

I just need some quick help on MsgBoxes.

Heres what I need to do.

If you press New, then it will check $DocEd1 for text, if there is none, it will clear the box. But if there is text in $DocEd1 then I need a MsgBox with Yes and No.

MsgBox(0x1004, "Save Document?", "There is text in the document, would you like to save it?")
oÝ÷ ØØzȬ¦·¬±çb·¥Æ¯z+pØZºÚ"µÍÌÍÔØ]QH[TØ]QX[ÙÊ    ][ÝÔØ]I][ÝË^QØÝ[Y[Ñ ][ÝÕ^ØÝ[Y[


_ÙXÝHØÝ[Y[

XÝ
_]]Ú]ØØÝ[Y[

]LÊI][ÝËMBTÝÚ]ÚÕRPÝXY
    ÌÍÑØÌJBBPØÙHBIÌÍÝ^HÕRPÝXY
    ÌÍÑØÑYJBQ[ÝÚ]ÚIÌÍÙ[Z[HH[SÜ[ ÌÍÔØ]QBQ[UÜ]J  ÌÍÙ[Z[K  ÌÍÝ^
BQ[PÛÜÙJ ÌÍÙ[Z[JB

But if there isn't it will clear the box.

Secure

Edit: Just changed the MsgBox to yes and no with 0x1004, but the same question please.

Edited December 28, 2006 by Secure_ICT

[Xenobiologist]

Hi,

sorry I do not get it. :"> Can you post an working example?

So long,

Mega

[James]

Thats the point Mega, I would post an example if I could get it working

OK, Ill try explain again.

User presses New.

The program reads $DocEd1 for text, if there is none, then it will do:

$Empty = ""
GuiCtrlSetData($DocEd1, $Empty)
[/autoit[

But if there is text then it will display the Yes/No box which asks if they want to save.

If the user presses Yes, then the Save box will appear 
[autout]
$SaveDir = FileSaveDialog("Save", @MyDocumentsDir, "Text Document(*.txt)|Secure Document(*.ict)|Autoit Doccument(*.au3)", 16)
    Switch GUICtrlRead($Doc1)
        Case 0
        $text = GUICtrlRead($DocEd1)
    EndSwitch
    $filehandle = FileOpen($SaveDir, 2)
    FileWrite($filehandle, $text)
    FileClose($filehandle)
 oÝ÷ Ø   Ýûazë®Þ²Ç¬­Âív§ÊØbrêÞm*&zØb    bïÛjëh×6
                        If $DocEd1 == $Empty Then 
                            GuiCtrlSetData($Empty)
                        Else
                            $NewDoc =  MsgBox(0x1004, "Save Document?", "There is text in the document, would you like to save it?")
                            If $NewDoc = True Then
                                $SaveDir = FileSaveDialog("Save", @MyDocumentsDir, "Text Document(*.txt)|Secure Document(*.ict)|Autoit Doccument(*.au3)", 16)
                                Switch GUICtrlRead($Doc1)
                                    Case 0
                                        $text = GUICtrlRead($DocEd1)
                                    EndSwitch
                                    $filehandle = FileOpen($SaveDir, 2)
                                    FileWrite($filehandle, $text)
                                    FileClose($filehandle) 
                                Else If $NewDoc = True Then
                                    GuiCtrlSetData($Empty)
                                    EndIf

Edited December 28, 2006 by Secure_ICT

[SmOke_N]

If MsgBox(0x1004, "Save Document?", "There is text in the document, would you like to save it?") = 6 Then 
    MsgBox(64, 'Info', 'You pressed Yes')
Else
    MsgBox(64, 'Info', 'You pressed No')
EndIf

[James]

Thanks Smoke! I'll try it.

[Xenobiologist]

Hi,

#include <GUIConstants.au3>

GUICreate(" My GUI input acceptfile", 320, 120, @DesktopWidth / 2 - 160, @DesktopHeight / 2 - 45, -1, 0x00000018); WS_EX_ACCEPTFILES
$input = GUICtrlCreateInput("", 10, 5, 300, 20)
$btn = GUICtrlCreateButton("Ok", 40, 75, 60, 20)

GUISetState()


While 1
    Switch GUIGetMsg()
        Case $btn
            If GUICtrlRead($input) = "" Then
                $a = MsgBox(0x1004, "", "What?")
                If $a = 6 Then
                    MsgBox(0, "", "yes!")
                Else
                    MsgBox(0, "", "No!")
                EndIf

                ;ExitLoop
            EndIf
    EndSwitch
WEnd

So long,

Mega

[James]

Case $New
                        $Enpty = ""
                        If $DocEd1 = $Empty Then 
                            GuiCtrlSetData($Empty)
                        Else
                            If MsgBox(0x1004, "Save Document?", "There is text in the document, would you like to save it?") = 6 Then 
                                $SaveDir = FileSaveDialog("Save", @MyDocumentsDir, "Text Document(*.txt)|Secure Document(*.ict)|Autoit Doccument(*.au3)", 16)
                                Switch GUICtrlRead($Doc1)
                                    Case 1
                                        $text = GUICtrlRead($DocEd1)
                                    EndSwitch
                                    $filehandle = FileOpen($SaveDir, 2)
                                    FileWrite($filehandle, $text)
                                    FileClose($filehandle)
                                Else
                                    GuiCtrlSetData($Empty)
                        EndIf

Does not work.

[SmOke_N]

And what doesn't work? Are supposed to guess what you've messed up on?

[James]

I've done it now.

Thanks everyone

Case $New
            If GuiCtrlRead($DocEd1) = "" Then
                GuiCtrlSetdata($DocEd1, "")
                Else
            $newsave = MsgBox(0x1004, "Save Document?", "There is text in the document, would you like to save it?")
            If $newsave = 6 Then
                $SaveDir1 = FileSaveDialog("Save", @MyDocumentsDir, "Text Document(*.txt)|Secure Document(*.ict)|Autoit Doccument(*.au3)", 16)
                    Switch GUICtrlRead($Doc1)
                        Case 0
                            $text = GUICtrlRead($DocEd1)
                        EndSwitch
                    $filehandle = FileOpen($SaveDir1, 2)
                    FileWrite($filehandle, $text)
                    FileClose($filehandle)
                    Else
                        GuiCtrlSetData($DocEd1, "")
                    EndIf
                    EndIf