Что нового

Вопрос по GUICtrlCreateCombo

OXIGEN

Новичок
Сообщения
11
Репутация
0
Простейший скрипт с выпадающим списком

Код:
#include <MsgBoxConstants.au3>
#include <GUIConstants.au3>



GUICreate("My GUI combo", 300, 200)
GUICtrlCreateCombo ("", 60,40, 200)
GUICtrlSetData (-1, "1|2|3|4|5|6|7|8|9|10")



GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE

                ExitLoop


    EndSwitch
WEnd


Как сделать, что-бы при выходе из скрипта он запоминал последнее выбранное значение ? То есть, допустим при выборе "5"
и перезапуске скрипта у меня в поле было значение "5".
 

Oki

Осваивающий
Сообщения
221
Репутация
26
Код:
#include <MsgBoxConstants.au3>
#include <GUIConstants.au3>

$sFile = @ScriptDir & "\default.txt"
$hFile = FileOpen($sFile)
$flagFirstRun = @error

GUICreate("My GUI combo", 300, 200)
$Combo = GUICtrlCreateCombo ("", 60, 40, 200)
If $flagFirstRun = -1 Then
   GUICtrlSetData (-1, "1|2|3|4|5|6|7|8|9|10")
Else
   $sDefault = FileReadLine($hFile)
   GUICtrlSetData (-1, "1|2|3|4|5|6|7|8|9|10", $sDefault)
EndIf
FileClose($hFile)

GUISetState(@SW_SHOW)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE

$hFile = FileOpen($sFile, 2)
FileWriteLine($hFile, GUICtrlRead($Combo))
FileClose($hFile)
 
Автор
O

OXIGEN

Новичок
Сообщения
11
Репутация
0
Oki - огромнейшее спасибо! То что надо!
 
Верх