Hi.
Ich habe hier ein Problem bei dem ich nicht weiter komme.
Das Programm selbst soll ähnlich wie eine Datenbank verschiedene werte auflisten.
Dabei sollen Firmen, Firmeninhaber und deren Telefonnummern angezeigt werden.
Da immer mal wieder eine neue Firma hinzukommt und eine andere geht muss das relativ variabel sein.
Dann bin ich auf die Idee gekommen, alles in einer FOR Schleife zu packen.
Die entsprechenden werte, wie zB aktuelle anzahl der Firmen, Name der Inhaber usw wird (vorerst) in einer ini-Datei gespeichert und ausgelesen.
Das mit der INI-Datei funktioniert ganz gut, aber das GUI lässt sich bei mir nicht in der FOR Schleife aufbauen.
Kleinerer Ausschnitt der Schleife:
[autoit]For $i = 0 To UBound($Firmenzahl) -1
$Firma = IniRead(@scriptdir & "Datenbank" & $aco, "id0", "firma", "0")
$Firm[$i] = GUICtrlCreateTabItem($Firma)
$btn_delete_[$i] = GUICtrlCreateButton("Firma entfernen", 16, 432, 89, 25, $WS_GROUP)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetTip(-1, $Firma)
$btn_edit_[$i] = GUICtrlCreateButton("Firma bearbeiten", 112, 432, 89, 25, $WS_GROUP)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetTip(-1, $Firma)
$Label_A_[$i] = GUICtrlCreateLabel("Telefon: Firma", 296, 72, 72, 18)
$Label_B_[$i] = GUICtrlCreateLabel("Telefon: Privat", 480, 72, 73, 18)
For $j = 0 to UBound($nameARR) - 1
$nameARR[$j] = IniRead(@scriptdir & "Datenbank" & $aco, "id0", "name" & $j, "0")
$List_Name_1 = GUICtrlCreateList($nameARR[$j], 24, 56, 201, 104)
Next
For $k = 0 to UBound($telfARR) - 1
$telfARR[$k] = IniRead(@scriptdir & "Datenbank" & $aco, "id0", "telf" & $k, "0")
Next
For $l = 0 to UBound($telpARR) - 1
$telpARR[$l] = IniRead(@scriptdir & "Datenbank" & $aco, "id0", "telp" & $l, "0")
Next
Next
INI-Datei:
[Anzahl]
Firmenzahl=1
[id0]
firma=(Bsp:) Mustermann GmbH
name_z=1
name0=Max Mustermann
telf_z=2
telf0=0000 000000
telf1=0000 000000
telp_z=1
telp0=--
Alles anzeigen
mfg Taliis