Beiträge von WhiteHorse

Zitat von GML

Empfehlen kann ich WuMgr: WuMgr auf Github/download. Damit lassen sich nicht nur die Updates blockieren (dauerhaft, zumindest unter Win10 getestet), sondern auch trotzdem selektiv einzelne Updates durchführen.

MfG

Ich danke dir, Ich war eigentlich immer für Win 7, aber da Steam bald nicht mehr unter Win 7 läuft, bin ich jetzt ca. 1 Jahr bei Win 10 und die Updates nerven mich massiv, da sie mir mehr Probleme bereiten als nutzen.

Ich besitze ein Bomben Antivirenprogramm und das reicht mir zu.

Zitat von Kanashius

AutoIt

Func _msgbox($iIndex)
    MsgBox(64, "Info", $arActions[$iIndex][0]&" >> At list index "&$iIndex&" was pressed.")
EndFunc

Func _testmoin()
    MsgBox(64, "Info", "Test Moin")
EndFunc

Func _justdo()
    MsgBox(64, "Info", "Just Do")
EndFunc

Alles anzeigen

hey, ich hab noch ein kleines Problem gefunden in dem Code, das ist mir jetzt leider erst aufgefallen

und zwar, wenn ich den Namen suche zb. Test Moin und ich den in der liste aufrufe, dann führt er die Funktion Func _msgbox($iIndex) aus, er soll aber dennoch die Func _testmoin () abrufen sie gehört ja schließlich zu ihr und nicht zu Func _msgbox($iIndex) wenn ich nicht in die Suche schreibe und gleich auf den Namen klicke, dann führt er auch die richtige Funktion auf.

Wäre dir sehr dankbar, wenn du mir das noch ggf. fixen kannst

Gruß Whitey

Zitat von Kanashius

Hi,

so würde ich das umsetzen.

