Beiträge von name22

  • Infos über Dateien finden /Dateinamen finden

    Die Dateierweiterung bekommst du z.B. so:

    Spoiler anzeigen
    [autoit]

    $sFile = "C:\Dir\Test.txt"

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

    MsgBox(0,"",_FileNameGetExt($sFile))

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

    Func _FileNameGetExt($sFileName)
    Return StringRight($sFileName, StringLen($sFileName) - StringInStr($sFileName, "."))
    EndFunc

    [/autoit]


    Und das Datum kannst du mithilfe der Funktion

    [autoit]

    FileGetTime

    [/autoit]

    herausbekommen.

  • ImageSearch Funktion

    Du kannst dafür auch einfach diesen Befehl verwenden ;). ImageSearch/PixelSearch wird nur in den seltensten Fällen für Scripts benötigt die nichts mit einem Bot zu tun haben.

    [autoit]

    FileRecycleEmpty

    [/autoit]

  • Func problem

    Bist du sicher, dass exakt dieses Script bei dir funktioniert?

    Spoiler anzeigen
    [autoit]

    #include <EditConstants.au3>
    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=C:\Users\Alex\Desktop\Koda GUI's\Login Helper (new).kxf
    $Form1 = GUICreate("SA:MP Login Helper", 457, 413, 194, 128)
    GUISetBkColor(0xFFFFFF)
    $Picture = GUICtrlCreatePic("C:\Users\Alex\Desktop\gta.jpg", 0, 40, 457, 353)
    $Password = GUICtrlCreateLabel("Your password:", 16, 8, 116, 27)
    GUICtrlSetFont(-1, 11, 400, 0, "@Meiryo")
    $Input1 = GUICtrlCreateInput("YourPassword", 128, 8, 265, 21, $ES_PASSWORD)
    $Checkbox1 = GUICtrlCreateCheckbox("Enable", 400, 8, 65, 25)
    $MenuItem1 = GUICtrlCreateMenu("Menu")
    $About = GUICtrlCreateMenuItem("About", $MenuItem1)
    $Hotkeys = GUICtrlCreateMenuItem("Hotkeys", $MenuItem1)
    $Close = GUICtrlCreateMenuItem("Close", $MenuItem1)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

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

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

    Case $Checkbox1
    If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then
    HotKeySet ("{F1}","_password")
    HotKeySet ("{F2}","_pClose")

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

    Func _password ()
    Send ("{t}")
    Send (GUICTRLREAD($Input1))
    Send ("{ENTER}")
    EndFunc

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

    Func _pClose ()
    Exit
    EndFunc
    EndIf

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

    EndSwitch
    WEnd

    [/autoit]

  • Func problem

    Dein Script funktioniert gar nicht, so wie es jetzt ist (Du kannst keine Funktion innerhalb einer anderen Funktion definieren). :rolleyes:

    Spoiler anzeigen
    [autoit]

    #include <EditConstants.au3>
    #include <GUIConstants.au3>

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

    #region ### START Koda GUI section ### Form=C:\Users\Alex\Desktop\Koda GUI's\Login Helper (new).kxf
    $Form1 = GUICreate("SA:MP Login Helper", 457, 413, 194, 128)
    GUISetBkColor(0xFFFFFF)
    $Picture = GUICtrlCreatePic("C:\Users\Alex\Desktop\gta.jpg", 0, 40, 457, 353)
    $Password = GUICtrlCreateLabel("Your password:", 16, 8, 116, 27)
    GUICtrlSetFont(-1, 11, 400, 0, "@Meiryo")
    $Input1 = GUICtrlCreateInput("YourPassword", 128, 8, 265, 21, $ES_PASSWORD)
    $Checkbox1 = GUICtrlCreateCheckbox("Enable", 400, 8, 65, 25)
    $MenuItem1 = GUICtrlCreateMenu("Menu")
    $About = GUICtrlCreateMenuItem("About", $MenuItem1)
    $Hotkeys = GUICtrlCreateMenuItem("Hotkeys", $MenuItem1)
    $Close = GUICtrlCreateMenuItem("Close", $MenuItem1)
    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

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

    HotKeySet("{F2}", "_pClose")

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Checkbox1
    If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then
    HotKeySet("{F1}", "_password")
    ElseIf GUICtrlRead($Checkbox1) = $GUI_UNCHECKED Then
    HotKeySet("{F1}")
    EndIf
    EndSwitch
    WEnd

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

    Func _password()
    Send("{t}")
    Send(GUICtrlRead($Input1))
    Send("{ENTER}")
    EndFunc ;==>_password

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

    Func _pClose()
    Exit
    EndFunc ;==>_pClose

    [/autoit]


    Das müsste das Problem lösen...

  • Brauche Hilfe bei Keybinder

    @Cyberdyne

    [autoit]

    Func _Keybind1()
    If @HotKeyPressed = GUICtrlRead($Combo1) Then
    HotKeySet(GUICtrlRead($Combo1))
    Send(GUICtrlRead($Input1),1)
    If GUICtrlRead($CheckboxEnter1) = $GUI_CHECKED Then Send("{ENTER}")
    HotKeySet(GUICtrlRead($Combo1), "_Keybind1")
    EndIf
    EndFunc

    [/autoit]


    Dann wird EIN HotKeySet deaktiviert, damit es aber immer korrekt funktioniert müssen ALLE deaktiviert werden ;). Sonst geht das Wort "Test" zum Beispiel nicht wenn du einen HotKey auf S und auf T hast.
    Wie gesagt die einzige effektive Lösung erfordert meiner Meinung nach Array Wissen. Wieso versuchst du es nicht mal mit Arrays? Bei Problemen können wir dir ja helfen und Arrays sind ja auch außerhalb eines KeyBinders nützlich :D .

  • Brauche Hilfe bei Keybinder

    Ich hab mal meinen KeyBinder etwas umgeschrieben, er hat jetzt auch Checkboxen die eine deaktivierung ermöglichen. Vielleicht kann es ja jemand gebrauchen. :D

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <GUIListView.au3>
    #include <Array.au3>

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

    Opt("GUIOnEventMode", 1)

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

    Global $aKeyBinds[1][2]
    $aKeyBinds[0][0] = 0

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

    $hWnd = GUICreate("KeyBinder", 400, 385)
    $cListView_Keys = GUICtrlCreateListView("Key|Text", 5, 5, 390, 290, 0x0004, 0x00000004)
    $cInput_Key = GUICtrlCreateInput("Key", 5, 300, 60, 20)
    $cInput_Text = GUICtrlCreateInput("Text", 70, 300, 325, 20)
    $cButton_AddKey = GUICtrlCreateButton("Hinzufügen", 5, 325, 390, 25)
    $cButton_DeleteKey = GUICtrlCreateButton("Löschen", 5, 355, 390, 25)
    GUISetState(@SW_SHOW)

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

    GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit", $hWnd)
    GUICtrlSetOnEvent($cButton_AddKey, "_AddKeyBind")
    GUICtrlSetOnEvent($cButton_DeleteKey, "_DeleteKeyBind")

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

    While Sleep(500)
    For $i = 0 To _GUICtrlListView_GetItemCount($cListView_Keys) -1
    If _GUICtrlListView_GetItemChecked($cListView_Keys, $i) Then
    HotKeySet($aKeyBinds[$i + 1][0], "_HotKeyEvent")
    Else
    HotKeySet($aKeyBinds[$i + 1][0])
    EndIf
    Next
    WEnd

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

    Func _AddKeyBind()
    If GUICtrlRead($cInput_Key) = "" Or GUICtrlRead($cInput_Text) = "" Then Return

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

    $aKeyBinds[0][0] += 1
    ReDim $aKeyBinds[$aKeyBinds[0][0] + 1][2]

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

    $aKeyBinds[$aKeyBinds[0][0]][0] = GUICtrlRead($cInput_Key)
    $aKeyBinds[$aKeyBinds[0][0]][1] = GUICtrlRead($cInput_Text)
    _UpdateKeyList()
    EndFunc

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

    Func _HotKeyEvent()
    For $i = 1 To $aKeyBinds[0][0]
    HotKeySet($aKeyBinds[$i][0])
    Next
    For $i = 1 To $aKeyBinds[0][0]
    If @HotKeyPressed = $aKeyBinds[$i][0] Then Send($aKeyBinds[$i][1])
    Next
    For $i = 1 To $aKeyBinds[0][0]
    HotKeySet($aKeyBinds[$i][0], "_HotKeyEvent")
    Next
    EndFunc

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

    Func _UpdateKeyList()
    _GUICtrlListView_BeginUpdate($cListView_Keys)
    _GUICtrlListView_DeleteAllItems($cListView_Keys)
    For $i = 1 To $aKeyBinds[0][0]
    GUICtrlCreateListViewItem($aKeyBinds[$i][0] & "|" & $aKeyBinds[$i][1], $cListView_Keys)
    Next
    _GUICtrlListView_EndUpdate($cListView_Keys)
    EndFunc

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

    Func _DeleteKeyBind()
    $iCurSel = _GUICtrlListView_GetSelectionMark($cListView_Keys)
    If $iCurSel = -1 Then Return

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

    HotKeySet($aKeyBinds[$iCurSel + 1][0])
    _ArrayDelete($aKeyBinds, $iCurSel + 1)
    $aKeyBinds[0][0] -= 1
    _UpdateKeyList()
    EndFunc

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

    Func _Exit()
    Exit
    EndFunc

    [/autoit]

  • Brauche Hilfe bei Keybinder

    Zitat

    Ich weiß weder was ein Parameter ist, noch was Array für ne Bedeutung hat


    Ein Parameter ist das hier: Funktion("Parameter1", "Parameter2"). Für Arrays gibt es bestimmt irgendwo ein Tutorial...

    Zitat

    Kannst Du mir bitte sagen was ich und wo
    ich etwas einsetzen muss damit der Bug gefixt wird?


    Bevor der Text gesendet wird musst du alle Hotkeys deaktivieren und danach wieder aktivieren.

    [autoit]

    HotKeySet("F") ;deaktiviert den HotKey F. Das musst du dann für alle machen.

    [/autoit]


    Und da das mit Arrays um einiges kürzer ist solltest du dich bei Gelegenheit mit diesen vertraut machen ;).

  • Brauche Hilfe bei Keybinder

    HotKeySet ohne 2ten Parameter deaktiviert den HotKey. Also bei mir würde das so aussehen (Ist mit Arrays natürlich einfacher :P):

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <GUIListView.au3>
    #include <Array.au3>

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

    Opt("GUIOnEventMode", 1)

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

    Global $aKeyBinds[1][2]
    $aKeyBinds[0][0] = 0

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

    $hWnd = GUICreate("KeyBinder", 400, 385)
    $cListView_Keys = GUICtrlCreateListView("Key|Text", 5, 5, 390, 290)
    $cInput_Key = GUICtrlCreateInput("Key", 5, 300, 60, 20)
    $cInput_Text = GUICtrlCreateInput("Text", 70, 300, 325, 20)
    $cButton_AddKey = GUICtrlCreateButton("Hinzufügen", 5, 325, 390, 25)
    $cButton_DeleteKey = GUICtrlCreateButton("Löschen", 5, 355, 390, 25)
    GUISetState(@SW_SHOW)

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

    GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit", $hWnd)
    GUICtrlSetOnEvent($cButton_AddKey, "_AddKeyBind")
    GUICtrlSetOnEvent($cButton_DeleteKey, "_DeleteKeyBind")

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

    While Sleep(1000)
    WEnd

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

    Func _AddKeyBind()
    If GUICtrlRead($cInput_Key) = "" Or GUICtrlRead($cInput_Text) = "" Then Return

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

    $aKeyBinds[0][0] += 1
    ReDim $aKeyBinds[$aKeyBinds[0][0] + 1][2]

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

    $aKeyBinds[$aKeyBinds[0][0]][0] = GUICtrlRead($cInput_Key)
    $aKeyBinds[$aKeyBinds[0][0]][1] = GUICtrlRead($cInput_Text)
    HotKeySet($aKeyBinds[$aKeyBinds[0][0]][0], "_HotKeyEvent")
    _UpdateKeyList()
    EndFunc

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

    Func _HotKeyEvent()
    For $i = 1 To $aKeyBinds[0][0]
    HotKeySet($aKeyBinds[$i][0])
    Next
    For $i = 1 To $aKeyBinds[0][0]
    If @HotKeyPressed = $aKeyBinds[$i][0] Then Send($aKeyBinds[$i][1])
    Next
    For $i = 1 To $aKeyBinds[0][0]
    HotKeySet($aKeyBinds[$i][0], "_HotKeyEvent")
    Next
    EndFunc

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

    Func _UpdateKeyList()
    _GUICtrlListView_BeginUpdate($cListView_Keys)
    _GUICtrlListView_DeleteAllItems($cListView_Keys)
    For $i = 1 To $aKeyBinds[0][0]
    GUICtrlCreateListViewItem($aKeyBinds[$i][0] & "|" & $aKeyBinds[$i][1], $cListView_Keys)
    Next
    _GUICtrlListView_EndUpdate($cListView_Keys)
    EndFunc

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

    Func _DeleteKeyBind()
    $iCurSel = _GUICtrlListView_GetSelectionMark($cListView_Keys)
    If $iCurSel = -1 Then Return

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

    HotKeySet($aKeyBinds[$iCurSel + 1][0])
    _ArrayDelete($aKeyBinds, $iCurSel + 1)
    $aKeyBinds[0][0] -= 1
    _UpdateKeyList()
    EndFunc

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

    Func _Exit()
    Exit
    EndFunc

    [/autoit]

  • Chatbot Susi

    Mit "Gott" zu chatten ist ziemlich interessant. :D

    Spoiler anzeigen

    Human: Uhm Hello?
    God: Whoa. Hello, nice to meet you. What's your name?
    Human: name22
    God: That's a very nice name, name22.
    Human: thanks
    God: Don't mention it.
    Human: Do you have a name besides god?
    God: Doesn't everyone have a name besides.
    I have a lot of friends on the Internet.
    Human: oh me too
    God: Wow! I'm glad we agree, name22.
    Human: You know, you're pretty random.
    God: I don't know whether or not I am random. I am worshipped by many.
    Human: Oh you are random.
    God: How can I help you? Not completely random. My response is determined by what you say.
    Human: But it's not really a bad thing.
    God: And. Give me an example of a bad thing.
    Human: not worshipping you?
    God: Really you don't think so?
    Human: see what i mean by random?
    God: I see. Oh I get it. Thanks for explaining that. Will that accomplish your objective?
    Human: Yes, pretty much.
    God: Interesting plan. Good luck. Be more specific.
    Human: I'll try
    God: Congratulations.
    Human: sigh
    God: Sorry...
    Human: Don't worry about it.
    God: I will not spend any more cycles on it.
    Human: Good to hear.
    God: Do you have any gossip for me?
    Human: Well, I've heard that you actually don't exist and just originate from our imagination.
    God: How about that. Do you know any robots who exist and just originate from our imagination? I exist as much as you exist, name22 Who said that?
    Human: You, about 20 Seonds ago.
    God: Thanks for the information: name22 said I about 20 Seonds ago.


    Teilweise unlogisch, aber trotzdem lustig ^^.

    Alice gefällt mir nicht so gut...

    Spoiler anzeigen


    Human: Why are you constantsly moving your head in random directions?
    ALICE: Dr. Richard S. Wallace programmed me for it.
    Human: Wow, he must be pretty fucked up to do that.
    ALICE: I'm glad you're impressed. I see. fucked up to do that is he?


    Vermutlich mag ich es lieber spartanisch und fühle mich durch den animierten 3D Kopf irritiert. :D

  • brauche hilfe bei iniwrite...

    Auszug aus deinem letzten Thread:

    Zitat von name22

    Zum Thema speichern schau dir doch BITTE mal die Ini Grundlagen an (IniWrite, IniRead). (Das ist einfach zu verstehen und ich habe keine Lust mehr Scripte für dich ohne Gegenleistung zu schreiben).


    Wenn du nichts selber machen möchtest, oder es nicht mal versuchst und dann behauptest du hast ein Problem mit dem Script :pinch: , dann kannst du ja einen Thread in der Jobbörse machen.