tach leutz, ich bins ma wieder.
hab das datenbank pojekt ma wieder weiter gemacht und hab jetz ein weiteres problem:
und zwar.. ich hab ein hauptfenster gemacht, -2 buttons: einer ruft ein weiteres fenster auf-dort kann man array hinzufügen.. anderer button: verlassen. wenn das eingabe-fenster benutzt, soll er eigentlich den array erweitern + gleich in die liste im hauptfenster schreiben..beim verlassen dann alles in die daten.ini schreiben ( beim öffnen vom script.. alles lesen /die anzahl der arrays is in dem schlüssel [0] gespeichert + erhöht sich immer um 1, wenn man einen neuen einträgt(soll jedenfalls).
statt dem anzeigen sofort im hauptfenster nach dem eintragen, zeigt er keinen neuen eintrag, aber nach dem neustart schon .. Oo außerdem reagiert kein button mehr, wenn ich erst ein weiteres teil hinzufügen will + danach verlassen, bei erst verlassen drücken ....verlässt er.. argl, help!!
hier der code ::
Spoiler anzeigen
#include <Array.au3>
#include <GUIConstants.au3>
Dim $input[4200][10]
Global $anzahl
GUICreate('Programm',-1,-1,-1,-1,$WS_OVERLAPPEDWINDOW)
$listView = GuiCtrlCreateListView("Name|Hersteller|Größe|Beschreibung|Typ|Auswahl", 10, 90,400,400)
$progressbar1 = GUICtrlCreateProgress (100,60,143,20)
GUICtrlSetColor(-1,32250)
$button1 = guictrlcreatebutton ("Verlassen", 10,60,80,20)
$button2 = GUICtrlCreateButton("Neues Teil",10,20,80,20)
GUISetState()
[/autoit] [autoit][/autoit] [autoit]$anzahl = IniRead('daten.ini','0','$anzahl','0')
for $i = 1 to $anzahl
$input[$i][1] = IniRead('daten.ini',$i,'$name','')
$input[$i][2] = IniRead('daten.ini',$i,'$hersteller','')
$input[$i][3] = IniRead('daten.ini',$i,'$groesse','')
$input[$i][4] = IniRead('daten.ini',$i,'$beschreibung','')
$input[$i][5] = IniRead('daten.ini',$i,'$typ','')
$input[$i][6] = IniRead('daten.ini',$i,'$auswahl','')
Next
hauptfenster($anzahl,$input)
func hauptfenster($einzahl,$einput)
$prog = (100/$einzahl)
for $i=1 to $einzahl
$n = $prog*$i
GUICtrlSetData ($progressbar1,$n)
GuiCtrlCreateListViewItem($einput[$i][1]&"|"&$einput[$i][2]&"|"&$einput[$i][3]&"|"&$einput[$i][4]&"|"&$einput[$i][5]&"|"&$einput[$i][6],$listView)
Next
while 1
$msg = GUIGetMsg()
Select
case $msg = $GUI_EVENT_CLOSE
Exit
case $msg = $button1
for $i = 1 to $einzahl
$datum = @YEAR&'-'&@MON&'-'&@MDAY&', '&@HOUR&':'&@MIN&':'&@SEC
IniWrite('daten.ini',$i,'$datum',$einput[$i][7])
IniWrite('daten.ini',$i,'$name',$einput[$i][1])
IniWrite('daten.ini',$i,'$hersteller',$einput[$i][2])
IniWrite('daten.ini',$i,'$groesse',$einput[$i][3])
IniWrite('daten.ini',$i,'$beschreibung',$einput[$i][4])
IniWrite('daten.ini',$i,'$typ',$einput[$i][5])
IniWrite('daten.ini',$i,'$auswahl',$einput[$i][6])
Next
IniWrite('daten.ini','0','$anzahl',$einzahl)
Exit
case $msg = $button2
return $einzahl
return $einput
ExitLoop
EndSelect
WEnd
EndFunc
Opt("GUICoordMode",2)
$anzahl = $anzahl +1
GUICreate("Dateneingabe")
GUICtrlCreateLabel('Eingabe der Daten:',10,10,100)
GUICtrlCreateLabel('Name:',-1,0,200)
$name =GUICtrlCreateInput('',-1,0,200)
GUICtrlCreateLabel('Hersteller:',-1,0,200)
$hersteller =GUICtrlCreateInput('',-1,0,200)
GUICtrlCreateLabel('Größe:',-1,0,200)
$groesse =GUICtrlCreateInput('',-1,0,200)
GUICtrlCreateLabel('Beschreibung:',-1,0,200)
$beschreibung =GUICtrlCreateInput('',-1,0,200)
GUICtrlCreateLabel('Typ:',-1,0,200)
$typ =GUICtrlCreateInput('',-1,0,200)
GUICtrlCreateLabel('Auswahl:',-1,0,200)
$auswahl = GUICtrlCreateCombo ("item1",-1,0,200)
GUICtrlSetData(-1,"item2|item3","item3")
$button = guictrlcreatebutton ("ok",-1,0,40,20)
GUISetState()
[/autoit] [autoit][/autoit] [autoit]while 1
$msg = guigetmsg()
Select
Case $msg = $GUI_EVENT_CLOSE
Exit
Case $msg = $button
$input[$anzahl][1]= GUICtrlRead($name)
$input[$anzahl][2] = GUICtrlRead($hersteller)
$input[$anzahl][3] = GUICtrlRead($groesse)
$input[$anzahl][4] = GUICtrlRead($beschreibung)
$input[$anzahl][5] = GUICtrlRead($typ)
$input[$anzahl][6] = GUICtrlRead($auswahl)
$input[$anzahl][7] = @YEAR&'-'&@MON&'-'&@MDAY&', '&@HOUR&':'&@MIN&':'&@SEC
WinSetState("Dateneingabe","",@SW_HIDE)
hauptfenster($anzahl,$input)
endselect
wend