Beiträge von Prajoss

  • Bild in Icon umwandeln?

    Ich würde sagen Progandy hat einfach sinnfrei auf seiner Tastatur getippt oder seine Katze ist drübergelaufen
    und rausgekommen ist ein Beitrag in deinem Thread...

    Du sollst sein Script ausführen, so wie ich das sehe soll das Script schauen ob du Encoder hast.

    Gruß

    Prajoss

  • Maus Scroll

    also ich habs nicht ganz so kompliziert gelöst oO

    Spoiler anzeigen
    [autoit]

    Global Const $WM_MOUSEWHEEL = 0x020A

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

    GUIRegisterMsg($WM_SIZE, "WM_SIZE")
    GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")
    GUIRegisterMsg($WM_MOUSEWHEEL, "_Mausrad")

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

    Func _Mausrad($hWnd, $Msg, $wParam)
    #forceref $Msg, $wParam

    If $wParam == "0x00780000" Then _Bild_rauf()

    If $wParam == "0xFF880000" Then _Bild_runter()

    EndFunc


    ;~ Func _Bild_runter()
    ;~
    ;~ for $i = 0 To 4 Step 1
    ;~ WM_VSCROLL($sheet, 0x0, 0x00000001, 0) ;1 mal kurz nach oben Scrollen - selber Effekt wie auf den Pfeil klicken
    ;~ Next
    ;~
    ;~ EndFunc

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

    ;~ Func _Bild_rauf()
    ;~
    ;~ for $i = 0 To 4 Step 1
    ;~ WM_VSCROLL($sheet, 0x0, 0x00000000, 0) ;1 mal kurz nach unten Scrollen - selber Effekt wie auf den Pfeil klicken
    ;~ Next
    ;~
    ;~ EndFunc

    [/autoit]

    Gruß

    Prajoss

    PS: VM_VSCROLL, VM_SIZE müsst ihr irgendwo noch deklarieren, ich häng se mal:

    Spoiler anzeigen
    [autoit]

    Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
    #forceref $Msg, $wParam, $lParam
    ; MsgBox(0, "tt", $wParam)
    Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
    Local $index = -1, $yChar, $yPos
    Local $Min, $Max, $Page, $Pos, $TrackPos

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

    For $x = 0 To UBound($aSB_WindowInfo) - 1
    If $aSB_WindowInfo[$x][0] = $hWnd Then
    $index = $x
    $yChar = $aSB_WindowInfo[$index][3]
    ExitLoop
    EndIf
    Next
    If $index = -1 Then Return 0

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

    ; Get all the vertial scroll bar information
    Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
    $Min = DllStructGetData($tSCROLLINFO, "nMin")
    $Max = DllStructGetData($tSCROLLINFO, "nMax")
    $Page = DllStructGetData($tSCROLLINFO, "nPage")
    ; Save the position for comparison later on
    $yPos = DllStructGetData($tSCROLLINFO, "nPos")
    $Pos = $yPos
    $TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")

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

    Switch $nScrollCode
    Case $SB_TOP ; user clicked the HOME keyboard key
    DllStructSetData($tSCROLLINFO, "nPos", $Min)

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

    Case $SB_BOTTOM ; user clicked the END keyboard key
    DllStructSetData($tSCROLLINFO, "nPos", $Max)

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

    Case $SB_LINEUP ; user clicked the top arrow
    DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)

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

    Case $SB_LINEDOWN ; user clicked the bottom arrow
    DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)

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

    Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
    DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)

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

    Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
    DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)

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

    Case $SB_THUMBTRACK ; user dragged the scroll box
    DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
    EndSwitch

    ;~ // Set the position and then retrieve it. Due to adjustments
    ;~ // by Windows it may not be the same as the value set.

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

    DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
    _GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
    _GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
    ;// If the position has changed, scroll the window and update it
    $Pos = DllStructGetData($tSCROLLINFO, "nPos")

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

    If ($Pos <> $yPos) Then
    _GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
    $yPos = $Pos
    EndIf

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

    Return $GUI_RUNDEFMSG

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

    EndFunc ;==>WM_VSCROLL

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

    Func WM_SIZE($hWnd, $Msg, $wParam, $lParam)
    #forceref $Msg, $wParam
    Local $index = -1, $yChar, $xChar, $xClientMax, $xClient, $yClient, $ivMax
    For $x = 0 To UBound($aSB_WindowInfo) - 1
    If $aSB_WindowInfo[$x][0] = $hWnd Then
    $index = $x
    $xClientMax = $aSB_WindowInfo[$index][1]
    $xChar = $aSB_WindowInfo[$index][2]
    $yChar = $aSB_WindowInfo[$index][3]
    $ivMax = $aSB_WindowInfo[$index][7]
    ExitLoop
    EndIf
    Next
    If $index = -1 Then Return 0

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

    Local $tSCROLLINFO = DllStructCreate($tagSCROLLINFO)

    ; Retrieve the dimensions of the client area.
    $xClient = BitAND($lParam, 0x0000FFFF)
    $yClient = BitShift($lParam, 16)
    $aSB_WindowInfo[$index][4] = $xClient
    $aSB_WindowInfo[$index][5] = $yClient

    ; Set the vertical scrolling range and page size
    DllStructSetData($tSCROLLINFO, "fMask", BitOR($SIF_RANGE, $SIF_PAGE))
    DllStructSetData($tSCROLLINFO, "nMin", 0)
    DllStructSetData($tSCROLLINFO, "nMax", $ivMax)
    DllStructSetData($tSCROLLINFO, "nPage", $yClient / $yChar)
    _GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)

    ; Set the horizontal scrolling range and page size
    DllStructSetData($tSCROLLINFO, "fMask", BitOR($SIF_RANGE, $SIF_PAGE))
    DllStructSetData($tSCROLLINFO, "nMin", 0)
    DllStructSetData($tSCROLLINFO, "nMax", 2 + $xClientMax / $xChar)
    DllStructSetData($tSCROLLINFO, "nPage", $xClient / $xChar)
    _GUIScrollBars_SetScrollInfo($hWnd, $SB_HORZ, $tSCROLLINFO)

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

    Return $GUI_RUNDEFMSG
    EndFunc ;==>WM_SIZE

    [/autoit]

    Edit: die VM_SIZE, VM_VSCROLL braucht man natürlich nur wenn man das Mausrad nutzten will um das GUI zu scrollen, sonst sind sie unnötig.

  • Ping Pong

    Hey,

    sieht ja ganz ok aus aber ich weiß nich wie du den Schwierigkeitsgrad einstellst, also wenn ich auf voll stelle seh ich den Ball nich mehr, das dauert 0,5 sek und ich hab verloren *g* liegt vllt an der CPU :-/

    Und ein Bug ist wohl noch da, der Ball fliegt ab und zu durch die obere Kante.


    Gruß

    Prajoss

  • Radio-buttons abfragen wie normale buttons?

    Habs mit den Radiobuttsons hinbekommen, klappt super :)

    Spoiler anzeigen
    [autoit]

    #include <WindowsConstants.au3>
    #include <GUIConstantsEx.au3>
    #Include <GuiTab.au3>
    #include <GuiButton.au3>
    #Include <File.au3>
    #include <ButtonConstants.au3>

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

    Opt("GUIOnEventMode", 1)
    Opt('TrayIconDebug', 1)

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

    Global Const $ws_left = (@DesktopWidth / 3 - 250) / 2
    Global Const $ws_left_2 = ((@DesktopWidth / 3 - 250) / 2) + (@DesktopWidth / 3)
    Global Const $ws_left_3 = ((@DesktopWidth / 3 - 250) / 2) + (@DesktopWidth / 3 * 2)

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

    Global $tabs[10], $t = 0, $p, $t_aktuell
    Global $KK[10], $GE[10], $WS[10], $CH[10], $MP[10], $EB[10], $WA[10], $IN[10], $GS[10]
    Global $KK_P[10][10], $GE_P[10][10], $WS_P[10][10], $CH_P[10][10], $MP_P[10][10], $EB_P[10][10], $WA_P[10][10], $IN_P[10][10] ,$GS_P[10][10]
    Global $Radios[1000][3], $indexi = 0

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

    $sheet = GUICreate("Vampire Charaktere", @Desktopwidth, @Desktopheight * 0.95, 0, 0, BitOr($WS_MINIMIZEBOX, $WS_SYSMENU, $WS_MAXIMIZEBOX, $WS_MAXIMIZE))
    GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")

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

    $menue = GUICtrlCreateMenu("&Datei")

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

    $neu = GUICtrlCreateMenuItem("&Neu", $menue)
    GUICtrlSetOnEvent(-1, "Neu")

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

    $oeffnen = GUICtrlCreateMenuItem("&Öffnen", $menue)
    GUICtrlSetOnEvent(-1, "Oeffnen")

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

    $speichern = GUICtrlCreateMenuItem("&Speichern", $menue)
    ;GUICtrlSetOnEvent(-1, "Speichern")

    GUICtrlCreateMenuItem("", $menue)

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

    $beenden = GUICtrlCreateMenuItem("&Beenden", $menue)
    GUICtrlSetOnEvent(-1, "Beenden")

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

    $tab = GUICtrlCreateTab( 2, 2, @Desktopwidth - 4, @DesktopHeight - 4)

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

    If FileExists(@MyDocumentsDir & "\VampChars\") == 0 Then DirCreate(@MyDocumentsDir & "\VampChars\")

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

    GUISetState()

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

    While True

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

    Sleep(10)

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

    WEnd

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

    Func Neu()

    $temp = Random( 1000, 9999, 1) & ".ini"

    _FileCreate(@MyDocumentsDir & "\VampChars\" & $temp)

    GUICtrlCreateTabItem($temp)

    Blatt_erstellen()

    GUICtrlCreateTabItem("")

    $file = $temp

    EndFunc

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

    Func Oeffnen()

    $file = FileOpenDialog("Charakterblatt öffnen", @MyDocumentsDir & "\VampChars\", "Charakterblatt (*.ini)", 1 + 2)

    Return

    EndFunc

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

    Func Beenden()

    ;~ Funktion: Blatt eventuell speichern()

    Exit

    EndFunc

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

    Func Blatt_erstellen()

    Local $length = 90, $left = ($ws_left + $length), $left_2 = ($ws_left_2 + $length), $left_3 = ($ws_left_3 + $length) + 10
    Local $abstand

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

    $KK[$t] = GUICtrlCreateLabel("Körperkraft", $ws_left, 400, $length, 20)
    GUICtrlSetFont(-1, 10)

    For $p = 0 To 9 Step 1
    $abstand = Abstand_bestimmen($p)
    GUICtrlCreateGroup("", 1800, 0, 0, 0, -1)
    $KK_P[$t][$p] = GUICtrlCreateRadio("", $left + ($abstand) , 400 , 15, 20)
    GUICtrlSetOnEvent(-1, "Radio")
    $Radios[$indexi][0] = $KK_P[$t][$p]
    $Radios[$indexi][1] = $t
    $Radios[$indexi][2] = $p
    $indexi = $indexi + 1
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    Next

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

    $GE[$t] = GUICtrlCreateLabel("Geschick", $ws_left, 425, $length, 20)
    GUICtrlSetFont(-1, 10)

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

    For $p = 0 To 9 Step 1
    $abstand = Abstand_bestimmen($p)
    GUICtrlCreateGroup("", 1800, 0, 0, 0, -1)
    $GE_P[$t][$p] = GUICtrlCreateRadio("", $left + ($abstand) , 425 , 15, 20)
    GUICtrlSetOnEvent(-1, "Radio")
    $Radios[$indexi][0] = $GE_P[$t][$p]
    $Radios[$indexi][1] = $t
    $Radios[$indexi][2] = $p
    $indexi = $indexi + 1
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    Next

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

    $WS[$t] = GUICtrlCreateLabel("Widerstand", $ws_left, 450, $length, 20)
    GUICtrlSetFont(-1, 10)

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

    For $p = 0 To 9 Step 1
    $abstand = Abstand_bestimmen($p)
    GUICtrlCreateGroup("", 1800, 0, 0, 0, -1)
    $WS_P[$t][$p] = GUICtrlCreateRadio("", $left + ($abstand) , 450 , 15, 20)
    GUICtrlSetOnEvent(-1, "Radio")
    $Radios[$indexi][0] = $WS_P[$t][$p]
    $Radios[$indexi][1] = $t
    $Radios[$indexi][2] = $p
    $indexi = $indexi + 1
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    Next

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

    $CH[$t] = GUICtrlCreateLabel("Charisma", $ws_left_2, 400, $length, 20)
    GUICtrlSetFont(-1, 10)

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

    For $p = 0 To 9 Step 1
    $abstand = Abstand_bestimmen($p)
    GUICtrlCreateGroup("", 1800, 0, 0, 0, -1)
    $CH_P[$t][$p] = GUICtrlCreateRadio("", $left_2 + ($abstand) , 400 , 15, 20)
    GUICtrlSetOnEvent(-1, "Radio")
    $Radios[$indexi][0] = $CH_P[$t][$p]
    $Radios[$indexi][1] = $t
    $Radios[$indexi][2] = $p
    $indexi = $indexi + 1
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    Next

    $MP[$t] = GUICtrlCreateLabel("Manipulation", $ws_left_2, 425, $length, 20)
    GUICtrlSetFont(-1, 10)

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

    For $p = 0 To 9 Step 1
    $abstand = Abstand_bestimmen($p)
    GUICtrlCreateGroup("", 1800, 0, 0, 0, -1)
    $MP_P[$t][$p] = GUICtrlCreateRadio("", $left_2 + ($abstand) , 425 , 15, 20)
    GUICtrlSetOnEvent(-1, "Radio")
    $Radios[$indexi][0] = $MP_P[$t][$p]
    $Radios[$indexi][1] = $t
    $Radios[$indexi][2] = $p
    $indexi = $indexi + 1
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    Next

    $EB[$t] = GUICtrlCreateLabel("Ersch.Bild", $ws_left_2, 450, $length, 20)
    GUICtrlSetFont(-1, 10)

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

    For $p = 0 To 9 Step 1
    $abstand = Abstand_bestimmen($p)
    GUICtrlCreateGroup("", 1800, 0, 0, 0, -1)
    $EB_P[$t][$p] = GUICtrlCreateRadio("", $left_2 + ($abstand) , 450 , 15, 20)
    GUICtrlSetOnEvent(-1, "Radio")
    $Radios[$indexi][0] = $EB_P[$t][$p]
    $Radios[$indexi][1] = $t
    $Radios[$indexi][2] = $p
    $indexi = $indexi + 1
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    Next

    $WA[$t] = GUICtrlCreateLabel("Wahrnehmung", $ws_left_3, 400, $length, 20)
    GUICtrlSetFont(-1, 10)

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

    For $p = 0 To 9 Step 1
    $abstand = Abstand_bestimmen($p)
    GUICtrlCreateGroup("", 1800, 0, 0, 0, -1)
    $WA_P[$t][$p] = GUICtrlCreateRadio("", $left_3 + ($abstand) , 400 , 15, 20)
    GUICtrlSetOnEvent(-1, "Radio")
    $Radios[$indexi][0] = $WA_P[$t][$p]
    $Radios[$indexi][1] = $t
    $Radios[$indexi][2] = $p
    $indexi = $indexi + 1
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    Next

    $IN[$t] = GUICtrlCreateLabel("Intelligenz", $ws_left_3, 425, $length, 20)
    GUICtrlSetFont(-1, 10)

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

    For $p = 0 To 9 Step 1
    $abstand = Abstand_bestimmen($p)
    GUICtrlCreateGroup("", 1800, 0, 0, 0, -1)
    $IN_P[$t][$p] = GUICtrlCreateRadio("", $left_3 + ($abstand) , 425 , 15, 20)
    GUICtrlSetOnEvent(-1, "Radio")
    $Radios[$indexi][0] = $IN_P[$t][$p]
    $Radios[$indexi][1] = $t
    $Radios[$indexi][2] = $p
    $indexi = $indexi + 1
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    Next

    $GS[$t] = GUICtrlCreateLabel("Geistesschärfe", $ws_left_3, 450, $length, 20)
    GUICtrlSetFont(-1, 10)

    For $p = 0 To 9 Step 1
    $abstand = Abstand_bestimmen($p)
    GUICtrlCreateGroup("", 1800, 0, 0, 0, -1)
    $GS_P[$t][$p] = GUICtrlCreateRadio("", $left_3 + ($abstand) , 450 , 15, 20)
    GUICtrlSetOnEvent(-1, "Radio")
    $Radios[$indexi][0] = $GS_P[$t][$p]
    $Radios[$indexi][1] = $t
    $Radios[$indexi][2] = $p
    $indexi = $indexi + 1
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    Next

    $t = $t + 1

    EndFunc

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

    Func Abstand_bestimmen($Index)
    If $Index >= 5 Then
    Return $Index * 15 + 5
    Else
    Return $Index * 15
    EndIf
    EndFunc

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

    Func _Exit()

    Exit

    EndFunc

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

    Func Radio()

    For $i = 0 To ($indexi - 1) Step 1
    If $Radios[$i][0] == @GUI_CtrlId Then
    Radios_check($i, $Radios[$i][2])
    Radios_uncheck($i, $Radios[$i][2])
    Return
    EndIf
    Next

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

    EndFunc

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

    Func Radios_check($Ctrl_ID, $index_2)

    While $index_2 >= 0

    GUICtrlSetState($Radios[$Ctrl_ID][0], $GUI_CHECKED)

    $Ctrl_ID = $Ctrl_ID - 1
    $index_2 = $index_2 - 1
    WEnd

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

    EndFunc

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

    Func Radios_uncheck($Ctrl_ID, $index_2)

    While $index_2 + 1 < 10

    GUICtrlSetState($Radios[$Ctrl_ID + 1][0], $GUI_UNCHECKED)

    $Ctrl_ID = $Ctrl_ID + 1
    $index_2 = $index_2 + 1

    WEnd

    EndFunc

    [/autoit]

    hab n bischen gebraucht für den Algorythmus aber es funzt 8)

    Gruß

    Prajoss

  • Radio-buttons abfragen wie normale buttons?

    Hey,

    das mit dem anwählen ist ja kein Ding, hab jeden in ne eigene Gruppe gepackt und gut ist ;)

    Edit: OK hab grad den Fehler gefunden (das war ein Geistesblitz)

    Gruß

    Prajoss

    PS: Für Labels mit Icons oder sonstiges würde das Problem ebenfalls bestehen, außerdem hatte ich mit Label-Icons noch andere Probleme^^

  • Radio-buttons abfragen wie normale buttons?

    Hey,

    danke erstmal.

    Also ich möchte keinen Slider erstellen, das ganze soll so aussehen (wenns mal fertig ist) --> Siehe Dateianhang

    Deswegen möchte ich das mit den Radiobuttons lösen.

    Mein Problem jetzt noch ist, dass ich nich genau abfragen kann wenn ein Radiobutton geklickt wurde..

    Leider geht das bei einem Radiobutton nicht so ganz.
    Ich möchte sobald ich auf einen der vielen Buttons kriege ein Event auslösen und dabei gleichzeitig die Control-ID des buttons in eine Variable speichern, ist dies möglich?

    wenn ja, bitte nur die Befehle posten, keine komplettlösungen ;)

    Danke und Grüße

    Prajoss

    Edit: Hab jetzt GuiCtrlSetOnEvent() entdeckt, leider kann ich bei der Funktion welche ich bestimme keine Parameter mitübergeben... :(
    - ok Suchfunktion hat sogar mal geholfen, werd noch ein wenig dran sitzen

  • Schon beim Schreiben eine Veränderung

    Hey,

    vom Prinzip her funktioniert das so:

    Spoiler anzeigen
    [autoit]

    $flag = 0

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

    $eingabe = GUICtrlCreateInput()

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

    While

    $msg = GUIGetMsg()

    $eingabe_alt = GUICtrlRead($eingabe)

    If $flag == 1 Then
    Funktion_zum_Berechnen()
    $flag = 0
    EndIf

    If $eingabe_alt <> GUICtrlRead($eingabe) Then
    $flag = 1
    EndIf

    WEnd

    [/autoit]

    Gruß

    Prajoss

  • Radio-buttons abfragen wie normale buttons?

    Hai allerseits,

    ich schreibe gerade ein Programm mit dem man ein Charakterblatt für ein bestimmtes Pen&Paper Rollenspiel erstellen kann (ist für mich damit ich meine ganzen NPCs und sonstigen Charas einfacher verwalten kann - ich mag kein Papierchaos :D).

    Im moment sieht es folgendermaßen aus, ich erstelle ein Label, direkt gefolgt von 10 einzelnen Radiobuttons (jeder ne eigene Gruppe):

    LABEL OOOOO OOOOO

    Jetzt möchte ich folgendes erreichen, wenn ich auf einen dieser Radio Buttons klicke, dann sollen alle Buttons die links davon stehen markiert, und alle Buttons die rechts "entmarkiert".


    Spoiler anzeigen
    [autoit]

    veraltet

    [/autoit]

    **Aktuelles Problem steht weiter im Thread**

    Gruß

    Prajoss

    PS: ihr braucht mir keine fertige Lösung hinschreiben (falls es eine gibt) ein paar Befehle sollten reichen, ich grüble selbst gerne :)

  • Verständnissproblem mit Run(@ComSpec & " /c "

    Ist es nicht, die Funktion Run() ist nunmal nicht identisch mit der Kommandozeile!

    Deshalb kannst du damit auch nicht wirklich eine Batchprogrammierung machen.

    Du könntest wie gesagt entweder die cmd starten und dann deinen Befehl per ControlSend() einfügen und ausführen oder

    du lässt eine *.bat Datei per Script mit deinem Inhalt erstellen, ausführen und anschließend löschen.


    Gruß

    Prajoss

  • Anzahl Input Boxen aus Variabler

    Fangen wir mal damit an dass das GUI das du mit den Inputboxen erstellst variabel sein muss, sprich

    [autoit]

    $Anzahl_der_Input_Felder = 10

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

    $breite = 200
    ;200 wurde jetzt willkürlich festgelegt

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

    $hoehe = ($Anzahl_der_Input_Felder * 50) + 80
    ;80 steht für 30 pixel abstand von oben und 30 von unten
    ;50 steht für 30 pixel ist das Inputfeld groß und 20 der Abstand zum nächsten

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

    $neues_GUI = GUICreate("GUI", $breite, $hoehe)

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

    Dim $Input[100]

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

    For $i = 0 To $Anzahl_der_Input_Felder Step 1
    $Input[$i] = GUICtrlCreateInput("Inputfeld " & $i, 20, 30 + ($i * 50), 120, 30)
    Next

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

    GUISetState()

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

    While True
    WEnd

    [/autoit]

    so in etwa könnte dein 2. GUI aussehen, kannst ja die Variable $Anzahl_der_Input_Felder verändern :)

    Gruß

    Prajoss

  • Einen Zähler mit einer Ini

    Ich fass mal zusammen,

    das 1. Problem war, dass du vergessen hast den Zähler zu erhöhen
    (Lösung durch Canyon)

    und das 2. wäre, dass der verwendete Befehl "PixelSearch" immer wieder von
    vorne angefangen hätte und immer bei der selben Stelle gestoppt hätte -> Endlosschleife
    (Lösung durch latemail)

    Manchmal vergisst man dem Threadersteller mitzuteilen was er falsch gemacht hat und
    wie man dieses Problem behoben hat ;)

    Gruß

    Prajoss

  • .exe ausführen verhindern

    Also um wirklich sicher zu stellen dass er kein WoW mehr spielt,

    müsstest du seinen PC wegnehmen & im Haus einsperren (damit er nicht zum nächsten Inet-Cafe rennt)

    oder seinen Account sperren und ihm das Telefon wegnehmen (damit er nicht beim Kundendienst anruft)

    Gott möge ihm Beistehen in diesen schwierigen Zeiten