1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. meistertogo

Beiträge von meistertogo

  • Wurzel (Sqrt) Rückgabewertproblem

    • meistertogo
    • 31. Juli 2010 um 18:21

    Wenn ich das jetzt richtig verstanden habe, muss ich einfach ein "=" mehr hinzufügen, um einen Stringvergleich durchführen und keine Zuweisung. Richtig?

  • Wurzel (Sqrt) Rückgabewertproblem

    • meistertogo
    • 31. Juli 2010 um 18:16

    Sorry wegen dem Doppelpost aber ich hab in dem Spoiler einen Fehler gemacht. ;(
    Hier die von mir gemeinte Version.

    Spoiler anzeigen
    [autoit]


    $Ergebnis = ""
    While 1
    $Wurzeltest = InputBox("Wurzelrückgabewert Test", "Gib die Zahl ein, deren Wurzel Du erfahren möchtest!")
    If @error = 1 Then
    Exit
    EndIf
    $Ergebnis = Sqrt($Wurzeltest)
    If $Ergebnis = "-1.#IND" Then
    MsgBox(0, "Ungültige Eingabe!", "-1.#IND");wird nicht ausgeführt
    Else
    MsgBox(0, "Ergebnis der Wurzel", "Die Wurzel aus "&$Wurzeltest&" ist "&$Ergebnis&".")
    EndIf
    WEnd

    [/autoit]
  • Wurzel (Sqrt) Rückgabewertproblem

    • meistertogo
    • 31. Juli 2010 um 18:07

    Danke für Eure schnellen Antworten. Der von mir gekennzeichnete Block wird auch nicht ausgeführt wenn ich das Skript ändere (s. Quelltext).

    Spoiler anzeigen
    [autoit]


    $Ergebnis = ""
    While 1
    $Wurzeltest = InputBox("Wurzelrückgabewert Test", "Gib die Zahl ein, deren Wurzel Du erfahren möchtest!")
    If @error = 1 Then
    Exit
    EndIf
    If $Wurzeltest = "" Then
    MsgBox(0, "Ungültige Eingabe!", "Du hast nichts eingegeben.")
    ElseIf $Wurzeltest = "-1.#IND" Then ; <-- das hier
    MsgBox(0, "Ungültige Eingabe!", "-1.#IND") ; <-- und das
    Else
    $Ergebnis = Sqrt($Wurzeltest)
    MsgBox(0, "Ergebnis der Wurzel", "Die Wurzel aus "&$Wurzeltest&" ist "&$Ergebnis&".")
    EndIf
    WEnd

    [/autoit]
  • Wurzel (Sqrt) Rückgabewertproblem

    • meistertogo
    • 31. Juli 2010 um 17:33

    Hallo autoit - community!
    Ich habe mit der Sqrt - Funktion ein bischen herumprobiert und bin dabei auf ein Problem mit dem Rückgabewert "-1.#IND" gestoßen.
    Der Quellcode und das Problem erklären sich von selbst.

    Spoiler anzeigen
    [autoit][/autoit] [autoit][/autoit] [autoit]

    $Ergebnis = ""

    [/autoit] [autoit][/autoit] [autoit]

    While 1

    [/autoit] [autoit][/autoit] [autoit]

    $Wurzeltest = InputBox("Wurzelrückgabewert Test", "Gib die Zahl ein, deren Wurzel Du erfahren möchtest!")

    [/autoit] [autoit][/autoit] [autoit]

    If @error = 1 Then
    Exit
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    If $Wurzeltest > 0 And Not "" Then

    [/autoit] [autoit][/autoit] [autoit]

    $Ergebnis = Sqrt($Wurzeltest)

    [/autoit] [autoit][/autoit] [autoit]

    MsgBox(0, "Ergebnis der Wurzel", "Die Wurzel aus "&$Wurzeltest&" ist "&$Ergebnis&".")

    [/autoit] [autoit][/autoit] [autoit]

    ElseIf $Wurzeltest < 0 And Not "" Then

    [/autoit] [autoit][/autoit] [autoit]

    $Ergebnis = Sqrt($Wurzeltest)

    [/autoit] [autoit][/autoit] [autoit]

    MsgBox(0, "Ergebnis der Wurzel", "Die Wurzel aus "&$Wurzeltest&" ist "&$Ergebnis&".")

    [/autoit] [autoit][/autoit] [autoit]

    If $Ergebnis = "-1.#IND" Then ; <-\
    MsgBox(0, "Ungültige Eingabe!", "-1.#IND") ; <-- warum schlägt dieser Block fehl (sprich: erscheint erst gar nicht)?
    EndIf ; <-/
    Else
    MsgBox(0, "Ungültige Eingabe!", "Du hast nichts eingegeben."&@CR&"Probiere es erneut.")
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    WEnd

    [/autoit]

    Vielen Dank im Voraus!

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™