Hallo,
ich habe in meiner programmierung ein GUI-Fenster mit verschiedenen Labels, welche durch einen Input ausgelesen werden, sodass wenn man etwas in die Inputbox eingibt, das gefundene Ergebnis in ein leeres Label eingibt. Bis hier hin funktioniert es auch noch. Aber nachdem ich einen Text in den Labels habe, kann ich mein Fenster nicht mehr schließen (dies ging vor der eingabe) und wenn ich einen neuen Text in die Inputbox eingebe, verändert sich das Suchergebnis nicht, sondern bleibt immer bleim gleichen Text. Dies wirkt so, als ob der Text ständig neu eingetragen wird und nicht einmal eingetragen wird und dann pausiert wird.
Zusammengefasst, will ich den Code so hinbekommen, dass ich immer wieder einen neuen Text in das Inputfeld eingeben kann und das Ergebnis dann neu eingetragen wird. Ich denke, dies würde am besten funktionieren, indem ich am Anfang sage, dass er alle Label überprüfen soll und wenn er welche findet, den Inhalt löschen soll, aber nicht das Label. Allerdings schaff ich dies nicht, da die Labels erst später erstellt werden.
Ich bin dankbar für jede Antwort
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <File.au3>
#include <MsgBoxConstants.au3>
#include <WinAPIFiles.au3>
#include <AutoItConstants.au3>
Opt("GUIOnEventMode", 1)
$Form1 = GUICreate("Fahrzeugverzeichnis", 409, 289, 192, 124)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
$Label = GUICtrlCreateLabel("Kennzeichen:", 8, 8, 100, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Input = GUICtrlCreateInput("", 8, 32, 193, 24)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Button1 = GUICtrlCreateButton("Durchsuchen", 120, 64, 83, 25)
GUICtrlSetOnEvent($Button1, "Durchsuchen")
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("", 8, 128, 212, 20)
GUICtrlSetFont(-1, 11, 400, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("", 8, 160, 212, 20)
GUICtrlSetFont(-1, 11, 400, 0, "MS Sans Serif")
$Label4 = GUICtrlCreateLabel("", 8, 192, 212, 20)
GUICtrlSetFont(-1, 11, 400, 0, "MS Sans Serif")
$Label5 = GUICtrlCreateLabel("", 8, 224, 212, 20)
GUICtrlSetFont(-1, 11, 400, 0, "MS Sans Serif")
$Label6 = GUICtrlCreateLabel("", 8, 256, 212, 20)
GUICtrlSetFont(-1, 11, 400, 0, "MS Sans Serif")
$Label1 = GUICtrlCreateLabel("", 8, 96, 212, 20)
GUICtrlSetFont(-1, 11, 400, 0, "MS Sans Serif")
$Button = GUICtrlCreateButton("Button1", 232, 120, 161, 129) ;Bild
GUISetState(@SW_SHOW)
While 1
Sleep(100)
WEnd
Func Form1Close()
exit
EndFunc
Func Durchsuchen()
$Verzeichnis = "Autoverzeichnis.txt"
$Eingabe = GUICtrlRead($Input)
$z = 0
$i = 0
$y = 1
While IniRead($Verzeichnis, "#" & $i, "Kennzeichen", "Error") <> "File not found."
$Ergebnis = IniRead($Verzeichnis, "#" & $i, "Kennzeichen", "0")
If(StringInStr($Ergebnis, $Eingabe) <> 0) Then
$Kennzeichen = IniRead($Verzeichnis, "#" & $i, "Kennzeichen", "0")
$Farbe = IniRead($Verzeichnis, "#" & $i, "Farbe", "0")
$Modell = IniRead($Verzeichnis, "#" & $i, "Modell", "0")
$Besitzer = IniRead($Verzeichnis, "#" & $i, "Besitzer", "0")
$Herstellungsdatum = IniRead($Verzeichnis, "#" & $i, "Herstellungsdatum", "0")
$ID = IniRead($Verzeichnis, "#" & $i, "ID", "0")
GUICtrlSetData($Label1, "Kennzeichen:" & $Kennzeichen)
GUICtrlSetData($Label2, "Farbe:" & $Farbe)
GUICtrlSetData($Label3, "Modell:" & $Modell)
GUICtrlSetData($Label4, "Besitzer:" & $Besitzer)
GUICtrlSetData($Label5, "Herstellungsdatum:" & $Herstellungsdatum)
GUICtrlSetData($Label6, "ID:" & $ID)
While 1
Sleep(100)
WEnd
Else
$i = $i + 1
EndIf
WEnd
EndFunc
Alles anzeigen