Hallo Leute,
ich wollte in letzter Zeit ein Programm schreiben, mit dem ich eine .ini bzw. eine .inf Datei nach einem Wort zu durchsuchen und danach die Zeile auszugeben, die 2 Zeilen darunter liegt. Das Wort, wonach die Datei durchsucht werden soll, soll man vorher durch einen Input-Eingabefeld festlegen.
Bei meinem Code funktioniert das Fenster, aber wenn man den Button drckt, passiert nicht. Da ich mich erst 2 Tage mit dem Programm auseinander setze, bitte ich um eure Hilfe.
Danke im vorraus
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <MsgBoxConstants.au3>
#include <WinAPIFiles.au3>
$Form1 = GUICreate("Nummer suchen", 288, 130, 192, 124)
$Name = GUICtrlCreateLabel("Name", 16, 16, 48, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Arial")
$Input = GUICtrlCreateInput("", 16, 40, 249, 28)
GUICtrlSetFont(-1, 12, 800, 0, "Arial Narrow")
$Button1 = GUICtrlCreateButton("Suchen", 16, 72, 81, 33)
GUICtrlSetFont(-1, 12, 800, 2, "Arial Narrow")
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $Button1
$datei = IniRead("C:\Users\Johannes\Desktop\caller.inf", "section2", "key", "NotFound")
$eingabe = $Input
$count = _FileReadLines($datei)
For $i = 1 to $count
$line = FileReadLine($datei, $i)
If StringInStr($line, $Input) Then
$z = 2
$b = & i + $z
$line = FileReadLine($datei, $b)
MsgBox(0, "Nummer gefunden!" & $Input & @CRLF & "" & $line)
EndIf
Next
EndSwitch
WEnd