İniwrite Sorunu

[Amilo]

Arkadaslar Ben Bir Gui yaptım Inputları Ayar.ini Den Cekiyor Onları Yaptım Ama Inputa Yazılan Yeni Değeri Bir Tuş İle Ayar.ini Ye Hepsini kaydettirmek İstiyorum

Kodum biraz uzun ama yardım ederseniz allah razı olsun derim ;

[code]#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Documents and Settings\Administrator\Desktop\Form1.kxf
;Level
$ArdreamMaxLvl = IniRead("Ayar.ini","LEVEL","ArdreamMaxLevel","Bulunamadi")
$gamemaxlevel = IniRead("Ayar.ini","LEVEL","GameMaxLevel","Bulunamadi")
$darklunarMaxLvl = IniRead("Ayar.ini","LEVEL","DarkLunarMaxLevel","Bulunamadi")
$RonakMinLvl = IniRead("Ayar.ini","LEVEL","RonarkLandMinLevel","Bulunamadi")
$ArdreamMinLvl = IniRead("Ayar.ini","LEVEL","ArdreamMinLevel","Bulunamadi")
$CzMinLvl = IniRead("Ayar.ini","LEVEL","ColonyZoneMinLevel","Bulunamadi")
$RonakMaxLvl = IniRead("Ayar.ini","LEVEL","RonarkLandMaxLevel","Bulunamadi")
$darklunarminLvl = IniRead("Ayar.ini","LEVEL","DarkLunarMinLevel","Bulunamadi")
$Form1 = GUICreate("Form1", 1016, 585, 185, 115)
$ArdreamMaxLevel = GUICtrlCreateInput($ArdreamMaxLvl, 400, 96, 113, 21)
$gamelevel = GUICtrlCreateInput($gamemaxlevel, 400, 32, 113, 21)
$darklunarmax = GUICtrlCreateInput($darklunarMaxLvl, 400, 256, 113, 21)
$ronaklandmin = GUICtrlCreateInput($RonakMinLvl, 400, 160, 113, 21)
$ardreammin = GUICtrlCreateInput($ArdreamMinLvl, 400, 64, 113, 21)
$czmin = GUICtrlCreateInput($CzMinLvl, 400, 128, 113, 21)
$ronakmax = GUICtrlCreateInput($RonakMaxLvl, 400, 192, 113, 21)
$darklunarmin = GUICtrlCreateInput($darklunarminLvl, 400, 224, 113, 21)
$Label11 = GUICtrlCreateLabel("GameMaxLevel", 312, 32, 78, 17)
$ColonyZoneMinLevel = GUICtrlCreateLabel("ColonyZoneMinLevel", 288, 128, 104, 17)
$ArdreamMinLevel = GUICtrlCreateLabel("ArdreamMinLevel", 304, 64, 86, 17)
$Label14 = GUICtrlCreateLabel("ArdreamMaxLevel", 304, 96, 89, 17)
$RonarkLandMinLevel = GUICtrlCreateLabel("RonarkLandMinLevel", 288, 160, 106, 17)
$RonarkLandMaxLevel = GUICtrlCreateLabel("RonarkLandMaxLevel", 288, 192, 109, 17)
$DarkLunarMinLevel = GUICtrlCreateLabel("DarkLunarMinLevel", 296, 224, 97, 17)
$DarkLunarMaxLevel = GUICtrlCreateLabel("DarkLunarMaxLevel", 288, 256, 100, 17)
$Level = GUICtrlCreateGroup("Level", 272, 0, 265, 337)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Odul = GUICtrlCreateGroup("Odul", 0, 0, 273, 337)
GUICtrlCreateGroup("", -99, -99, 1, 1)

;Odul
$ArdreamMonu = IniRead("Ayar.ini","REWARD","ArdreamMonument","Bulunamadi")
$RonakMonu = IniRead("Ayar.ini","REWARD","RonarklandMonument","Bulunamadi")
$CzMonu = IniRead("Ayar.ini","REWARD","CZMonument","Bulunamadi")
$CswIto = IniRead("Ayar.ini","REWARD","CSWItem","Bulunamadi")
$CswNp = IniRead("Ayar.ini","REWARD","CSWLoyalty","Bulunamadi")
$FtpLvl1 = IniRead("Ayar.ini","REWARD","FTLevel1","Bulunamadi")
$FtpLvl2 = IniRead("Ayar.ini","REWARD","FTLevel2","Bulunamadi")
$Ftplv3 = IniRead("Ayar.ini","REWARD","FTLevel3","Bulunamadi")
$CzPkIteKarus= IniRead("Ayar.ini","REWARD","CZPKItemKarus","Bulunamadi")
$CzPkIteKHuman= IniRead("Ayar.ini","REWARD","CZPKItemElmorad","Bulunamadi")

