Hallo,
So sieht immoment mein Script aus :
Spoiler anzeigen
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$Form1_1 = GUICreate("Form1", 682, 680, 206, 148,$WS_POPUP)
$Input1 = GUICtrlCreateInput("", 304, 168, 329, 21)
$Edit1 = GUICtrlCreateEdit("", 304, 248, 329, 25, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN))
GUICtrlSetData(-1, "Edit1")
$Edit2 = GUICtrlCreateEdit("", 304, 320, 329, 25, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN))
GUICtrlSetData(-1, "Edit2")
$suchen = GUICtrlCreateButton("suchen", 304, 200, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $suchen
switch GuiCtrlRead($Input1)
Case "Banane", "Banana", "lange Stange"
$Text = "Spielzeug"
GUICtrlSetData($Edit1, $Text)
$Text2 = "Droge"
GUICtrlSetData($Edit2, $Text2)
Case "Tomate", "Tomato", "spanische Tomaten"
$Text = "Aberglaube"
GUICtrlSetData($Edit1, $Text)
$Text2 = "Langweilig"
GUICtrlSetData($Edit2, $Text2)
Case Else
MsgBox(0, "Rückmeldung", "Auswertung kann nicht erfolgen. Bitte gebe sie ein anderes Wort ein.")
EndSwitch
EndSwitch
WEnd
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Ich möchte sozusagen eine Suchfunktion erstellen. So ist es also bei mir und wenn ich dann z.B. eins der 3 Wörter im Input eingebe, dann schreibt er dazu das jeweilige in die beiden Edit Boxen.
Das Problem ist, dass ich das selbe noch 500x machen muss, wenn ich etwas fertig haben möchte, da ich eine Liste habe und dort alles drin vorkommen muss. Kann ich es irgendwie verkürzen, dass ich z.B. nur das Wort " To " , " Tom", " Toma", "Tomat","Tomate" schreiben muss um eins davon zu erhalten?
