TreeView auslesen aus einer ini wie geht das

[autoit]

#cs ----------------------------------------------------------------------------

[/autoit] [autoit][/autoit] [autoit]

AutoIt Version: 3.3.0.0
Author: myName

[/autoit] [autoit][/autoit] [autoit]

Script Function:
Template AutoIt script.

[/autoit] [autoit][/autoit] [autoit]

#ce ----------------------------------------------------------------------------

[/autoit] [autoit][/autoit] [autoit]

; Script Start - Add your code below here

[/autoit] [autoit][/autoit] [autoit]

#cs
****************************************************************************************
****************************************************************************************
****************************************************************************************
****************
****************
********Dies ist ein Internet TV Version 0.0.0 beta********
********Copyright: Sirocool ( http://www.autoit.de )********
****************
********Es läuft zu 100% auf Windows XP ********
********Es läuft zu 100% auf Windows 07 ********
********Alle anderen Windows Versionen sind nicht getestet!********
****************
********Mit freundlicher Mithilfe von http://www.autoit.de********
********Danke an alle die mir mit diesem Projekt geholfen haben.********
****************
********Bei Fragen oder Problemen, schreib mir eine PN im Forum.********
****************
****************
****************************************************************************************
****************************************************************************************
****************************************************************************************
#ce

[/autoit] [autoit][/autoit] [autoit]

#include <ButtonConstants.au3>
#include <WindowsConstants.au3>
#include <TreeViewConstants.au3>
#include <StaticConstants.au3>
#include <TreeViewConstants.au3>
#include <ComboConstants.au3>
#include <GUIConstants.au3>
#include <StaticConstants.au3>
#Include <GuiTreeView.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <ListViewConstants.au3>
#include <StructureConstants.au3>
#include <GUIConstants.au3>
#include <IE.au3>
#include <INet.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <ListViewConstants.au3>
#include <StructureConstants.au3>
#include <String.au3>
#include <array.au3>
#include <Guiconstants.au3>
#include <Sound.au3>
#include <File.au3>
#include <GuiTab.au3>

[/autoit] [autoit][/autoit] [autoit]

Local $INI = @ScriptDir & "\data\Tv_Sender.ini"

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Global $aTv_Sender = IniReadSection($INI, "Tv_Sender")
Global $TreeView1,$hGui1,$lb_Tv_Sender
Global $lastNum = IniRead($INI, "Numbers", "last", 0)
Global $lastNum1 = IniRead($INI, "index", "last", 0)
Global $lastNum2 = IniRead($INI, "Land", "last", 0)
Global $lastNum3 = IniRead($INI, "Sendername", "last", 0)
Global $lastNum4 = IniRead($INI, "Senderurl", "last", 0)
$load = "TV Loader"
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate($load, 250, 100, 550, 350, $WS_POPUP)
GUISetBkColor("images\TVplayer\Default\loader_bg.jpg")
$Progress1 = GUICtrlCreateProgress(1, 41, 248, 19)
$loader = GUICtrlCreatePic("images\TVplayer\Default\loader_bg.jpg", 0, 0, 250, 100, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS,$WS_DISABLED))
GUICtrlCreateLabel("",0,0,600,300,0,$GUI_WS_EX_PARENTDRAG)
GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[/autoit] [autoit][/autoit] [autoit]

$check = Ping("www.google.de")
If @error = 0 Then
Else
MsgBox(0, "Error", "!! Achtung !! Kein Internet verfügbar!", 5)
Exit
EndIf
$s = 0
do
$s = $s + 10
sleep(1000)
guictrlsetdata($Progress1 , $s)
until $s = 100
sleep(1000)
guisetstate(0)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