$Input1 = GUICtrlCreateInput($CzMonu, 120, 8, 121, 21)
$arderamonunp = GUICtrlCreateInput($ArdreamMonu, 120, 40, 121, 21)
$RonarklandMon = GUICtrlCreateInput($RonakMonu , 120, 72, 121, 21)
$Input4 = GUICtrlCreateInput($CswIto, 120, 104, 121, 21)
$CSWLoyal = GUICtrlCreateInput($CswNp, 120, 136, 121, 21)
$Input6 = GUICtrlCreateInput($FtpLvl1 , 120, 168, 121, 21)
GUICtrlCreateInput($FtpLvl2 , 120, 200, 121, 21)
$Input8 = GUICtrlCreateInput($Ftplv3, 120, 232, 121, 21)
$Input9 = GUICtrlCreateInput($CzPkIteKarus, 120, 264, 121, 21)
$Input10 = GUICtrlCreateInput($CzPkIteKHuman, 120, 296, 121, 21)
$CZMonument = GUICtrlCreateLabel("CZMonument", 48, 8, 68, 17)
$ArdreamMonument = GUICtrlCreateLabel("ArdreamMonument", 24, 40, 93, 17)
$RonarklandMonument = GUICtrlCreateLabel("RonarklandMonument", 8, 72, 109, 17)
$CSWItem = GUICtrlCreateLabel("CSWItem", 56, 104, 49, 17)
$CSWLoyalty = GUICtrlCreateLabel("CSWLoyalty", 48, 136, 62, 17)
$FTLevel1 = GUICtrlCreateLabel("FTLevel1", 56, 168, 49, 17)
$FTLevel2 = GUICtrlCreateLabel("FTLevel2", 56, 200, 49, 17)
$FTLevel3 = GUICtrlCreateLabel("FTLevel3", 56, 232, 49, 17)
$CZPKItemKarus = GUICtrlCreateLabel("CZPKItemKarus", 40, 264, 79, 17)
$CZPKItemElmorad = GUICtrlCreateLabel("CZPKItemElmorad", 24, 296, 90, 17)
; Gelen Np
$CzKill= IniRead("Ayar.ini","NP","ColonyZoneKillNP","Bulunamadi")
$ArdKill= IniRead("Ayar.ini","NP","ArdreamKillNP","Bulunamadi")
$RonakKill= IniRead("Ayar.ini","NP","RonarkLandKillNP","Bulunamadi")
$warfroKill= IniRead("Ayar.ini","NP","WarFrontKillNP","Bulunamadi")
$CswKill= IniRead("Ayar.ini","NP","CastleSiegeKillNP","Bulunamadi")
$CzPartyKill= IniRead("Ayar.ini","NP","ColonyZonePartyKillNP","Bulunamadi")
$ArdreamPartyKill= IniRead("Ayar.ini","NP","ArdreamPartyKillNP","Bulunamadi")
$RonakPartyKill= IniRead("Ayar.ini","NP","RonarkLandPartyKillNP","Bulunamadi")
$warfparty= IniRead("Ayar.ini","NP","WarFrontPartyKillNP","Bulunamadi")
$CswParty= IniRead("Ayar.ini","NP","CastleSiegePartyKillNP","Bulunamadi")

