[ZeroCrash]

Код:

#include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <TreeViewConstants.au3>  $hGUI = GUICreate("Генератор отчётов. Версия 2.0", 445, 315)  $TreeView = GUICtrlCreateTreeView(6, 6, 212, 300, -1, $WS_EX_STATICEDGE+$WS_EX_CLIENTEDGE) $BS_MULTILINE =  #Region General TVItem $General_TVItem = GUICtrlCreateTreeViewItem("Россия", $TreeView) GUICtrlSetColor(-1, 0x0000C0)  $iGeneral_Last_Item = GUICtrlCreateDummy() #EndRegion General TVItem #Region Ярославская область $About_TVItem35 = GUICtrlCreateTreeViewItem("Ярославская область", $General_TVItem)   $okbutton35 = GUICtrlCreateButton("Переславль-" & @CRLF & "Залесский", 230, 20, 95, 40, $BS_MULTILINE) GUICtrlSetState(-1, $GUI_HIDE)  $iAbout_Last_Item35 = GUICtrlCreateDummy() #EndRegion 35 TVItem  $iLast_TVItemsID = GUICtrlCreateDummy() GUISetState()  While 1     $nMsg = GUIGetMsg()      Switch $nMsg Case $GUI_EVENT_CLOSE     Exit $okbutton35     If Random() < 0.5 Then Run(@ComSpec & " /c Start M_Pereslavl'-Zalesskij.bat") Else Run(@ComSpec & " /c Start Z_Pereslavl'-Zalesskij.bat") Endif                  Case $General_TVItem, $About_TVItem35                  $iEnd_ItemID = 0             Switch $nMsg                 Case $General_TVItem                     $iEnd_ItemID = $iGeneral_Last_Item                 Case $About_TVItem35                     $iEnd_ItemID = $iAbout_Last_Item35                             EndSwitch              $sExclude_IDs = $General_TVItem              _GUICtrlTreeView_ToggleItemsState($General_TVItem, $iLast_TVItemsID, $nMsg+1, $iEnd_ItemID, $sExclude_IDs)     EndSwitch     WEnd   Func _GUICtrlTreeView_ToggleItemsState($iHideStartID, $iHideEndID, $iShowStartID, $iShowEndID, $sExclude_IDs="")     If $sExclude_IDs <> "" Then $sExclude_IDs = "|" & $sExclude_IDs & "|"      For $i = $iHideStartID To $iHideEndID         If $sExclude_IDs = "" Or Not StringInStr($sExclude_IDs, "|" & $i & "|") Then GUICtrlSetState($i, $GUI_HIDE)     Next      For $i = $iShowStartID To $iShowEndID         If $sExclude_IDs = "" Or Not StringInStr($sExclude_IDs, "|" & $i & "|") Then GUICtrlSetState($i, $GUI_SHOW)     Next EndFunc