Beiträge von Yjuq

  • Unterschied (Switch case) (If Then endif)

    Zeile 7:

    Spoiler anzeigen
    [autoit]

    #include <Debug.au3>
    #include <GUIConstantsEx.au3>
    #include <SliderConstants.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 623, 138, 192, 114, Default, $WS_EX_COMPOSITED + $WS_EX_LAYERED)
    $Label1 = GUICtrlCreateLabel("Label1", 216, 16, 36, 17)
    $Slider1 = GUICtrlCreateSlider(56, 48, 481, 20)
    GUICtrlSetLimit(-1, 100, 0)
    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

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

    ;_DebugSetup("debug", True) ;

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

    While 1

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

    $nMsg = GUIGetMsg()

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

    if $nMsg <> 0 Then
    ;_DebugOut($nMsg)
    EndIf

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

    ;If (GUICtrlRead($Slider1)) And ($nMsg <> 0) Then
    ;GUICtrlSetData($Label1, GUICtrlRead($Slider1))
    ;EndIf

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

    Switch $nMsg
    Case $nMsg = $Slider1
    GUICtrlSetData($Label1, GUICtrlRead($Slider1))
    EndSwitch

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

    ;Select
    ;Case $nMsg = $Slider1
    ;GUICtrlSetData($Label1, GUICtrlRead($Slider1))
    ;EndSelect

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

    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch

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

    WEnd

    [/autoit]

  • Array mischen

    minx:
    Wieso gleich nicht so?

    [autoit]

    Func _ArrayMixup(ByRef $aArray)
    $iBound = UBound($aArray)-1
    For $i = 1 To $iBound ;// Zu "1" gesetzt!
    $iMarker = Random(1, $iBound, 1) ;// 1. Parameter zu "1" gesetzt!
    If $i <> $iMarker Then
    $nBackup = $aArray[$iMarker]
    $aArray[$iMarker] = $aArray[$i]
    $aArray[$i] = $nBackup
    EndIf
    Next
    EndFunc

    [/autoit]

    Bei größeren Arrays ist es doch schneller anstatt nochmal ein Funktionsaufruf vorzunehmen? z.B. Bei einem Index von 1.000.000
    Wenn ich mich nicht irre macht dies genau was gewünscht wird. Oder sehe ich das falsch :o?
    [Ich frage mich nur gerade wieso du das so "umständlich" machst ...]

  • Msgbox auswahl berücksichtigen

    Hier hast du ein kleines MsgBox wirrwarr Beispiel ;D

    [autoit]

    MsgBox(262144, '', 'Start', 3)
    _Funktion()
    MsgBox(262144, '', 'Ende', 3)

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

    Func _Funktion()
    Switch MsgBox(4 + 256 + 262144, '', 'Möchten Sie das Programm beenden?', 5)
    Case -1 ;// Zeit abgelaufen
    MsgBox(262144, '', 'Die Zeit ist abgelaufen!' & @CRLF & _
    'Das Programm wird weiterhin ausgeführt!', 3)
    Case 6 ;// [YES] Button
    MsgBox(262144, '', 'Das Programm wurde beendet!', 3)
    Exit
    Case 7 ;// [NO] Button
    MsgBox(262144, '', 'Das Programm wird weiterhin ausgeführt!', 3)
    EndSwitch
    EndFunc

    [/autoit]

  • Digital Uhr

    Naja :D
    Das wurde ja durch deine Beiträge nicht klar.
    Zudem hast du uns ja regelrecht aufgefordert das Script zu kürzen. ;)

    "Alles was Sie sagen kann und wird gegen Sie verwendet!"
    --> Naja, weißt ja jetzt bescheid :D
    (Mir wurde das ganze schließlich auch erst nach unseren PN austausch klar.)

  • Werte in INI Datei ändern?

    Ich hatte BugFix dies bezöglich bereits angeschrieben (zu allen gelöschten Beiträge von IPU).
    Es wurde gesagt, dass sie die ganzen Post editiert hat und somit die Inhalte gelöscht hat.
    Somit kann BugFix diese nicht wiederherstellen.

    Das ist mein Informationsstand :)
    Aber kann ja sein das dieser beitrag evtl. Nicht editiert wurde.
    (Korregiert mich bitte wenn ich falsch liegen sollte)

    Stand in den Post etwas wichtiges drinne was dir weitergeholfen hat?
    Weißt du in etwa worum es geht? Evtl. Kann man dir auch so weiterhelfen...

  • Zeilen überspringen möglich?

    Naja, eine alternative wäre auch Funktionen. Da kannst du dann deine Codes auslegen:

    [autoit]

    ConsoleWrite(@CRLF)

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

    _F1()
    _F2()
    _F3()

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

    ConsoleWrite(@CRLF)

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

    Func _F1()
    ConsoleWrite('"Sprung" zu Zeile ' & @ScriptLineNumber & @CRLF)
    EndFunc

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

    Func _F2()
    ConsoleWrite('"Sprung" zu Zeile ' & @ScriptLineNumber & @CRLF)
    EndFunc

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

    Func _F3()
    ConsoleWrite('"Sprung" zu Zeile ' & @ScriptLineNumber & @CRLF)
    EndFunc

    [/autoit]