$Input2 = GUICtrlCreateInput($CzKill, 672, 16, 65, 21)
$Input3 = GUICtrlCreateInput($ArdKill, 672, 48, 65, 21)
$Input5 = GUICtrlCreateInput($RonakKill, 672, 80, 65, 21)
$Input7 = GUICtrlCreateInput($warfroKill, 672, 112, 65, 21)
$Input11 = GUICtrlCreateInput($CswKill, 672, 144, 65, 21)
$Input12 = GUICtrlCreateInput($CzPartyKill, 672, 176, 65, 21)
$Input13 = GUICtrlCreateInput($ArdreamPartyKill, 672, 208, 65, 21)
$Input14 = GUICtrlCreateInput($RonakPartyKill, 672, 240, 65, 21)
$Input15 = GUICtrlCreateInput($warfparty, 672, 272, 65, 21)
; Giden Np
$CswPartDead= IniRead("Ayar.ini","NP","CastleSiegePartyDeadNP","Bulunamadi")
$CswpartyKill= IniRead("Ayar.ini","NP","CastleSiegePartyDeadNP","Bulunamadi")
$wardead= IniRead("Ayar.ini","NP","WarFrontDeadNP","Bulunamadi")
$Cswdead= IniRead("Ayar.ini","NP","CastleSiegeDeadNP","Bulunamadi")
$Czdead= IniRead("Ayar.ini","NP","ColonyZoneDeadNP","Bulunamadi")
$warpatcydead= IniRead("Ayar.ini","NP","WarFrontPartyDeadNP","Bulunamadi")
$ronakparydead= IniRead("Ayar.ini","NP","RonarkLandPartyDeadNP","Bulunamadi")
$ardreamdead= IniRead("Ayar.ini","NP","ArdreamDeadNP","Bulunamadi")
$ardpartdead= IniRead("Ayar.ini","NP","ArdreamPartyDeadNP","Bulunamadi")
$Czpartydead= IniRead("Ayar.ini","NP","ColonyZonePartyDeadNP","Bulunamadi")
$ronakdead= IniRead("Ayar.ini","NP","RonarkLandDeadNP","Bulunamadi")

$Input18 = GUICtrlCreateInput($wardead, 920, 120, 73, 21)
$Input25 = GUICtrlCreateInput($Czdead, 920, 24, 73, 21)
$Input26 = GUICtrlCreateInput($Cswdead, 920, 152, 73, 21)
$Input29 = GUICtrlCreateInput($warpatcydead, 920, 280, 73, 21)
$Input30 = GUICtrlCreateInput($ronakparydead, 920, 248, 73, 21)
$Input31 = GUICtrlCreateInput($ardreamdead, 920, 56, 73, 21)
$Input32 = GUICtrlCreateInput($ardpartdead, 920, 216, 73, 21)
$Input33 = GUICtrlCreateInput($Czpartydead, 920, 184, 73, 21)
$Input34 = GUICtrlCreateInput($ronakdead, 920, 88, 73, 21)
$ColonyZoneKillNP = GUICtrlCreateLabel("ColonyZoneKillNP", 576, 16, 89, 17)
$ArdreamKillNP = GUICtrlCreateLabel("ArdreamKillNP", 592, 48, 71, 17)
$RonarkLandKillNP = GUICtrlCreateLabel("RonarkLandKillNP", 576, 80, 91, 17)
$WarFrontKillNP = GUICtrlCreateLabel("WarFrontKillNP", 592, 112, 76, 17)
$CastleSiegeKillNP = GUICtrlCreateLabel("CastleSiegeKillNP", 576, 144, 88, 17)
$ColonyZonePartyKillNP = GUICtrlCreateLabel("ColonyZonePartyKillNP", 560, 176, 113, 17)
$ArdreamPartyKillNP = GUICtrlCreateLabel("ArdreamPartyKillNP", 576, 208, 95, 17)
$RonarkLandPartyKillNP = GUICtrlCreateLabel("RonarkLandPartyKillNP", 552, 240, 115, 17)
$WarFrontPartyKillNP = GUICtrlCreateLabel("WarFrontPartyKillNP", 568, 272, 100, 17)
$ColonyZoneDeadNP = GUICtrlCreateLabel("ColonyZoneDeadNP", 816, 24, 102, 17)
$ArdreamDeadNP = GUICtrlCreateLabel("ArdreamDeadNP", 832, 56, 84, 17)
$RonarkLandDeadNP = GUICtrlCreateLabel("RonarkLandDeadNP", 816, 88, 104, 17)
$WarFrontDeadNP = GUICtrlCreateLabel("WarFrontDeadNP", 832, 120, 89, 17)
$CastleSiegeDeadNP = GUICtrlCreateLabel("CastleSiegeDeadNP", 816, 152, 101, 17)
$ColonyZonePartyDeadNP = GUICtrlCreateLabel("ColonyZonePartyDeadNP", 792, 184, 126, 17)
$ArdreamPartyDeadNP = GUICtrlCreateLabel("ArdreamPartyDeadNP", 808, 216, 108, 17)
$RonarkLandPartyDeadNP = GUICtrlCreateLabel("RonarkLandPartyDeadNP", 792, 248, 128, 17)
$WarFrontPartyDeadNP = GUICtrlCreateLabel("WarFrontPartyDeadNP", 808, 280, 113, 17)
$Input16 = GUICtrlCreateInput($CswParty, 672, 304, 65, 21)
$CastleSiegePartyKillNP = GUICtrlCreateLabel("CastleSiegePartyKillNP", 552, 304, 112, 17)
GUICtrlCreateGroup("Gelen Np", 536, 0, 233, 337)
GUICtrlCreateGroup("", -99, -99, 1, 1)
;
$Input17 = GUICtrlCreateInput($CswPartDead, 920, 312, 73, 21)
$CastleSiegePartyDeadNP = GUICtrlCreateLabel("CastleSiegePartyDeadNP", 792, 312, 125, 17)
$Giden = GUICtrlCreateGroup("Giden Np", 768, 0, 233, 337)
GUICtrlCreateGroup("", -99, -99, 1, 1)
;Monular
$czmonu= IniRead("Ayar.ini","MONUMENT","ColonyZoneMonumentNP","Bulunamadi")
$czmonuaktif= IniRead("Ayar.ini","MONUMENT","ColonyZoneMonumentActive","Bulunamadi")
$ardreammonuaktif= IniRead("Ayar.ini","MONUMENT","ArdreamMonumentActive","Bulunamadi")
$ardmonunp= IniRead("Ayar.ini","MONUMENT","ArdreamMonumentNP","Bulunamadi")
$ronakmonuaktif= IniRead("Ayar.ini","MONUMENT","RonarkLandMonumentActive","Bulunamadi")
$ronakmonunp= IniRead("Ayar.ini","MONUMENT","RonarkLandMonumentNP","Bulunamadi")

