Beiträge von Schnuffel

  • Fokus auf Button

    oder aber über WM_COMMAND:

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 487, 92, 192, 124)
    $Input1 = GUICtrlCreateInput("Input1", 8, 32, 329, 21)
    $Input1_Switch = False
    $Button1 = GUICtrlCreateButton("Button1", 344, 32, 131, 25)
    $Input2 = GUICtrlCreateInput("Input2", 8, 62, 329, 21)
    $Input2_Switch = False
    $Button2 = GUICtrlCreateButton("Button2", 344, 62, 131, 25)
    GUIRegisterMsg($WM_COMMAND, "MY_WM_COMMAND")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    MsgBox(0, "Ausgabe",GUICtrlRead($Input1))
    Case $Button2
    MsgBox(0, "Ausgabe",GUICtrlRead($Input2))
    EndSwitch

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

    WEnd

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

    Func MY_WM_COMMAND($hWnd, $Msg, $wParam, $lParam)
    $nNotifyCode = BitShift($wParam, 16)
    $nID = BitAND($wParam, 0x0000FFFF)
    If $nNotifyCode = 256 Then
    Switch $nID
    Case $Input1
    GUICtrlSetStyle($Button2, '')
    GUICtrlSetState($Button1, $GUI_DEFBUTTON)
    Case $Input2
    GUICtrlSetStyle($Button1, '')
    GUICtrlSetState($Button2, $GUI_DEFBUTTON)
    EndSwitch
    EndIf
    EndFunc ;==>MY_WM_COMMAND

    [/autoit]

  • Bestimmte Anzahl von Wiederhohlungen

    ist aber noch nicht sonderlich ausgereift...?

    [autoit]

    Sleep (3000)
    MouseClick ("left")

    [/autoit]

    Versteh uns nicht falsch, aber diese Art von Script wird i.d.R. für Spiele verwendet.
    Wenn jemand ohne große Vorahnung solche Fragen stellt da sind wir immer skeptisch.

    Es würde die Sache vereinfachen, wenn Du ein vollständiges Script posten würdest...

  • Problem mit GUICtrlSetGraphic

    ich hab mal beliebige Werte genommen, da ich keine Lust hatte mir eine ini zu basteln;

    Der Fehler liegt wohl eher an den Werten aus der ini.
    Vielleicht mal mit einer MsgBox überprüfen nach dem Einlesen:

    [autoit]

    #include <GUIConstants.au3>

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

    #region - GUI Create
    GUICreate('',800,600)
    Dim $Zeitpool = 25000, $Zeit = 0, $Value
    $Grafik = GUICtrlCreateGraphic(320, 200, 200, 200)
    $Ab = 0
    For $i = 1 To 18
    $Zeit += 2800
    $Value = $Zeit/$Zeitpool*100
    $Value = Round($Value, 2)
    GUICtrlSetGraphic($Grafik, $GUI_GR_PIE, 100, 100, 150, 3.6*$Ab, 3.6*$Value)
    $Ab += $Value
    Next
    GUISetState()
    #endregion

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

    #region - GUI SelectLoop
    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    Exit
    EndSelect
    WEnd
    #endregion

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

  • GUICtrlRead - Registry Problem

    als Erstes würde ich das Einlesen der Reg-Werte kürzen und in ein Array packen:

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <ComboConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <TabConstants.au3>
    #include <WindowsConstants.au3>
    #include <Array.au3>

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

    Dim $aRegReadKeys[1] = [0]

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

    $ProgTitle = "platzhalt0r"
    For $i = 1 to 10 ;; Alle Unterordner von "...\Users" in Variablen hauen :V
    $temp = RegEnumKey("HKEY_CURRENT_USER\Software\Valve\Steam\Users",$i)
    If @error Then ExitLoop
    _ArrayAdd($aRegReadKeys, RegRead("HKEY_CURRENT_USER\Software\Valve\Steam\Users\"&$temp&"\friends","PersonaName"))
    $aRegReadKeys[0] = $i + 1
    Next
    _ArrayDisplay($aRegReadKeys)

    [/autoit]

    Deine $ii Variablen musst Du halt dem ArrayNamen anpassen. In $aRegReadKey[0] steht dann immer die Anzahl der gefunden Werte ;)

  • Verschieben bei ordnern geht nicht

    also wie gesagt...
    2 Schreibfehler
    statt .ink nimm .lnk und der Ordner Programme und Tool existiert nicht
    hier mal gekürzt:

    [autoit]

    #RequireAdmin

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

    DirCreate (@ProgramsDir&"\Programme & Tools\Adobe")
    FileCopy (@ScriptDir&"\logo.bmp", @SystemDir&"\oobe\info\", 8 )
    DirMove (@ProgramsDir&"\Nero", @ProgramsDir&"\Programme & Tools")
    DirMove (@ProgramsDir&"\Avira",@ProgramsDir&"\Programme & Tools")
    FileCopy (@ProgramsDir&"\Adobe Reader 9.lnk", @ProgramsDir&"\Programme & Tools\Adobe" )

    [/autoit]

  • aut2exe ?

    vermutlich ist in deinem XXXX ein oder mehrere Leerzeichen.

    In dem Fall musst Du aut2exe mit Anführungszeichen aufrufen ;)

    [autoit]

    "C:\Users\XXX>Desktop\Aut2exe_x64.exe" /in "C:\Users\XXX\Desktop\test.au3" /out "C:\Users\XXX\Desktop\test.exe"

    [/autoit]

  • neue frage zu progressbar

    wenn Du auch den -0.5bar Ladedruck anzeigen willst, dann musst Du wie gesagt den Wertebereich transponieren.
    Beispiel:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <ProgressConstants.au3>

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

    Opt('MustDeclareVars', 1)

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

    Local $progressbar1, $button, $wait, $s, $msg, $m, $slider, $label, $r
    Local $data = -0.4 ;hier steht der aktuelle Wert drin

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

    GUICreate("My GUI Progressbar", 330, 100, 100, 200)
    $slider = GUICtrlCreateSlider(40,40,200,20)
    GUICtrlSetLimit(-1,30, 0)
    $label = GUICtrlCreateLabel('',250,10,80,20)
    GUICtrlSetFont(-1,12,600)
    $progressbar1 = GUICtrlCreateProgress(40, 10, 200, 20)
    GUICtrlSetColor(-1, 32250)
    GUICtrlSetLimit(-1, 30)
    GUICtrlSetData($label,'-0.5' & ' bar')

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

    GUISetState()

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

    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    Exit
    Case $msg = $slider
    $r = Round(GUICtrlRead($slider)/30*100/33 -0.5,1)
    If Not StringInStr($r,".") Then $r = $r & '.0'
    GUICtrlSetData($label,$r & ' bar')
    GUICtrlSetData($progressbar1, (GUICtrlRead($slider))/30*100)
    EndSelect
    WEnd

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

  • neue frage zu progressbar

    ich fürchte, wir reden aneinander vorbei...

    Zitat

    maximal liegt er bei 2,5 bar


    wenn der Wert wirklich 2,5 lautet, dann musst Du diesen umwandeln in 2.5!!!
    Außerdem kann eine Progressbar nichts mit negativen Zahlen anfangen.
    Daher musst Du den Wertebereich deiner Variablen: $bar1 --> von -0.5 - 2.5
    transponieren mit einer Formel auf --> 0 - 100.
    Diese Werte kannst Du dann mit GuiCtrlSetData(..... setzen in der Progressbar

  • neue frage zu progressbar

    eine Progressbar stellt immer Werte zwischen 0 - 100 dar.

    D.h. Du musst Deinen Wertebereich dem Anzeigebereich anpassen.
    In deinem Fall musst Du natürlich auch wie bei den anderen Werten diesen ständig abfragen.

    Mit der Formel:

    [autoit]

    GUICtrlSetData($progress_turbolader, ($bar1+0.5)/3*100)

    [/autoit]

    wobei $bar1 den Wert des >Turboladers darstellt im Wertebereich -0.5 bis 2.5
    Achtung autoit kann nur mit Dezimalzahlen rechnen die mit einem Punkt dargestellt werden.

    Wenn Dein Wert im Speicher 0,5 hergibt, dann musst Du umwandeln mimt StringReplace($bar1, ",", ".")