Pliki konfiguracyjne

[XxToMcIoxX]

Mam problem gdyz chce aby po wpisaniu sciezki w input zapisalo mi ja w pliku .ini i pozniej odczytalo i pojawil sie msgbox z ta sciezka

kod:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Konfiguracja Metina", 273, 256, 192, 124)
$Label1 = GUICtrlCreateLabel("Podaj sciezke do folderu z Metinem", 16, 8, 215, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Input1 = GUICtrlCreateInput("", 16, 40, 225, 21)
$Input2 = GUICtrlCreateInput("", 16, 72, 225, 21)
$Input3 = GUICtrlCreateInput("", 16, 104, 225, 21)
$Input4 = GUICtrlCreateInput("", 16, 136, 225, 21)
$Input5 = GUICtrlCreateInput("", 16, 168, 225, 21)
$Zapisz = GUICtrlCreateButton("Zapisz", 128, 200, 97, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Zapisz
$wynik1 = GUICtrlRead($Input1)
$wynik2 = GUICtrlRead($Input2)
$wynik3 = GUICtrlRead($Input3)
$wynik4 = GUICtrlRead($Input4)
$wynik5 = GUICtrlRead($Input5)
IniWrite("ustawienia.ini","Slot1","",$wynik1)
IniWrite("ustawienia.ini","Slot2","",$wynik2)
IniWrite("ustawienia.ini","Slot3","",$wynik3)
IniWrite("ustawienia.ini","Slot4","",$wynik4)
IniWrite("ustawienia.ini","Slot5","",$wynik5)
MsgBox(0,"Zapisano","Pomyslnie zapisano sciezke")
$metin2_1 = IniReadSection ( "ustawienia.ini", "Slot1" )
$metin2_2 = IniReadSection ( "ustawienia.ini", "Slot2" )
$metin2_3 = IniReadSection ( "ustawienia.ini", "Slot3" )
$metin2_4 = IniReadSection ( "ustawienia.ini", "Slot4" )
$metin2_5 = IniReadSection ( "ustawienia.ini", "Slot5" )
MsgBox(0,"Sciezka metina",$metin2_1)
EndSwitch
WEnd

[karolkarol21621]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Konfiguracja Metina", 273, 256, 192, 124)
$Label1 = GUICtrlCreateLabel("Podaj sciezke do folderu z Metinem", 16, 8, 215, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Input1 = GUICtrlCreateInput("", 16, 40, 225, 21)
$Input2 = GUICtrlCreateInput("", 16, 72, 225, 21)
$Input3 = GUICtrlCreateInput("", 16, 104, 225, 21)
$Input4 = GUICtrlCreateInput("", 16, 136, 225, 21)
$Input5 = GUICtrlCreateInput("", 16, 168, 225, 21)
$Zapisz = GUICtrlCreateButton("Zapisz", 128, 200, 97, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Zapisz
$wynik1 = GUICtrlRead($Input1)
$wynik2 = GUICtrlRead($Input2)
$wynik3 = GUICtrlRead($Input3)
$wynik4 = GUICtrlRead($Input4)
$wynik5 = GUICtrlRead($Input5)
IniWrite("ustawienia.ini","Slot1","1",$wynik1)
IniWrite("ustawienia.ini","Slot2","2",$wynik2)
IniWrite("ustawienia.ini","Slot3","3",$wynik3)
IniWrite("ustawienia.ini","Slot4","4",$wynik4)
IniWrite("ustawienia.ini","Slot5","5",$wynik5)
MsgBox(0,"Zapisano","Pomyslnie zapisano sciezke")
$metin2_1 = IniRead( "ustawienia.ini", "Slot1", "1", "" )
$metin2_2 = IniRead( "ustawienia.ini", "Slot2", "2", "" )
$metin2_3 = IniRead( "ustawienia.ini", "Slot3", "3", "" )
$metin2_4 = IniRead( "ustawienia.ini", "Slot4", "4", "" )
$metin2_5 = IniRead( "ustawienia.ini", "Slot5", "5", "" )
MsgBox(0,"Sciezka metina",$metin2_1)
EndSwitch
WEnd

[jackraymund]

może zwyklego iniread spróbuj(ostatnią flage ustaw na pustą)