#include <GUIConstantsEx.au3>
#Include <GuiListBox.au3>
#include <ListviewConstants.au3>
#include <WindowsConstants.au3>

;----------------------------------------------------------------------------------------------------

$Telefonnummern = "Telefonnummern.ini"

;----------------------------------------------------------------------------------------------------

Global $GUI_01_Button_01

;----------------------------------------------------------------------------------------------------

$GUI_01 = GUICreate ("Telefonnummern", 500, 1000, -1, -1, 0x80000000)
$GUI_01_List_01 = GUICtrlCreateListView  ("Nachname|Vorname|Telefonnummer|Ort|Geburtstag", 5, 5, 490, 965, 0x0010)
_GUICtrlListBox_Sort ($GUI_01_List_01)
$GUI_01_Item_01 = GUICtrlCreateListViewItem ("Lädt | Lädt | Lädt | Lädt | Lädt", $GUI_01_List_01)
$GUI_01_Button_01 = GUICtrlCreateButton ("Exit", 5, 975, 490, 20)
GUISetBkColor (0x000000, $GUI_01)
GUISetState (@SW_SHOW, $GUI_01)
Sleep (500)

;----------------------------------------------------------------------------------------------------

_Daten ()

;----------------------------------------------------------------------------------------------------

While True
	Switch GUIGetMsg ()
		Case $GUI_01_Button_01
			Exit
	EndSwitch
WEnd

;----------------------------------------------------------------------------------------------------

Func _Daten ()
	$INI_Read_Section_01 = IniReadSection ($Telefonnummern, "Daten")
	GUICtrlSetData ($GUI_01_Item_01, " |  |  |  | ")
	For $Stk = 1 To $INI_Read_Section_01[0][0]
		$INI_Daten_01 = IniRead ($Telefonnummern, "Daten", $INI_Read_Section_01[$Stk][0], "ERROR")
		$INI_Daten_02 = StringSplit ($INI_Daten_01, ",")
		$INI_Daten_03 = $INI_Daten_02[1] & " | " & $INI_Daten_02[2] & " | " & $INI_Daten_02[3] & " | " & $INI_Daten_02[4] & " | " & $INI_Daten_02[5]
		GUICtrlCreateListViewItem ($INI_Daten_03, $GUI_01_List_01)
	Next
EndFunc