read value from an INI file

-- macroScript Library_Helper_Bug category:"TomTNT Script"
	( 	
		rollout Library_Helper_Script_Bug "Library Helper Bug" width:408 height:384
		(
			local libraryhelperbugIniFile = getFilenamePath (getSourceFileName()) + "/libraryhelperbug.ini"
			edittext text_infold "" pos:[16,24] width:312 height:16 text:"select directory to batch"
			button btn_infold "Browse" pos:[336,24] width:56 height:16
 
			on Library_Helper_Script_Bug open do
			(
				if doesFileExist libraryhelperbugIniFile then
				(
					--	if the ini file exist it will load the value from it
					max_dir = ((getIniSetting libraryhelperbugIniFile "Presets" "max_dir") as string)
					text_infold.text = (max_dir as string)
 
					)
					else
					(--	if the ini file does not exist the script will create new ini file
					max_dir = text_infold.text as string
					setIniSetting libraryhelperbugIniFile "Presets" "max_dir"  (max_dir as string)
					)
				)
 
 
				on btn_infold pressed do
				(
					max_dir = getSavePath()
					text_infold.text = (max_dir as string)
				    setIniSetting libraryhelperbugIniFile "Presets" "max_dir" (max_dir as string)
				)	
 
		--------------------------------------------------------------------------------------------------------------
 
 
			on libraryhelperIniFile close do
			(
				setIniSetting libraryhelperbugIniFile "Presets" "max_dir" (text_infold.text as string)
 
			)
 
		)createDialog Library_Helper_Script_Bug 408 64
	)