|
You last visited: Today at 01:57
Advertisement
Fehlermeldung
Discussion on Fehlermeldung within the AutoIt forum part of the Coders Den category.
06/15/2011, 21:42
|
#1
|
elite*gold: 0
Join Date: Feb 2011
Posts: 1,342
Received Thanks: 410
|
Fehlermeldung
Hallo,
ich habe eine Fehlermeldung, wenn ich mein Script ausführen möchte, jedoch verstehe ich nicht, wo der Fehler liegen soll.
Script :
Code:
#include <File.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$Form2 = GUICreate("", 620, 657, 182, 144, $WS_POPUP)
$Edit1 = GUICtrlCreateEdit("", 0, 0, 633, 529)
GUICtrlSetData(-1, "")
$Input1 = GUICtrlCreateInput("", 0, 560, 513, 21)
$senden = GUICtrlCreateButton("senden", 528, 560, 75, 25, $WS_GROUP)
$Beenden = GUICtrlCreateButton("Beenden", 528, 608, 75, 25, $WS_GROUP)
$Pic1 = GUICtrlCreatePic("Background.jpg", 0, 520, 636, 360, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)
Local $sBuffer
Dim $Text
Dim $Fragen
Dim $Antworten
_FileReadToArray("Antwort.txt","|", $Fragen)
_FileReadToArray("Frage.txt", "|", $Antworten)
While (TRUE)
Switch (GUIGetMsg( ))
Case $GUI_EVENT_CLOSE
Exit
Case $senden
$sBuffer = GuiCtrlRead($Input1)
For $i = 1 To UBound($Fragen) - 1
If $Fragen[$i] = $sBuffer Then
If StringRegExp ($sBuffer, $Fragen[$i]) Then
Local $iRnd = Random(1, 2, 1)
Switch $iRnd
GUICtrlSetData($Edit1, $Antworten[$i])
EndIf
EndIf
EndSwitch
WEnd
Könntet ihr mir bitte helfen und mir erzählen, was ich verändert muss, damit es funzt?
|
|
|
06/15/2011, 22:12
|
#2
|
elite*gold: 280
Join Date: May 2007
Posts: 2,818
Received Thanks: 3,483
|
Quote:
C:\Users\Administrator\Desktop\test.au3(20,56) : ERROR: _FileReadToArray() called with wrong number of args.
|
man könnte fast meinen das _FileReadToArray mit einer falschen anzahl von argumenten aufgerufen wurde
Quote:
C:\Users\Administrator\Desktop\test.au3(29,45) : ERROR: $Zeilen: undeclared global variable.
|
$zeilen wurde auch in der for schleifegenutzt, ohne definiert zu sein.
|
|
|
06/15/2011, 22:46
|
#3
|
elite*gold: 0
Join Date: Feb 2011
Posts: 1,342
Received Thanks: 410
|
So habe es nochmal überarbeitet, jedoch gibt es immer noch eine Fehlermeldung, obwohl ich doch WEnd auch da habe.
Script :
Code:
#include <File.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$Form2 = GUICreate("", 620, 657, 182, 144, $WS_POPUP)
$Edit1 = GUICtrlCreateEdit("", 0, 0, 633, 529)
GUICtrlSetData(-1, "")
$Input1 = GUICtrlCreateInput("", 0, 560, 513, 21)
$senden = GUICtrlCreateButton("senden", 528, 560, 75, 25, $WS_GROUP)
$Beenden = GUICtrlCreateButton("Beenden", 528, 608, 75, 25, $WS_GROUP)
$Pic1 = GUICtrlCreatePic("Background.jpg", 0, 520, 636, 360, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)
Local $sBuffer
Dim $Text
Dim $Fragen
Dim $Antworten
_FileReadToArray("Antwort.txt", $Fragen)
_FileReadToArray("Frage.txt", $Antworten)
While (TRUE)
Switch (GUIGetMsg( ))
Case $senden
$Antworten = GuiCtrlRead($Input1)
For $i = 1 To UBound($Fragen) - 1
If $Fragen[$i] = $Antworten Then
If StringRegExp ($Antworten, $Fragen[$i]) Then
Local $iRnd = Random(1, 2, 1)
Switch $iRnd
GUICtrlSetData($Edit1, $Antworten[$i])
EndSwitch
EndIf
EndIf
Next
WEnd
|
|
|
06/15/2011, 23:05
|
#4
|
elite*gold: 146
Join Date: May 2009
Posts: 3,764
Received Thanks: 6,973
|
View -> Output
Standardmässig aktiviert. Und dein Code gibt unter Garantie mehr als einen Fehler aus...
|
|
|
06/15/2011, 23:16
|
#5
|
elite*gold: 0
Join Date: Feb 2011
Posts: 1,342
Received Thanks: 410
|
Ahh dort. Danke.
Alles behoben nun
|
|
|
|
Similar Threads
|
Fehlermeldung help
03/03/2011 - S4 League - 4 Replies
eas kann ich machen es ist fehlermeldung W L
|
Fehlermeldung
04/02/2010 - WarRock - 13 Replies
Hallo Leute,
ich habe da so ein Problem immer wenn ich einen Hack starte und dann Warrock,
kommt die Meldung Warrock hat ein Problem festgestellt und muss beendet werden.
Kann mir jemand sagen woran das liegt?:confused:
Mfg Killerigor
|
Fehlermeldung
04/01/2010 - Metin2 - 8 Replies
Hi
wenn ich metin2 starten will kommt diese fehlermeldung
''sorry,your system does not support 3D graphics, please check your hardware and system configeration then try again''
das ist ein p server den ich spielen will
aber komischer weise kann ich andere server spielen aber der geht irgendwie nicht
hoffe auf hilfreiche antworten
danke
|
Fehlermeldung
06/22/2009 - Metin2 Private Server - 3 Replies
Was hast das wenn ich ein mb lesen möchte kommt immer das der Rote Text unten im Chat.
http://www.bilder-space.de/thumb/22.06h3CasLxwOjF VtOG.jpg
Bin lvl25
|
Fehlermeldung Fehlermeldung Fehlemeldung :(
09/22/2008 - World of Warcraft - 1 Replies
Hi, ich wollte heute mal mein Bloodelf Priest in nen UD ändern aber es kommt immer die "File Coruppt" Fehlermeldung.. also kein Login Fehler.. aber sobald ich im Charakter Bildschirm auf Bloodelf Female gehe bekomme ich nen error! Alle anderen gehen.. kann auch einloggen aber sobald ich nen blutelf anklicke der irgendwo rumsteht bekomm ich auch den error.. Weis nicht weiter! Ich hab das heute zum ersten mal gemacht und funzen tuts einfach nicht :(
ich hab auch andere MPQ´s ausprobiert...
|
All times are GMT +2. The time now is 01:57.
|
|