Ein Array mit allen Actions (2D mit Name zum anklicken, Function zum Aufrufen und ein Bool, ob der Index übergeben werden soll.

Wenn man sich für WM_COMMAND Messages registriert, wird die Methode unten aufgerufen, wenn mit einem Control interagiert wird; Hier das anklicken in der Listbox und das Tippen im Inputfeld.

Die Funktionen _ActionListSelect($iIndex=Default) und _FilterList($sSearch="") werden dann aufgerufen. Sie sind aber gleichzeitig auch so gestaltet, dass sie auch manuell aufgerufen werden können.

Das mach ich z.B. um am Anfang die Liste zu füllen.

AutoIt

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <ListBoxConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <WinAPI.au3>

Global $iWidth = 800, $iHeight = 600, $iSpace = 10, $iCtrlHeight = 25
Global $arActions = [["Msgbox 1", "_msgbox", True], ["Msgbox 2", "_msgbox", True], ["Msgbox 3", "_msgbox", True], _
                     ["Msgbox 4", "_msgbox", True], ["Msgbox 5", "_msgbox", True], ["Msgbox 6", "_msgbox", True], _
                     ["Msgbox 7", "_msgbox", True], ["Msgbox 8", "_msgbox", True], ["Test Moin", "_testmoin", False], _
                     ["Just do", "_justdo"]]

$hGui = GUICreate("Search test", $iWidth, $iHeight)
GUISetFont(10, 800, 0, "MS Sans Serif")


GUICtrlCreateLabel("Suche: ", $iSpace, $iSpace+5, 45, $iCtrlHeight-5)
$iInputSearch = GUICtrlCreateInput("", 45+$iSpace*2, $iSpace, ($iWidth-45)-3*$iSpace, $iCtrlHeight)
$hInputSearch = GUICtrlGetHandle($iInputSearch)
GUICtrlSetCursor (-1, 5)

$iListActions = GUICtrlCreateList("", $iSpace, $iSpace*2+$iCtrlHeight, $iWidth-2*$iSpace, $iHeight-3*$iSpace-$iCtrlHeight, BitOR($WS_BORDER, $WS_VSCROLL))
$hListActions = GUICtrlGetHandle($iListActions)
_FilterList()
GUICtrlSetCursor (-1, 0)

GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

Func _msgbox($iIndex)
    MsgBox(64, "Info", $arActions[$iIndex][0]&" >> At list index "&$iIndex&" was pressed.")
EndFunc

Func _testmoin()
    MsgBox(64, "Info", "Test Moin")
EndFunc

Func _justdo()
    MsgBox(64, "Info", "Just Do")
EndFunc

; Error: 1 -> Illegal index argument
; Error: 2 -> No item selected
; Error: 3 -> Index not specified in action array
Func _ActionListSelect($iIndex=Default)
    If $iIndex<>Default Then
        ; Check if the index is a number and in range
        If Not IsInt($iIndex) Or $iIndex<0 Or $iIndex>=_GUICtrlListBox_GetCount($iListActions) Then Return SetError(1, 0, -1)
        _GUICtrlListBox_SetCurSel($iListActions, $iIndex)
    EndIf
    $iIndex = _GUICtrlListBox_GetCurSel($iListActions)
    If $iIndex<0 Then Return SetError(2, 0, -1)
    _GUICtrlListBox_SetCurSel($iListActions, -1)
    If Not $iIndex<UBound($arActions) Then SetError(3, 0, -1)
    If $arActions[$iIndex][1]<>"" Then
        If $arActions[$iIndex][2]<>"" Or $arActions[$iIndex][2] Then
            Call($arActions[$iIndex][1], $iIndex)
        Else
            Call($arActions[$iIndex][1])
        EndIf
    EndIf
EndFunc

Func _FilterList($sSearch="")
    _GUICtrlListBox_BeginUpdate($iListActions)
    _GUICtrlListBox_ResetContent($iListActions)
    If $sSearch="" Then
        For $i=0 To UBound($arActions)-1 Step 1
            _GUICtrlListBox_AddString($iListActions, $arActions[$i][0])
        Next
    Else
        For $i=0 To UBound($arActions)-1 Step 1
            If StringInStr($arActions[$i][0], $sSearch, 0) Then _GUICtrlListBox_AddString($iListActions, $arActions[$i][0])
        Next
    EndIf
    _GUICtrlListBox_EndUpdate($iListActions)
EndFunc

Func WM_COMMAND($hWnd, $iMsg, $iwParam, $ilParam)
    Local $iIDFrom = _WinAPI_LoWord($iwParam), $iCode = _WinAPI_HiWord($iwParam)
    Switch $ilParam
        Case $hInputSearch
            Switch $iCode
                Case $EN_CHANGE
                    _FilterList(GUICtrlRead($iInputSearch))
            EndSwitch
        Case $hListActions
            If $iCode=$LBS_NOTIFY Then
                _ActionListSelect()
                If @error Then
                    Switch @error ; 1 cannot happen; no index provided
                        Case 2
                            MsgBox(16, "Error", "No Action was selected!")
                        Case 3
                            MsgBox(16, "Error", "There is no Action for the index of the selected item!")
                    EndSwitch
                EndIf
            EndIf
    EndSwitch
    Return $GUI_RUNDEFMSG
EndFunc

Alles anzeigen

Ich hoffe, das hilft dir weiter.

Mfg, Kanashius

Alles anzeigen

Top ich danke dir

Hallo, ich möchte gerne eine Suche erstellen, habe dies aber auch noch nie gemacht und habe nichts Passendes gefunden, was mir weiterhelfen kann. Da die Namen in einer Liste stehen, die mit einem Inputfeld gesucht werden sollen, sobald man die ersten Buchstaben eingibt.

Beispiel ich gebe den Namen Msgbox 5 in das Inputfeld ein, dann sollen die anderen Namen aus der Liste verschwinden und nur noch Msgbox 5 ist in der Liste zu finden.

Ich habe mal eine Test GUI erstellt

und habe auch in den Code beschrieben wie, was passieren soll und gemacht werden soll. Nur leider weiß ich gar nicht, wie man bei einer Suchfunktion überhaupt vorgeht.

Auf jeden Fall soll jeder Name, der in der Liste steht, eine eigene Funktion aufrufen.

Vielleicht habt ihr Ideen oder könnt mir auf die Sprünge helfen. Ich lerne gerne dazu

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Suche Test", 616, 438, 192, 124)
$Suche = GUICtrlCreateInput("", 240, 32, 121, 21)
GUICtrlSetCursor (-1, 5)
$Label1 = GUICtrlCreateLabel("Suche", 272, 8, 47, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$SuchergebnisseBox = GUICtrlCreateList("", 56, 80, 121, 67)
GUICtrlSetData(-1, "Msgbox 1|Msgbox 2|Msgbox 3|Msgbox 4|Msgbox 5|Msgbox 6|Msgbox 7|Msgbox 8|Test Moin") ;Gibt es hier eine Möglichkeit, das besser anzuordnen. Da es vorkommen kann das etliche Namen noch dazu kommen und die liste im Code zu lang wird?
GUICtrlSetCursor (-1, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
            
        Case $SuchergebnisseBox

    EndSwitch
WEnd


;Funktion ist nur eine Vorbereitung von mir, weiß aber nicht, ob das überhaupt so funktioniert?
Func 
    ;hier ggf. mit einem If Befehl arbeiten???
    ;ich möchte jede MsgBox einzeln ansteuern im Code, ist einfacher für mich.
MsgBox ("", "INFO", "Ich komme von Msgbox 1") ;Diese Nachricht soll erst erscheinen, wenn ich in der GUI den Namen in das Inputfeld eingegeben habe und ich auf den Namen in der Liste geklickt habe!

MsgBox ("", "INFO", "Ich komme von Msgbox 2") ;Diese Nachricht soll erst erscheinen, wenn ich in der GUI den Namen in das Inputfeld eingegeben habe und ich auf den Namen in der Liste geklickt habe!

MsgBox ("", "INFO", "Ich komme von Msgbox 3") ;Diese Nachricht soll erst erscheinen, wenn ich in der GUI den Namen in das Inputfeld eingegeben habe und ich auf den Namen in der Liste geklickt habe!

MsgBox ("", "INFO", "Ich komme von Msgbox 4") ;Diese Nachricht soll erst erscheinen, wenn ich in der GUI den Namen in das Inputfeld eingegeben habe und ich auf den Namen in der Liste geklickt habe!

MsgBox ("", "INFO", "Ich komme von Msgbox 5") ;Diese Nachricht soll erst erscheinen, wenn ich in der GUI den Namen in das Inputfeld eingegeben habe und ich auf den Namen in der Liste geklickt habe!

MsgBox ("", "INFO", "Ich komme von Msgbox 6") ;Diese Nachricht soll erst erscheinen, wenn ich in der GUI den Namen in das Inputfeld eingegeben habe und ich auf den Namen in der Liste geklickt habe!

MsgBox ("", "INFO", "Ich komme von Msgbox 7") ;Diese Nachricht soll erst erscheinen, wenn ich in der GUI den Namen in das Inputfeld eingegeben habe und ich auf den Namen in der Liste geklickt habe!

MsgBox ("", "INFO", "Ich komme von Msgbox 8") ;Diese Nachricht soll erst erscheinen, wenn ich in der GUI den Namen in das Inputfeld eingegeben habe und ich auf den Namen in der Liste geklickt habe!

MsgBox ("", "INFO", "Ich komme von Test Moin") ;Diese Nachricht soll erst erscheinen, wenn ich in der GUI den Namen in das Inputfeld eingegeben habe und ich auf den Namen in der Liste geklickt habe!

EndFunc

Zitat von BugFix

Vergiß es. Mit dem nächsten Sicherheits-Update, dass du ja wohl doch mal zum Selbstschutz drauf ziehst, wird auch diese "Lücke" wieder geschlossen.

kann man nicht die Pausezeit irgendwie hochstellen auf 25000 Tage von mir aus das reicht dicke zu

Zitat von oh-ha

Hier sind noch so einige Möglichkeiten aufgeführt, diese sind Versionsabhängig.

Automatische Updates deaktivieren oder auf manuell setzen Windows 10

ich habe es jetzt mit dem Programm O&O ShutUp10 geschafft nun sollte endlich ruhe sein

danke für dein Link ich hätte sonst nie das Programm gefunden

Zitat von oh-ha

Hier sind noch so einige Möglichkeiten aufgeführt, diese sind Versionsabhängig.

Automatische Updates deaktivieren oder auf manuell setzen Windows 10

in der regedit hab ich auch schon vieles geschrieben, ist leider auch kein großer erfolg gewesen aber ich denke dort müsste es auch ein wert/eintrag geben um die Update pause länge zu bestimmen

Hey, Ich wollte mal wissen ob Ihr ein weg kennt, um die Windows 10 Updates abzuschalten, ich war noch nie ein großer freund von den Updates, bei Windows 7 hatte ich die immer aus.

Ich habe einiges in Googel gefunden und gelesen zB unter Dienste und dann dort Windows Updates beenden ich habe vieles ausprobiert aber leider hat es nie was gebracht ich kann immer nach einem Update die nächsten Updates auf 30 Tage Pausieren.

Jetzt ist die Frage, hat jemand ein Skript womit ich die Tage auf 1 Million Tage hochstelle das klingt zwar bescheuert, aber das wäre auch eine Möglichkeit.

Wie gesagt ich habe vieles schon ausprobiert und nichts hat geholfen und bei mir steht unten rechts das die nächsten Updates verfügbar sind, ich könnte .

Gruß Whitey

ok, nochmal vielen Dank

Jetzt geht es, den Pfad von der ini war richtig alles gut

Nur wenn ich das in mein Hauptprogramm oder Skript, egal wie man es nennt, einfüge und ich die Aufnahme1 aufrufe, gebe ich meine Zeit ein usw.

Jetzt sagt er mir bei Minuten und Sekunden gleich nachdem ich den Timer gestartet habe, ist zu Ende. Obwohl die Zeit eigentlich noch nicht vorbei ist

bei den Stunden läuft er länger, nur Minuten und Sekunden ist er nach 2 sec durch

obwohl 1 min und 1 sec darin steht

bei dem Test Code den du mir geschickt hast Moombas geht es, im Hauptcode geht es nicht.

@Moombas kannst du mir mal bitte noch erklären warum meine ini Datei nicht mehr geht, es steht zwar was in der ini aber die Input Felder werden nicht von der ini übernommen. Wenn jetzt aber "GUICtrlSetData($input1[3], IniRead($ini, "3","Sekunden", 2)) ;ggf. den Defaultwert (2) (wenn die Ini nicht gefunden/gelesen werden kann) ändern"

darin steht, trägt er die 2 ein so wie es im Code steht aber in der ini steht was anderes und die Zahlen trägt er nicht in die Input Felder.

Ich kann den fehler jetzt auch nicht finden.

Hallo, danke für die Hilfe

Zitat von Moombas

Ich empfehle dir halt Dringend Variablen so wenig wie möglichGlobal zu definieren und (wenn nicht nötig) kein Call für den Aufruf einer Funktion zu benutzen.

Auch verwende lieber Bitor() um die Flags zu setzen, dann weiß man später noch, was du da gesetzt hast, mit dem puren Hex-Wert kann später keiner mehr was anfangen bzw. muss sich das mühsam zusammen suchen.

Und das was ich in meinem Code hier gemacht habe (über Kommentare bei den globalen Variablen) kannst du diese dort dennoch "Gruppieren" und weißt somit wozu du diese brauchst.

Der Trick für den Hotkey isst ja eigentlich nur, das dieser einen manuellen Click auf den Button simuliert, sprich: Wichti war nur das der Button an sich funktioniert.

Ich hoffe du hast den Code auch verstanden den ich da zusammen gezimmert hat (mit Sicherheit noch weiter optimierbar aber dafür würde das restliche Skript evtl. fehlen bzw. ich wollte es dann nicht zu sehr von deinem ursprünglichen Code bringen).

Ja, das mit dem Call hab ich nun auch gelernt, dachte so konnte man immer eine Funktion aufrufen.

aber wenn z.b

StartTest ()

Func StartTest ()

Genügt dann weiß ich Bescheid danke für deinen Tipp, das mit dem (Flag 0x00C80000) ist nicht von mir wie gesagt ich habe das Skript aus dem Internet und hab es nur kopiert, weil es so gut gepasst hatte.

Wenn ich ehrlich bin, weiß ich nicht einmal was ein Flag ist

Lerne auch nur Stück für Stück dazu

Velted auch dir danke ich für deine Hilfe

ok ich weiß warum, es muss an meiner Tastatur liegen ich habe mal ein anderen HotKey benutzt und jetzt geht es, vielen Dank!

sorry, aber der macht bei mir sobald ich F7 drücke das selbe Fenster nochmal auf ist das nur bei mir so?

(er öffnet die GUI ein zweites mal)

Zitat von Moombas

Ich hab das ganze mal ein wenig überarbeitet und mein test war Erfolgreich:

AutoIt

Opt('MustDeclareVars', 1)
#include <GUIConstantsEx.au3>

;GUI
Global $Aufnahme, $go, $input[4]

;Globale Variablen
Global Const $ini = 'anyinifile.ini' ;trag hier die Inifile ein für deinen Timer

HotKeySet ("{F7}", "Jump1")

_CreateTimerGUI() ;Beispielfunktion um die GUI zu erstellen, nur deinen geposteten Part gesetzt, nicht den Rest der noch erforderlich wäre!
Jump1()
;~ MainMenu()

Func _CreateTimerGUI()
Local $name[4]=[3, 'Stunden','Minuten','Sekunden']
    $input[0] = $name[0]

    $Aufnahme = GUICreate('Aufnahme1', 370, 70, Default, Default, 0x10C80000)
    For $i=1 To $name[0]
        GUICtrlCreateGroup($name[$i], (5+70)*$i,  5, 70, 40, Default)
        $input[$i] = GUICtrlCreateInput('', (7+70)*$i, 20, 60, 20, 1)
    Next
    $go = GUICtrlCreateButton('Start', 75, 45, 220, 20)
EndFunc

Func Jump1()
Local $end, $timer
Local $running = False
Local $Button[2]=['Start','Stop']
    GUISetState(@SW_SHOW, $Aufnahme)

    ;Achtung: Sektion angepasst, da alle Timerwerte in einer Sektion platz finden
    GUICtrlSetData($input[1], IniRead($ini, "Timer","Stunden" , 0)) ;ggf. den Defaultwert (0) (wenn die Ini nicht gefunden/gelesen werden kann) ändern
    GUICtrlSetData($input[2], IniRead($ini, "Timer","Minuten" , 0)) ;ggf. den Defaultwert (0) (wenn die Ini nicht gefunden/gelesen werden kann) ändern
    GUICtrlSetData($input[3], IniRead($ini, "Timer","Sekunden", 2)) ;ggf. den Defaultwert (2) (wenn die Ini nicht gefunden/gelesen werden kann) ändern

    While 100
        If $running And TimerDiff($timer)>=$end Then
            $running = False
            GUICtrlSetData($go, $button[$running])
            MsgBox ("", "Test", "Timer abgelaufen", "")
        EndIf

        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                GUISetState(@SW_HIDE, $Aufnahme)
                ExitLoop
            Case $go
                If $running = False Then
                    $running = True
                    GUICtrlSetData($go, $button[$running])
                    $end = Convert($input)
                    $timer = TimerInit()
                Else ;
                    $running = False
                    GUICtrlSetData($go, $button[$running])
                EndIf
        EndSwitch
    WEnd
    GUISetState(@SW_HIDE, $Aufnahme)
EndFunc

Func Convert($array)
    Return 1000*(60*(60*(GUICtrlRead($array[1]))+GUICtrlRead($array[2]))+GUICtrlRead($array[3]))
EndFunc

Alles anzeigen

danke, aber der Timer wird auch mit dem Button gestartet und wenn ich F7 drücke öffnet sich ein neues Fenster darüber?

$HotkeyF7Zaehler = 0

Call ("Aufnahme1")

Func Aufnahme1 ()
Global $Aufnahme1 = GUICreate('Aufnahme1', 220, 70, Default, Default, 0x10C80000)
Global $end
Global $timer
Global $running = True
Global $input[3]
Global $name[3]=['Stunden','Minuten','Sekunden']
Global $button[2]=['Start','Stop']

For $i=0 To 2
    GUICtrlCreateGroup($name[$i], 5+70*$i, 5, 70, 40)
    $input[$i]=GUICtrlCreateInput('', 10+70*$i, 20, 60, 20, 1)
Next
;GUICtrlSetData($input[0], IniRead($ini, "1","Stunden", ""))
;GUICtrlSetData($input[1], IniRead($ini, "2","Minuten", ""))
;GUICtrlSetData($input[2], IniRead($ini, "3","Sec", ""))
Global $go=GUICtrlCreateButton('Start', 5, 45, 210, 20)
Call ("Jump1")
;Call ("MainMenu")


EndFunc


Func Jump1 ()
HotKeySet ("{F7}", "Jump1") ;MIT F7 STARTET...................................
$HotkeyF7Zaehler += 1
MsgBox ("", "YES", "+1 Weiter", "2")
While 1

            If $HotkeyF7Zaehler = 2 Then
            $running = Not $running ;[Problem muss an dieser Zeile hier liegen] Start Stop Start Stop....
            GUICtrlSetData($go, $button[$running])
            $end = Convert($input)
            $timer=TimerInit()
            EndIf
            If $running And TimerDiff($timer)>=$end Then
                $running = False
                GUICtrlSetData($go, $button[$running])
            EndIf

        ;Switch GUIGetMsg()
            ;Case -3
            ;GUISetState $Aufnahme1 @SW_HIDE
            ;GUIDelete($Aufnahme1)
            ;Call ("MainMenu")





WEnd
EndFunc



Func Convert($array)
    Return 1000*(60*(60*(GUICtrlRead($array[0]))+GUICtrlRead($array[1]))+GUICtrlRead($array[2]))
EndFunc

Das ist der Code von Aufnahme1 und wenn er losläuft, macht er Start Stop Start Stop... er soll aber normal durchlaufen.

Siehe oben Original, bloß dort wird der Timer mit einem Button gestartet :-/

Das die While mit Call ("Jump1") nochmal angesprochen wird ist richtig, weil ich nachdem ich den Timer erstellt habe nochmal den Weg verlasse. Dient dazu das ich später wieder in die While hinein komme.

PS ich habe den Code nochmal etwas ausgemistet jetzt ist es etwas übersichtlicher.

Zitat von Musashi

Falls Du einen sogenannten "Countdown Timer" suchst, dann probiere mal dies :

AutoIt

; Quelle : https://www.autoitscript.com/forum/topic/127667-how-to-create-a-countdown-timer-in-autoit/#elControls_885650_menu
; - leicht modifiziert

#include <WindowsConstants.au3>

HotKeySet("{ESC}", _Terminate)
HotKeySet("{F7}", _StartCountdown)

Global $SS_CENTER, $_CountStartVal = 60000, $_Minutes, $_Seconds, $b_Running = False, $bInit = False

$_GuiCountDown = GUICreate ( "CountDown...", 400, 150, @DesktopWidth/2 -200, @DesktopHeight/2 -75, $WS_EX_TOPMOST  )
GUISetBkColor (0xA6CAF0)
$TimeLabel = GUICtrlCreateLabel ( "F7=Start", 30, 10, 380, 100, $SS_CENTER )
GUICtrlSetFont ( -1, 50, 400 )
GUISetState ( )
WinSetOnTop ( $_GuiCountDown, "", 1 )

While 1
    If Not $bInit Then $TimeTicks = TimerInit ( )
    If $b_Running Then
        $bInit = True
        _Check ( )
    EndIf
    Sleep (200)
WEnd

Func _Check ( )
    $_CountStartVal -= TimerDiff ( $TimeTicks )
    $TimeTicks = TimerInit ( )
    Local $_MinCalc = Int ( $_CountStartVal / ( 60 * 1000 ) ), $_SecCalc = $_CountStartVal - ( $_MinCalc * 60 * 1000 )
    $_SecCalc = Int ( $_SecCalc / 1000 )
    If $_MinCalc <= 0 And $_SecCalc <= 0 Then
        GUISetBkColor ( 0xFF0000, $_GuiCountDown )
        GUICtrlSetData ( $TimeLabel, "Bye !" )
        Sleep ( 1000 )
        ; If @Compiled Then Shutdown ( 13 )
        Exit
    Else
        If $_MinCalc <> $_Minutes Or $_SecCalc <> $_Seconds Then
            $_Minutes = $_MinCalc
            $_Seconds = $_SecCalc
            GUICtrlSetData ( $TimeLabel, StringFormat ( "%02u" & ":" & "%02u", $_Minutes, $_Seconds ) )
            If $_Minutes = 0 And $_Seconds <= 10 Then
                Beep ( 1200, 100 )
                GUISetBkColor ( 0xA093FF, $_GuiCountDown )
            EndIf
        EndIf
    EndIf
EndFunc ;==> _Check ( )

Func _StartCountdown()
    $b_Running = True
EndFunc   ;==>_StartCountdown

Func _Terminate()
    Exit 0
EndFunc   ;==>Terminate

Alles anzeigen

Hi, danke für deine Idee aber das mit den Input Feldern so wie oben ist am besten ich möchte nur das die Aktion mit Hotkey F7 gestartet wird.

Dazu muss ich sagen, dass ich es so gemacht habe das, wenn F7 gedrückt wurde +1 für $HotkeyF7Zaehler gezählt wird und wenn $HotkeyF7Zaehler = 2 dann Starte den Timer und das klappt nicht richtig das geht Start, Stop, Start, Stop, Start, Stop

Hallo, ich probiere schon eine ganze weile hin und her.

Ich hatte sowas Ähnliches schoneinmal ich habe den Code mir mal aus dem Internet geholt.

Ich möchte ein Timer so wie der hier mit Stunden, Minuten und Sekunden.

Alles schön und gut, aber dieser wird mit einem Button gestartet. Ich möchte diesen aber mit der Hotkey taste F7 Starten.

Ich habe einiges probiert leider verstehe ich nicht richtig wie überhaupt der Code aufgebaut ist, weil ich mich mit Timer noch nicht so beschäftigt habe, aber vielleicht kann mir einer Licht ins dunkle bringen?

Ich weiß einige werden jetzt sagen was ist das den für ein durcheinander, ich habe alles versucht und stehe vor einem Rätsel. Das Hauptproblem in dem Code wird hier liegen $running = Not $running aber wie gesagt ich weiß nicht genau wie so ein Timer Code richtig gebaut wird ich fand dieses Skript so perfekt, weil es fast alles beinhaltet, was ich brauche.

Ich lade das Original auch mal hoch

GUICreate('timer', 220, 70, Default, Default, 0x10C80000)
Dim $end, $timer, $running = False, $input[3], $name[3]=['Stunden','Minuten','Sekunden'], $button[2]=['Start','Stop']
For $i=0 To 2
	GUICtrlCreateGroup($name[$i], 5+70*$i, 5, 70, 40)
	$input[$i]=GUICtrlCreateInput('', 10+70*$i, 20, 60, 20, 1)
Next
$go=GUICtrlCreateButton('Start', 5, 45, 210, 20)

While 1
	Switch GUIGetMsg()
		Case -3
			Exit
		Case $go
			$running = Not $running
			GUICtrlSetData($go, $button[$running])
			$end = Convert($input)
			$timer=TimerInit()
		Case Else
			If $running And TimerDiff($timer)>=$end Then
				$running = False
				GUICtrlSetData($go, $button[$running])
				MsgBox(0, 'Info', 'Game Over')
			EndIf
	EndSwitch
WEnd

Func Convert($array)
	Return 1000*(60*(60*(GUICtrlRead($array[0]))+GUICtrlRead($array[1]))+GUICtrlRead($array[2]))
EndFunc

Zitat von Moombas

Du verwendest doch den Befehl bereits beim Ini-Schreiben, musst ihn nur auf die Variable ändern und dort einfügen wo du es brauchst:

$TEST = GUICtrlRead($Input)

Danke das ist das was ich meinte, bedeutet wenn man was in eine Variable speichern will, schreibt man erst die Variable und dann was es macht, in dem Fall $TEST = GUICtrlRead($Input) und nicht GUICtrlRead($Input) = $TEST

vielen Dank, ich lerne immer mehr dazu

Gruß Whitey

Hauptsache es wird jetzt bei mir abgespeichert

Ich hätte aber noch eine Frage, ist es denn möglich zb. wenn ich was in einer ini abspeichere.

IniWrite($ini, "1", "Text", GUICtrlRead($Input)) In das Input feld schreibe ich jetzt zb. ein Text oder eine Zahl

Dieser Text oder diese Zahl soll aber in eine Variable $TEST gespeichert werden? Damit man sie später wieder abrufen kann.

Zitat von Musashi

Wenn GUICtrlRead($LadeImmer) = $GUI_CHECKED ist, dann schreibst Du den Wert 1 in die Sektion [001] der .ini und löscht die Sektion [002].

Andernfalls (also $GUI_UNCHECKED) schreibst Du den Wert 2 in die Sektion [002] der .ini und löscht die Sektion [001].

Bei If IniRead ... fragst Du aber nur die Sektion [001] ab. Diese wurde in Fall von $GUI_UNCHECKEDaber gelöscht. Es greift also die Vorbesetzung 1 und liefert immer CHECKED.

EDIT WhiteHorse :

Zudem liefert If IniRead($ini, "001","HarkenOn/Off Von Laden Immer", "1") Then ...  immer TRUE, egal ob beim Value= "1" oder "2" steht.

In beiden Fällen ist der String besetzt, und nur das wird hier geprüft.

Warum verwendest Du überhaupt zwei Sektionen ([001] und [002]) ? Eine würde doch völlig ausreichen.

P.S. : Haken , nicht Harken

Alles anzeigen

Ja habe ich auch gerade bemerkt , wenn 1 dann Haken rein, wenn nichts drin steht dann raus Sektionen [001] und wird somit gelöscht.

Zitat von BugFix

Beim Beenden den Wert der Checkbox in der INI speichern und beim Start diesen auswerten. Brauchst du keine extra Werte definieren.

Bsp.:

AutoIt

#include <GUIConstants.au3>

$Ini = @ScriptDir & '\check_mich.ini'

GUICreate('Test')
$check = GUICtrlCreateCheckbox(' Check mich', 50, 20)

GUISetState()

; INI auswerten beim Start
If BitAND(IniRead($Ini, 'checkbox', 'status', $GUI_UNCHECKED), $GUI_CHECKED) Then
    GUICtrlSetState($check, $GUI_CHECKED)
EndIf

While GUIGetMsg() <> -3
WEnd
; nach Schließen der GUI Checkbox-Wert in INI speichern
IniWrite($Ini, 'checkbox', 'status', GUICtrlRead($check))

Alles anzeigen

Danke BugFix,

Ich habe es mir zusammen gebaut mit deinen Code und es klappt

ich danke Euch!

Gruß Whitey