$Input19 = GUICtrlCreateInput($czmonuaktif, 160, 360, 105, 21)
$Input20 = GUICtrlCreateInput($czmonu, 160, 392, 105, 21)
$Input21 = GUICtrlCreateInput($ardreammonuaktif, 160, 424, 105, 21)
$Input22 = GUICtrlCreateInput($ardmonunp, 160, 456, 105, 21)
$Input23 = GUICtrlCreateInput($ronakmonuaktif, 160, 488, 105, 21)
$Input24 = GUICtrlCreateInput($ronakmonunp, 160, 520, 105, 21)
$ColonyZoneMonumentActive = GUICtrlCreateLabel("ColonyZoneMonumentActive", 16, 360, 141, 17)
$ColonyZoneMonumentNP = GUICtrlCreateLabel("ColonyZoneMonumentNP", 32, 392, 126, 17)
$ArdreamMonumentActive = GUICtrlCreateLabel("ArdreamMonumentActive", 32, 424, 123, 17)
$ArdreamMonumentNP = GUICtrlCreateLabel("ArdreamMonumentNP", 48, 456, 108, 17)
$RonarkLandMonumentActive = GUICtrlCreateLabel("RonarkLandMonumentActive", 16, 488, 143, 17)
$Label6 = GUICtrlCreateLabel("RonarkLandMonumentNP", 16, 520, 143, 17)
$Group1 = GUICtrlCreateGroup("Monument", 0, 336, 273, 241)
GUICtrlCreateGroup("", -99, -99, 1, 1)
; Master kontrol
$ardreammaster= IniRead("Ayar.ini","CONTROL","ArdreamMasterCheck","Bulunamadi")
$darkmaster= IniRead("Ayar.ini","CONTROL","DarkLunarMasterCheck","Bulunamadi")
$Input27 = GUICtrlCreateInput($darkmaster, 416, 400, 121, 21)
$Input28 = GUICtrlCreateInput($ardreammaster, 416, 368, 121, 21)
$ArdreamMasterCheck = GUICtrlCreateLabel("ArdreamMasterCheck", 304, 368, 106, 17)
$DarkLunarMasterCheck = GUICtrlCreateLabel("DarkLunarMasterCheck", 296, 400, 117, 17)
$Group2 = GUICtrlCreateGroup("Master Kontrol", 280, 336, 265, 97)
GUICtrlCreateGroup("", -99, -99, 1, 1)
; Grade Ayarlari
$g1ini = IniRead("Ayar.ini","GRADE","G1","Bulunamadi")
$g2ini = IniRead("Ayar.ini","GRADE","G2","Bulunamadi")
$g3ini = IniRead("Ayar.ini","GRADE","G3","Bulunamadi")
$g4ini = IniRead("Ayar.ini","GRADE","G4","Bulunamadi")