#Region ### START Koda GUI section ### Form=I:\Projeckte\Internet TV\Neuer Ordner\MS iTV.kxf
$hGui = GUICreate("MS iTV",501, 312, 150, 150)
$oIE1 = _IECreateEmbedded()
GUICtrlCreateObj($oIE1, 0, 0, 500, 288)
$oIE1.navigate("http://sirocool.si.funpic.de/Internet TV/index.php")
$Combo1 = GUICtrlCreateCombo("Combo1", 0, 288, 145, 25)
GUICtrlSetData(-1,"Ägypten|Äthiopien|Afghanistan|Albanien|Algerien|Andorra|Angola|Antigua|Barbedos|Argentinien|Armenien|Aserbaidschan|Australien|Bahrain|Bangladesch|Belgien|Belize|Benin|Bolivien|Bosnien_Herzegow|Brasilien |Brunei|Bulgarien|Chile|China|Costa_Rica|Dänemark|Deutschland")
$Input1 = GUICtrlCreateInput("Input1", 144, 288, 121, 21)
$Button1 = GUICtrlCreateButton("Button1", 272, 288, 75, 21, 0)
$Combo2 = GUICtrlCreateCombo("Combo2", 352, 288, 145, 25)
GUISetState(@SW_SHOW,$hGui)
#EndRegion ### END Koda GUI section ###

[/autoit] [autoit][/autoit] [autoit]

#Region ### START Koda GUI section ### Form=I:\Projeckte\Internet TV\Neuer Ordner\Kanäle.kxf
$hGui1 = GUICreate("Kanäle", 185, 310, 651, 150)
$TreeView1 = GUICtrlCreateTreeView(0, 0, 177, 305)
GUISetState(@SW_HIDE)
#EndRegion ### END Koda GUI section ###
_FillTreeView()
GUISetState(@SW_SHOW, $hGui1)

[/autoit] [autoit][/autoit] [autoit]

Global $ReadOld = ""

[/autoit] [autoit][/autoit] [autoit]

$Deutschland = StringSplit ("Deutschland|Giga TV|","|")

[/autoit] [autoit][/autoit] [autoit]

$Old = ""

[/autoit] [autoit][/autoit] [autoit]

While 1
$msg = GUIGetMsg(1)
Switch $msg[1]
Case $hGui
$Read = GUICtrlRead ($Combo1)
If $Read <> $ReadOld Then
_GUICtrlTreeView_DeleteAll($TreeView1)
If $Read = "Deutschland" Then
For $5 = 1 To $Deutschland[0]
GUICtrlCreateTreeViewItem ($Deutschland[$5],$TreeView1)
Next
EndIf
$ReadOld = $Read
EndIf
Switch $msg[0]
Case $GUI_EVENT_CLOSE
Exit
case $combo1
GUISetState(@SW_SHOW,$hGui1)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
Case $hGui1
Switch $msg[1]
Case $hGui1
$Text = _GUICtrlTreeView_GetText($TreeView1,_GUICtrlTreeView_GetSelection($TreeView1))
If $Text <> $Old Then
If $Text = "Deutschland" Then
$Old = $Text
$oIE1.navigate("")
EndIf
If $Text = "GIGA TV" Then
$Old = $Text
$oIE1.navigate("http://sirocool.si.funpic.de/Internet TV/TV/Sender/Deutschland/GIGA TV.php")
EndIf
EndIf
Switch $msg[0]
Case $GUI_EVENT_CLOSE
GUISetState(@SW_HIDE, $hGui1)
EndSwitch
EndSwitch
EndSwitch
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func _FillTreeView()
_GUICtrlTreeView_DeleteAll($TreeView1)
If $lastNum = 0 Then Return
$lastNum1 = 0 Then Return
$lastNum2 = 0 Then Return
$lastNum3 = 0 Then Return
$lastNum4 = 0 Then Return
For $i = 1 To UBound($aTv_Sender) - 1
GUICtrlCreateTreeViewItem($aTv_Sender[$i][0] & '|' & $aTv_Sender[$i][1], $TreeView1)
Next
EndFunc

[/autoit]

Zitat

[Version]
Senderlistversion=2.8

[index]
Einslive=Senderurl1,Sender1

[Land]
Land1=Deutschland

[Sendername]
Sender1=Giga Tv

[Senderurl]
Senderurl1=http://sirocool.si.funpic.de/Internet TV/TV/Sender/Deutschland/GIGA TV.php

Alles anzeigen