Что нового

[Элементы GUI] Сохранить и восстановить значения, выбранные в ListBox

alexingor

Новичок
Сообщения
10
Репутация
0
Здравствуйте. Раньше никогда не пользовался GUI, теперь в нем возникла необходимость. Создал форму, на ней 2 ListBox-a. Не могу решить элементарной задачи - при изменении любого из них осуществить сохранение значений / индексов в текстовый файл, а при запуске программы его восстановить. То есть не могу получить то, что в делфях называется ListBox.Items.ItemIndex. Голова, пухнет, помогите. :stars:
 
Автор
A

alexingor

Новичок
Сообщения
10
Репутация
0
Забыл приложить свой скрипт.
Код:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=P:\mydocs\_delphi\AIDict\aiStream\aiStream.kxf
$Form1_1 = GUICreate("aiStream", 272, 175, 192, 124)
$List1 = GUICtrlCreateList("", 8, 27, 121, 110)
GUICtrlSetData(-1, "Foxit|Google|Word|Yandex|Другой")
$List2 = GUICtrlCreateList("", 136, 27, 129, 110)
GUICtrlSetData(-1, "aiStream|Google|Yandex|Поиск")
$Label1 = GUICtrlCreateLabel("Источник", 41, 8, 52, 17)
$Label2 = GUICtrlCreateLabel("Приемник", 174, 8, 56, 17)
$Button1 = GUICtrlCreateButton("Close All", 96, 144, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=aiStream.ico
#AutoIt3Wrapper_Outfile=aiStream.exe
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****


#include <MsgBoxConstants.au3>
#include <Array.au3>
Global $Paused
Opt('GUICoordMode', 0)

HotKeySet('`', 'DoIt')

While 1
	$nMsg = GUIGetMsg()
	If $nMsg=$List1 Then
		; ...
	ElseIf $nMsg=$List2 Then
		; ...
	Elseif $nMsg=$Button1 Then
		Exit
	EndIf
WEnd
	;===

Func DoIt()
	; ...
EndFunc
 
Верх