Listview, Sqlite

Neight

Hallo Leute,

ich habe ein Problem beim Einfügen von neuen Datensätzen in die Sqlite Datenbank. Ich habe ein vorläufiges Gui - Fenster zum Neueinfügen gemacht. Kann mir vielleicht einer zeigen, wie ich es am Besten umsetzen kann?

Ich bräuchte noch eine Idee, wie man durch das Anklicken der Einträge im Listview, rechts die jeweiligen passenden Felder ausgefüllt werden.

Wäre das eine Möglichkeit zum Anklicken _GUICtrlListView_ClickItem

Gruß

Neight

C

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <SQLite.au3>
#include <GuiListView.au3>
#include <ComboConstants.au3>
#include <SQLite.dll.au3>


Global Const $sDbMineral = @ScriptDir & "\mineraldb.sqlite"
Global $hDB, $iRval, $aResult, $iRows, $iColumns, $DB, $QLite,$pic




#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Mineraliendatenbank", 1181, 736, 214, 142)
$MenuItem3 = GUICtrlCreateMenu("&File")
$MenuItem4 = GUICtrlCreateMenuItem("New"&@TAB&"Ctrl+Down", $MenuItem3)
$MenuItem5 = GUICtrlCreateMenuItem("Open"&@TAB&"", $MenuItem3)
$MenuItem6 = GUICtrlCreateMenuItem("Save"&@TAB&"Shift+Ctrl+0", $MenuItem3)
$MenuItem7 = GUICtrlCreateMenuItem("Exit"&@TAB&"", $MenuItem3)
$MenuItem2 = GUICtrlCreateMenu("&Edit")
$MenuItem9 = GUICtrlCreateMenuItem("Delete"&@TAB&"", $MenuItem2)
$MenuItem1 = GUICtrlCreateMenu("&Help")
$MenuItem8 = GUICtrlCreateMenuItem("About"&@TAB&"", $MenuItem1)
GUISetBkColor(0xB9D1EA)
$Group1 = GUICtrlCreateGroup("", 176, 80, 945, 553)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label1 = GUICtrlCreateLabel("Nummer", 224, 128, 55, 20)
$Nummer = GUICtrlCreateInput("", 296, 128, 41, 24)
$Label2 = GUICtrlCreateLabel("Name", 384, 128, 41, 20)
$Name = GUICtrlCreateInput("", 440, 128, 177, 24)
$Group2 = GUICtrlCreateGroup("allg. Eigenschaften", 208, 192, 401, 177)
$Label3 = GUICtrlCreateLabel("Formel", 224, 224, 46, 20)
$Formel = GUICtrlCreateInput("", 280, 224, 105, 24)
$Label4 = GUICtrlCreateLabel("Gewicht", 224, 264, 51, 20)
$Gewicht = GUICtrlCreateInput("", 280, 264, 105, 24)
$Farbe = GUICtrlCreateLabel("Farbe", 224, 304, 40, 20)
$Farb = GUICtrlCreateInput("", 280, 304, 105, 24)
$Label5 = GUICtrlCreateLabel("Radioaktiv", 400, 224, 69, 20)
$Checkbox1 = GUICtrlCreateCheckbox("Ja", 480, 224, 41, 17)
$Checkbox2 = GUICtrlCreateCheckbox("Nein", 544, 224, 41, 17)
$Label6 = GUICtrlCreateLabel("Magnetisch", 400, 256, 73, 20)
$Ja = GUICtrlCreateCheckbox("Ja", 480, 256, 49, 17)
$Nein = GUICtrlCreateCheckbox("Nein", 544, 256, 49, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$pic = GUICtrlCreatePic("", 640, 112, 441, 305, BitOR($GUI_SS_DEFAULT_PIC,$SS_RIGHTJUST,$WS_BORDER))
$Group3 = GUICtrlCreateGroup("Funddaten", 208, 416, 409, 153)
$Fundor = GUICtrlCreateLabel("Fundort", 224, 456, 49, 20)
$Fundort = GUICtrlCreateInput("", 304, 456, 241, 24)
$Fundlan = GUICtrlCreateInput("", 304, 504, 241, 24)
$Fundland = GUICtrlCreateLabel("Fundland", 224, 504, 60, 20)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Bild öffnen", 744, 424, 97, 33)
$Button2 = GUICtrlCreateButton("Bild löschen", 880, 424, 97, 33)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateInput("", 312, 24, 465, 21)
$Suche = GUICtrlCreateLabel("Suche", 256, 24, 55, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
$Zurueck = GUICtrlCreateButton("Zurück", 440, 648, 65, 33)
$Vor = GUICtrlCreateButton("Vor", 696, 648, 65, 33)


$ListView1 = GUICtrlCreateListView("", 8, 88, 150, 545)
_GUICtrlListView_AddColumn($ListView1, "Name", 70)
_GUICtrlListView_AddColumn($ListView1, "Nummer", 150)
;Global $aHeader = StringSplit($ListView1, '|')
Global $hListView = GUICtrlGetHandle($ListView1)
$cContextMenue = GUICtrlCreateContextMenu($ListView1)
GUICtrlCreateListViewItem("",$ListView1)
;Dim $Form1_1_AccelTable[2][2] = [["^{DOWN}", $MenuItem4],["^+0", $MenuItem6]]
;GUISetAccelerators($Form1_1_AccelTable)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###








_SQLite_Startup()
If @error Then Exit MsgBox(16, "SQLite Fehler", "SQLite.dll konnte nicht geladen werden!")
ConsoleWrite("_SQLite_LibVersion=" & _SQLite_LibVersion() & @CRLF)
Global $hDB = _SQLite_Open($sDbMineral)
If @error Then Exit MsgBox(16, "SQLite Fehler", "Die Datenbank kann nicht geöffnet werden!")


If FileExists("mineraldb.sqlite") Then
	$DB = _SQLite_Open("mineraldb.sqlite")
	If @error Then Exit MsgBox(16, "SQLite Fehler", "Die Datenbank kann nicht geöffnet werden!")


	_SQLite_Exec(-1, "CREATE TABLE IF NOT EXISTS Mineralien (Nummer INTEGER PRIMARY KEY,Name TEXT,Formel TEXT,Gewicht TEXT,Farbe TEXT,Fundort TEXT,Fundland TEXT);")


	_SQLite_Exec(-1, "INSERT INTO Mineralien(Nummer,Name,Formel,Gewicht,Farbe,Fundort,Fundland) VALUES ('1', 'xxx', 'Dhgdgd', '500', 'XXX', 'Hier', 'hier');")
	_SQLite_Exec(-1, "INSERT INTO Mineralien(Nummer,Name,Formel,Gewicht,Farbe,Fundort,Fundland) VALUES ('2', 'xxxx', 'Dhgdgd', '500', 'XXX', 'Hier', 'hier');")


Endif




While True
	Switch GUIGetMsg()
		Case -3
			_SQLite_Close($DB)
			_SQLite_Shutdown()
			Exit


		Case $MenuItem5


			$iRva = _SQLite_GetTable2d(-1, "SELECT Nummer, * FROM Mineralien;", $aResult, $iRows, $iColumns)
					_SQLite_GetTable2d(-1, "SELECT Name, * FROM Mineralien;", $aResult, $iRows, $iColumns)
					_ArrayDelete($aResult,0)
					_GUICtrlListView_AddArray($ListView1, $aResult)






		Case $MenuItem4
			_NeuerDatensatz()




		Case $Button1
                $open = FileOpenDialog("Wählen Sie eine Datei aus.", @TempDir, "Bilder (*.jpg;*.bmp;*.png)")
				If @error Then
					MsgBox(4096, "", "Keine Datei ausgewählt")
				Endif


				GUICtrlSetImage($pic,$open)


		Case $MenuItem7
			Exit






EndSwitch
WEnd








Func _NeuerDatensatz()


#Region ### START Koda GUI section ### Form=
$XXX = GUICreate("Neuer Datensatz", 530, 241, 192, 131)
$Nummer = GUICtrlCreateInput("Nummer", 24, 56, 121, 21)
$Input2 = GUICtrlCreateInput("Formel", 24, 104, 121, 21)
$Input3 = GUICtrlCreateInput("Farbe", 24, 152, 121, 21)
$Input4 = GUICtrlCreateInput("Name", 200, 56, 121, 21)
$Input5 = GUICtrlCreateInput("Gewicht", 200, 104, 121, 21)
$Input6 = GUICtrlCreateInput("Fundort", 200, 152, 121, 21)
$Input1 = GUICtrlCreateInput("Fundland", 376, 56, 121, 21)
$Bitte = GUICtrlCreateLabel("Bitte alle Felder ausfüllen!", 40, 16, 129, 17)
$OK = GUICtrlCreateButton("OK", 168, 192, 169, 33)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit


		Case $OK
		_SQLite_Exec(-1, "INSERT INTO Mineralien (Nummer,Name,Formel,Gewicht,Farbe,Fundort,Fundland) VALUES ('"_
		& GUICtrlRead($Nummer[1]) & "','" & GUICtrlRead($Input4[2]) & "','" & GUICtrlRead($Input2[3]) & "','" & GUICtrlRead($Input5[4]) & "','" & GUICtrlRead($Input3[5])& "','" & GUICtrlRead($Input6[6])& "','" & GUICtrlRead($Input1[7]) & "');")






	EndSwitch
WEnd




Endfunc

Alles anzeigen

**Kanashius**

_GUICtrlListView_ClickItem klickt ein Item an -> markiert es, ist also nicht das, was du willst.
Für alles was das anklicken,... betrifft sieh dir mal das Beispiel hier an: https://www.autoitscript.com/autoit3/docs/l…View_Create.htm

Insbesondere Der große Packen an auskommentierten Zeilen ist sehr gut, wenn man wissen will, worauf man alles reagieren kann.

Was das andere Fenster angeht empfehle ich: Steig auf den OnEventMode um (Das Beispiel zu https://www.autoitscript.com/autoit3/docs/f…lSetOnEvent.htm sollte dabei helfen)

Wenn du es nur schnell zum testen willst:

1. änder Zeile 156 zu ExitLoop und mach vorher ein guidelete($XXX), damit nicht das ganze Programm beendet wird, sondern nur das Fenster geschlossen
Eine andere Möglichkeit wäre noch, die Gui und deren Controls GLobal zu deklarieren und dort in der Haupt-While-Schleife drauf zu reagieren.

**autoiter**

Hallo @Neight
Noch ein Hinweis zu deinem Speichern in der Datenbank. Der Query-String ist nicht ganz richtig.

Erst einmal ist es sinnlos die Nummer bei Insert anzugeben, weil das ja dein Primary Key ist. Das heißt du kannst dir auch das Inputfeld bei New sparen. Außerdem schreibst du die Inputs als wären sie ein Array. Das ist falsch. Die eckigen Klammern müssen da weg.

AutoIt

_SQLite_Exec(-1, "INSERT INTO Mineralien (Name,Formel,Gewicht,Farbe,Fundort,Fundland) VALUES ('" & _
		GUICtrlRead($Input4) & "','" & GUICtrlRead($Input2) & "','" & GUICtrlRead($Input5) & "','" & GUICtrlRead($Input3)& "','" & GUICtrlRead($Input6)& "','" & GUICtrlRead($Input1) & "');")

Neight

Hey,

Vielen Dank Euch beiden für eure Hilfe. Ich werde es versuchen umzusetzen.

**Bitnugger**

So läuft es erstmal... aber da hast du noch viel Arbeit vor dir.

Wäre ich an deiner Stelle... mit deinem Wissenstand über AutoIt... bevor ich so ein... doch schon recht großes Projekt mit gutem Gewissen anfangen kann, wären vorher erst mal noch ein paar Wochen/Monate Grundlagen üben angesagt!!!

Zitat von Neight

Wäre das eine Möglichkeit zum Anklicken

Ich würde dafür die GUIListViewEx UFD nehmen - damit kannst du jede Zelle direkt inplace im Listview editieren. Ein paar Beispiele gibt es dazu auch auf der Seite bzw. im Download-Archiv.

Mineralien_DB

AutoIt

;-- TIME_STAMP   2016-11-27 15:47:20


#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <SQLite.au3>
#include <GuiListView.au3>
#include <ComboConstants.au3>
#include <SQLite.dll.au3>


Global Const $sDbMineral = @ScriptDir & "\mineraldb.sqlite"
Global $hDB, $iRval, $aResult, $iRows, $iColumns, $DB, $QLite, $pic




#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Mineraliendatenbank", 1181, 736, 214, 142)
$MenuItem3 = GUICtrlCreateMenu("&File")
$MenuItem4 = GUICtrlCreateMenuItem("New" & @TAB & "Ctrl+Down", $MenuItem3)
$MenuItem5 = GUICtrlCreateMenuItem("Open" & @TAB & "", $MenuItem3)
$MenuItem6 = GUICtrlCreateMenuItem("Save" & @TAB & "Shift+Ctrl+0", $MenuItem3)
$MenuItem7 = GUICtrlCreateMenuItem("Exit" & @TAB & "", $MenuItem3)
$MenuItem2 = GUICtrlCreateMenu("&Edit")
$MenuItem9 = GUICtrlCreateMenuItem("Delete" & @TAB & "", $MenuItem2)
$MenuItem1 = GUICtrlCreateMenu("&Help")
$MenuItem8 = GUICtrlCreateMenuItem("About" & @TAB & "", $MenuItem1)
GUISetBkColor(0xB9D1EA)
$Group1 = GUICtrlCreateGroup("", 176, 80, 945, 553)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label1 = GUICtrlCreateLabel("Nummer", 224, 128, 55, 20)
$Nummer = GUICtrlCreateInput("", 296, 128, 41, 24)
$Label2 = GUICtrlCreateLabel("Name", 384, 128, 41, 20)
$Name = GUICtrlCreateInput("", 440, 128, 177, 24)
$Group2 = GUICtrlCreateGroup("allg. Eigenschaften", 208, 192, 401, 177)
$Label3 = GUICtrlCreateLabel("Formel", 224, 224, 46, 20)
$Formel = GUICtrlCreateInput("", 280, 224, 105, 24)
$Label4 = GUICtrlCreateLabel("Gewicht", 224, 264, 51, 20)
$Gewicht = GUICtrlCreateInput("", 280, 264, 105, 24)
$Farbe = GUICtrlCreateLabel("Farbe", 224, 304, 40, 20)
$Farb = GUICtrlCreateInput("", 280, 304, 105, 24)
$Label5 = GUICtrlCreateLabel("Radioaktiv", 400, 224, 69, 20)
$Checkbox1 = GUICtrlCreateCheckbox("Ja", 480, 224, 41, 17)
$Checkbox2 = GUICtrlCreateCheckbox("Nein", 544, 224, 41, 17)
$Label6 = GUICtrlCreateLabel("Magnetisch", 400, 256, 73, 20)
$Ja = GUICtrlCreateCheckbox("Ja", 480, 256, 49, 17)
$Nein = GUICtrlCreateCheckbox("Nein", 544, 256, 49, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$pic = GUICtrlCreatePic("", 640, 112, 441, 305, BitOR($GUI_SS_DEFAULT_PIC, $SS_RIGHTJUST, $WS_BORDER))
$Group3 = GUICtrlCreateGroup("Funddaten", 208, 416, 409, 153)
$Fundor = GUICtrlCreateLabel("Fundort", 224, 456, 49, 20)
$Fundort = GUICtrlCreateInput("", 304, 456, 241, 24)
$Fundlan = GUICtrlCreateInput("", 304, 504, 241, 24)
$Fundland = GUICtrlCreateLabel("Fundland", 224, 504, 60, 20)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Bild öffnen", 744, 424, 97, 33)
$Button2 = GUICtrlCreateButton("Bild löschen", 880, 424, 97, 33)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateInput("", 312, 24, 465, 21)
$Suche = GUICtrlCreateLabel("Suche", 256, 24, 55, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
$Zurueck = GUICtrlCreateButton("Zurück", 440, 648, 65, 33)
$Vor = GUICtrlCreateButton("Vor", 696, 648, 65, 33)


$ListView1 = GUICtrlCreateListView("", 8, 88, 150, 545)
_GUICtrlListView_AddColumn($ListView1, "Name", 70)
_GUICtrlListView_AddColumn($ListView1, "Nummer", 150)
;Global $aHeader = StringSplit($ListView1, '|')
Global $hListView = GUICtrlGetHandle($ListView1)
$cContextMenue = GUICtrlCreateContextMenu($ListView1)
GUICtrlCreateListViewItem("", $ListView1)
;Dim $Form1_1_AccelTable[2][2] = [["^{DOWN}", $MenuItem4],["^+0", $MenuItem6]]
;GUISetAccelerators($Form1_1_AccelTable)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


_SQLite_Startup()


If @error Then Exit MsgBox(16, "SQLite Fehler", "SQLite.dll konnte nicht geladen werden!")
ConsoleWrite("_SQLite_LibVersion=" & _SQLite_LibVersion() & @CRLF)


Global $hDB = _SQLite_Open($sDbMineral)
If @error Then Exit MsgBox(16, "SQLite Fehler", "Die Datenbank konnte nicht geöffnet werden!")


If FileExists("mineraldb.sqlite") Then
	$DB = _SQLite_Open("mineraldb.sqlite")
	If @error Then Exit MsgBox(16, "SQLite Fehler", "Die Datenbank konnte nicht geöffnet werden!")


	_SQLite_Exec(-1, "CREATE TABLE IF NOT EXISTS Mineralien (ID INTEGER PRIMARY KEY, Nummer INTEGER, Name TEXT, Formel TEXT, Gewicht TEXT, Farbe TEXT, Fundort TEXT, Fundland TEXT);")


	_SQLite_Exec(-1, "INSERT INTO Mineralien(Nummer,Name,Formel,Gewicht,Farbe,Fundort,Fundland) VALUES (1, 'Galvanit','H2OKopF','500','rot','Wien','Italien');")
	_SQLite_Exec(-1, "INSERT INTO Mineralien(Nummer,Name,Formel,Gewicht,Farbe,Fundort,Fundland) VALUES (2, 'Tritanit','O3H2','300','grün','Rom','Schweiz');")
EndIf


; Main-Loop
While True
	Switch GUIGetMsg()
		Case -3					; Die DB wird nicht gespeichert???
			_SQLite_Close($DB)
			_SQLite_Shutdown()
			Exit
		Case $MenuItem5
			$iRva = _SQLite_GetTable2d(-1, "SELECT Nummer, * FROM Mineralien;", $aResult, $iRows, $iColumns)
			_SQLite_GetTable2d(-1, "SELECT Name, * FROM Mineralien;", $aResult, $iRows, $iColumns)
			_ArrayDelete($aResult, 0)
			_GUICtrlListView_AddArray($ListView1, $aResult)
		Case $MenuItem4
			_NeuerDatensatz()
		Case $Button1
			$open = FileOpenDialog("Wählen Sie eine Datei aus.", @TempDir, "Bilder (*.jpg;*.bmp;*.png)")
			If @error Then
				MsgBox(4096, "", "Keine Datei ausgewählt")
			EndIf
			GUICtrlSetImage($pic, $open)
		Case $MenuItem7
			Exit
	EndSwitch
WEnd


Func _NeuerDatensatz()
	#Region ### START Koda GUI section ### Form=
	Local $hGUI, $nMsg, $idInput_Nummer, $idInput_Formel, $idInput_Farbe, $idInput_Name, $idInput_Gewicht, $idInput_Fundort, $idInput_Fundland, $idInput_Felder, $idButton_OK, $aData[7], $aDefault = ['Nummer', 'Formel', 'Farbe', 'Name', 'Gewicht', 'Fundort', 'Fundland'], $iError = 0, _
			$sINSERT = "INSERT INTO Mineralien(Nummer,Name,Formel,Gewicht,Farbe,Fundort,Fundland) VALUES", _
			$sFORMAT = "%s (%i,'%s','%s','%s','%s','%s','%s');"


	$hGUI             = GUICreate("Neuer Datensatz", 530, 241, 192, 131)
	$idInput_Nummer   = GUICtrlCreateInput("Nummer", 24, 56, 121, 21)
	$idInput_Formel   = GUICtrlCreateInput("Formel", 24, 104, 121, 21)
	$idInput_Farbe    = GUICtrlCreateInput("Farbe", 24, 152, 121, 21)
	$idInput_Name     = GUICtrlCreateInput("Name", 200, 56, 121, 21)
	$idInput_Gewicht  = GUICtrlCreateInput("Gewicht", 200, 104, 121, 21)
	$idInput_Fundort  = GUICtrlCreateInput("Fundort", 200, 152, 121, 21)
	$idInput_Fundland = GUICtrlCreateInput("Fundland", 376, 56, 121, 21)
	$idInput_Felder   = GUICtrlCreateLabel("Bitte alle Felder korrekt ausfüllen!", 40, 16, 129, 17)
	$idButton_Add     = GUICtrlCreateButton("Datensatz hinzufügen", 168, 192, 169, 33)
	GUISetState(@SW_SHOW)
	#EndRegion ### END Koda GUI section ###


	While 1
		$nMsg = GUIGetMsg()
		Switch $nMsg
			Case $GUI_EVENT_CLOSE
				GUIDelete($hGUI)
				ExitLoop
			Case $idButton_Add
				$aData[0] = GUICtrlRead($idInput_Nummer)
				$aData[1] = GUICtrlRead($idInput_Formel)
				$aData[2] = GUICtrlRead($idInput_Farbe)
				$aData[3] = GUICtrlRead($idInput_Name)
				$aData[4] = GUICtrlRead($idInput_Gewicht)
				$aData[5] = GUICtrlRead($idInput_Fundort)
				$aData[6] = GUICtrlRead($idInput_Fundland)
				Select
					Case Int($aData[0]) = 0	; und prüfen ob die Nummer bereits existiert
						$iError = 1
					Case $aData[1] = $aDefault[1] Or $aData[1] = ''
						$iError = 1
					Case $aData[2] = $aDefault[2] Or $aData[2] = ''
						$iError = 1
					Case $aData[3] = $aDefault[3] Or $aData[3] = ''
						$iError = 1
					Case $aData[4] = $aDefault[4] Or $aData[4] = ''
						$iError = 1
					Case $aData[5] = $aDefault[5] Or $aData[5] = ''
						$iError = 1
					Case $aData[6] = $aDefault[6] Or $aData[6] = ''
						$iError = 1
				EndSelect
				If $iError = 1 Then
					MsgBox(262192, @ScriptName, 'Bitte alle Felder korrekt ausfüllen!')
					ContinueLoop
				EndIf


				;		_SQLite_Exec(-1, "INSERT INTO Mineralien (Nummer,Name,Formel,Gewicht,Farbe,Fundort,Fundland) VALUES ('"_
				;		& GUICtrlRead($Nummer[1]) & "','" & GUICtrlRead($Input4[2]) & "','" & GUICtrlRead($Input2[3]) & "','" & GUICtrlRead($Input5[4]) & "','" & GUICtrlRead($Input3[5])& "','" & GUICtrlRead($Input6[6])& "','" & GUICtrlRead($Input1[7]) & "');")


				_SQLite_Exec(-1, StringFormat($sFORMAT, $sINSERT, $aData[0], $aData[1], $aData[2], $aData[3], $aData[4], $aData[5], $aData[6]))
				ConsoleWrite(StringFormat($sFORMAT, $sINSERT, $aData[0], $aData[1], $aData[2], $aData[3], $aData[4], $aData[5], $aData[6]) & @CRLF)
				;Sleep(5000)
				;Exit
		EndSwitch
	WEnd
EndFunc   ;==>_NeuerDatensatz

Alles anzeigen

Neight

Hey Bitnugger,

danke für deine Hilfe und Zeit bei der Bearbeitung des Scripts.

Ja ich merke auch, dass das Projekt doch recht schwierig ist. Mal gucken vielleicht muss ich es erstmal pausieren, weil es schon noch paar Dinge gibt, wo ich nicht genau weiß wie ich es umsetze.

**autoiter**

Ach was, lass dich mal nicht entmutigen. Ist doch eigentlich gut, wenn man in einem Skript, das einen interessiert gleich viele Teilbereiche einüben kann.

**Bitnugger**

Das Projekt an sich birgt keine besonderen Schwierigkeiten... es ist/wird nur recht umfangreich... den fettesten Anteil dabei nimmt am Ende dann der SQLite-Teil ein... und hier hast du schon vom Ansatz her arge Probleme gehabt, ebenso mit deiner Child-GUI... weil deine Basics dafür einfach noch nicht ausreichen.

Zudem würde ich es nicht als pausieren betrachten... sondern als eine intelligente Herangehensweise, wenn du erst noch etwas an deinen Basics arbeitest, was dir am Ende garantiert einen hohen Zeitgewinn einbringt und vor allem aber deine Nerven schont - und du am Ende dann mit Stolz auf ein - dein erstes - wirklich sauber programmiertes Projekt/Kunstwerk blicken kannst.

Und schau mal hier...SQLite_helper.au3 - evtl. kannst du damit ja was anfangen... habe es mir nicht näher angesehen.

Neight

ja da hast du wohl Recht.
Das meinte ich mit pausieren, erstmal sich noch paar Grundlagen angucken und denn mal gucken ob und wie es weiter geht mit dem Projekt.

Ich werde es mir mal angucken, vielleicht hilft es mir weiter.

Neight