Gui Input Control Crashing Autoit

[HardCopy]

Hi the following code causes autoit to crash

Release + beta - Autoit / tried each - both crash.

Could some one confirm if getting same result.

reduced code for testing only.

Idea is user clicks button asking for a few digit input. Closes after x seconds.

#include <GuiConstants.au3>
GuiCreate("MyGUI", 392, 323,(@DesktopWidth-392)/2, (@DesktopHeight-323)/2 )

$Button_1 = GuiCtrlCreateButton("Test", 60, 50, 70, 40)

GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg = $Button_1
        test()
    Case Else
    ;;;
    EndSelect
WEnd
Exit

func test()
    $testbox=GUICtrlCreateInput("Test",200,70,100,25)
    Sleep(3000)
    GUICtrlDelete($testbox)
EndFunc

Type something into the box, it closes automatically after 3 seconds then press TEST button again to repeat , BANG autoit crashes.

Is my code doing something illegal here? Or is this a bug.

Thanks

HardCopy

[hgeras]

#include <GuiConstants.au3>
GuiCreate("MyGUI", 392, 323,(@DesktopWidth-392)/2, (@DesktopHeight-323)/2 )

$Button_1 = GuiCtrlCreateButton("Test", 60, 50, 70, 40)

GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg = $Button_1
        test()
    EndSelect
WEnd
Exit

func test()
    Dim $testbox ; <-- You have to do this to nullify the control completely
    $testbox=GUICtrlCreateInput("Test",200,70,100,25)
    Sleep(3000)
    GUICtrlDelete($testbox)
EndFunc

Now it doesnt crash...

C ya

[HardCopy]

#include <GuiConstants.au3>
GuiCreate("MyGUI", 392, 323,(@DesktopWidth-392)/2, (@DesktopHeight-323)/2 )

$Button_1 = GuiCtrlCreateButton("Test", 60, 50, 70, 40)

GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg = $Button_1
        test()
    EndSelect
WEnd
Exit

func test()
    Dim $testbox; <-- You have to do this to nullify the control completely
    $testbox=GUICtrlCreateInput("Test",200,70,100,25)
    Sleep(3000)
    GUICtrlDelete($testbox)
EndFunc

Now it doesnt crash...

C ya

<{POST_SNAPBACK}>

hgeras

Nope still crashes !...

Thx for your time though

HardCopy

[SmOke_N]

#include <GuiConstants.au3>
GuiCreate("MyGUI", 392, 323,(@DesktopWidth-392)/2, (@DesktopHeight-323)/2 )

$Button_1 = GuiCtrlCreateButton("Test", 60, 50, 70, 40)

GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg = $Button_1
        test()
    EndSelect
WEnd
Exit

func test()
    $testbox=GUICtrlCreateInput("Test",200,70,100,25)
    GUISetState(); you added a new GUI control, but never set the state for the GUI again
    Sleep(3000)
    GUICtrlDelete($testbox)
EndFunc

Edit: Fixed misspelled word.

Edited August 7, 2005 by ronsrules

[SmOke_N]

Or this might be better... dunno (not really a gui nut )

func test()
    $testbox=GUICtrlCreateInput("Test",200,70,100,25)
    GUICtrlSetState($testbox,""); you added a new guictrl, but never set the state for the gui again
    Sleep(3000)
    GUICtrlDelete($testbox)
EndFunc

[hgeras]

Now this code works 100%...

#include <GuiConstants.au3>
GuiCreate("MyGUI", 392, 323,(@DesktopWidth-392)/2, (@DesktopHeight-323)/2 )

$Button_1 = GuiCtrlCreateButton("Test", 60, 50, 70, 40)
Dim $testbox
GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg = $Button_1
        test()
    EndSelect
WEnd
Exit

func test()
    
    $testbox=GUICtrlCreateInput("Test",200,70,100,25)
    Sleep(3000)
    Guictrlsetdata($testbox,"Test");<-- Add this before deleting the control
    GUICtrlDelete($testbox)
    
EndFunc

The crash happens when the control has different data when it was first made and then deleted.... So if you Create input ,be sure to return it in its creation data.In that case , when it was made it had "Test" for data. If you write in the input "12345" then it will crash next time you press button.So you set the data in the input right before deleting it again to "Test".If the creation value was "" then you should put "" again before deleting....

C ya

Edited August 7, 2005 by hgeras

[HardCopy]

Now this code works 100%...

#include <GuiConstants.au3>
GuiCreate("MyGUI", 392, 323,(@DesktopWidth-392)/2, (@DesktopHeight-323)/2 )

$Button_1 = GuiCtrlCreateButton("Test", 60, 50, 70, 40)
Dim $testbox
GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg = $Button_1
        test()
    EndSelect
WEnd
Exit

func test()
    
    $testbox=GUICtrlCreateInput("Test",200,70,100,25)
    Sleep(3000)
    Guictrlsetdata($testbox,"Test");<-- Add this before deleting the control
    GUICtrlDelete($testbox)
    
EndFunc

The crash happens when the control has different data when it was first made and then deleted.... So if you Create input ,be sure to return it in its creation data.In that case , when it was made it had "Test" for data. If you write in the input "12345"  then it will crash next time you press button.So you set the data in the input right before deleting it again to "Test".If the creation value was "" then you should put "" again before deleting....

C ya

<{POST_SNAPBACK}>

@ron / no go ron, i tried that already.

Well done hgeras, that did it.

Thank you both for sharing the problem.

@developers, no mention of this in documentation, can it be added.? Or is this just unique failure in the dirty method im using?

Hardcopy

[SmOke_N]

ahh... lol, add the one word "Test", well at least I set hgeras on the right path , glad it works for ya.

[jpm]

THanks,

wil be fixed in 3.1.1.67