$Input35 = GUICtrlCreateInput($g4ini, 384, 552, 121, 21)
$Input36 = GUICtrlCreateInput($g1ini, 384, 456, 121, 21)
$Input37 = GUICtrlCreateInput($g3ini, 384, 520, 121, 21)
$Input38 = GUICtrlCreateInput($g2ini, 384, 488, 121, 21)
$G1 = GUICtrlCreateLabel("G1", 336, 456, 18, 17)
$G2 = GUICtrlCreateLabel("G2", 336, 488, 18, 17)
$G3 = GUICtrlCreateLabel("G3", 336, 520, 18, 17)
$G4 = GUICtrlCreateLabel("G4", 336, 552, 18, 17)
GUICtrlCreateGroup("Grade Ayarlari", 280, 440, 265, 137)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("XACS V3 Ayarlarını Kaydet", 592, 376, 401, 49)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

EndSwitch
WEnd
[/code] Edited May 19, 2012 by Amilo

[DivaneTR]

[codebox]
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 339, 218, -1, -1, -1, BitOR($WS_EX_TOOLWINDOW,$WS_EX_WINDOWEDGE))
$Button1 = GUICtrlCreateButton("Kaydet", 104, 136, 139, 41)
$Input1 = GUICtrlCreateInput("", 48, 40, 233, 27)
GUICtrlSetFont(-1, 12, 400, 0, "Tahoma")
GUISetState(@SW_SHOW)

$Ayar = IniRead(@ScriptDir & "\Ayar.ini","Section","Ayar","")
GUICtrlSetData($Input1, $Ayar)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$Degistir = GUICtrlRead($Input1)
If $Degistir <> "" Then
IniWrite(@ScriptDir & "\Ayar.ini","Section","Ayar",$Degistir)
Else
MsgBox(64,"Divane","Boş geçilemez !")
EndIf
EndSwitch
WEnd
[/codebox]

[Amilo]

[b]baba dediğini yaptım ama anlamadım pek konu yeniledim[/b]

[DivaneTR]

[codebox]
Case $Button1
$Degistir = GUICtrlRead($Input1)
IniWrite(@ScriptDir & "\Ayar.ini","Section","Ayar",$Degistir)
[/codebox]

[b]Inputtan veri alıp ini dosyasına yazdırma bu şekildedir. Scriptine uyarla.[/b]

[djonur007]

Arkadaşım adam örneği vermiş işte sana daha ne istiyorsun ki? Kimseden kodlarının tamamını düzenlemesini bekleme. Input değeri ayar.ini dosyasını nasıl yazılır örnekte vermiş arkadaş bende biraz açıklama yapayım;


[xml]
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 339, 218, -1, -1, -1, BitOR($WS_EX_TOOLWINDOW,$WS_EX_WINDOWEDGE))
$Button1 = GUICtrlCreateButton("Kaydet", 104, 136, 139, 41)
$Input1 = GUICtrlCreateInput("", 48, 40, 233, 27)
GUICtrlSetFont(-1, 12, 400, 0, "Tahoma")
GUISetState(@SW_SHOW)

$Ayar = IniRead(@ScriptDir & "\Ayar.ini","Section","Ayar","")
GUICtrlSetData($Input1, $Ayar)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$Degistir = GUICtrlRead($Input1) ;İnput1 deki değeri okur.
If $Degistir <> "" Then ;Eğer input1 deki değer boş değilse
IniWrite(@ScriptDir & "\Ayar.ini","Section","Ayar",$Degistir) ; Değeri ayar.ini ye kaydeder.
Else
MsgBox(64,"Divane","Boş geçilemez !") ;Eğer input boşsa hata mesajı verir.
EndIf
EndSwitch
WEnd[/xml]

[Amilo]

[quote name='Baba_' date='19 May 2012 - 22:51 ' timestamp='1337460705' post='1202870']
[codebox]
Case $Button1
$Degistir = GUICtrlRead($Input1)
IniWrite(@ScriptDir & "\Ayar.ini","Section","Ayar",$Degistir)
[/codebox]

[b]Inputtan veri alıp ini dosyasına yazdırma bu şekildedir. Scriptine uyarla.[/b]
[/quote]

anladım reis sağol