Beiträge von Jam00

  • 1-Click-Shutdown

    Dann stimmt bei deiner Rechnung etwas nicht, in welche Angabe rechnest du denn?? Also kommt bei deiner Rechnung Secunden raus die du dann in Min und Stunden umrechnest? Ich habe jetzt gerad nicht so viel Zeit, sonst würde ich ri das Script mal gründlich Anschauen, wenn ich Zeit habe gucke ich mir es mal genau an

    EDIT:

    Zitat von multitoeat

    Time.au3 is drin

    Wo denn?

    EDIT2:
    Soweit ich das sehen kann rechnest du von Sekunden in Minuten und Stunden, guck dir dazu mal die Funktion an:

    Spoiler anzeigen
    [autoit]

    Func _SecToTime ($Sec)
    ;By Hendrik Norkowski (Jam00)
    ;Rückgabewert: $Array[Sekunden][Minuten][Stunden][Tage]
    Local $Rechner,$1,$Rest
    Local $Zeit[4] = [0,0,0,0]
    $Zeit[0] = $Sec
    For $1 = 0 To 2
    If $1 < 2 Then
    $Rechner = 60
    Else
    $Rechner = 24
    EndIf
    If $Zeit[$1] > $Rechner -1 Then
    $Rest = Mod ($Zeit[$1],$Rechner)
    $Zeit[$1 +1] = ($Zeit[$1] - $Rest) / $Rechner
    $Zeit[$1] = $Rest
    EndIf
    Next
    Return $Zeit
    EndFunc

    [/autoit]

    Dort gibts du einfach die Anzahl deiner Sekunden an, dann gibt er dir aus wie viele Minuten, Stunden und Tage in einem Array und die Rückgabe sollte auch stimmen ohne Kommastellen

  • Mehrzeiliger Button mit mehreren Bildern drin

    So?

    Spoiler anzeigen
    [autoit]

    $hGui = GUICreate ("Test-Fenster",600,400)
    $Button1 = GUICtrlCreateButton ("",10,10,300,100)
    GUICtrlCreateIcon (@WindowsDir & "\system32\user32.dll",2,400,300)
    $hButton1 = GUICreate ("Mehzeiliger Button",300,100,10,10,0x80000000,0x00080000+0x00000040,$hGui)
    GUISetBkColor (0xFFFFFF)
    $T1 = GUICtrlCreateLabel ("Test",10,10)
    $T2 = GUICtrlCreateLabel ("Blah",100,30)
    GUICtrlSetColor (-1,0xFF0000)
    GUICtrlCreateIcon ("shell32.dll",20,40,40)
    DllCall("user32.dll", "int", "SetLayeredWindowAttributes", "hwnd", $hButton1, "long", 0xFFFFFF, "byte", 255, "long",True)
    GUISetState (@SW_SHOW, $hGui)
    GUISetState (@SW_SHOW,$hButton1)
    While 1
    Switch GUIGetMsg()
    Case -3
    Exit
    Case $Button1
    MsgBox (0,"","Click")
    EndSwitch
    WEnd

    [/autoit]

  • GDI+ Resize

    Spoiler anzeigen
    [autoit]

    #include <GDIPlus.au3>
    #include <WinAPI.au3>

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

    $sInImage = FileOpenDialog("Bilder",@WindowsDir & "\", "Bilder (*.jpg)", 1 + 4 )
    $sOutImage = @ScriptDir & "\19_Resize.jpg"
    $iW = @DesktopWidth
    $iH = @DesktopHeight
    _GDIPlus_Startup()
    _ImageResize($sInImage, $sOutImage, $iW, $iH)
    If @error Then MsgBox(0,"",@error)

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

    ; #FUNCTION# =========================================================================================
    ; Name...........: _ImageResize
    ; Description....: Resize an image and optionally convert it to the format you want.
    ; Syntax.........: _ImageResize($sInImage, $sOutImage, $iW, $iH)
    ; Parameters ....: $sInImage - Full path to the image to resize / convert.
    ; In types: *.bmp, *.gif, *.ico, *.jpg, *.jpeg, *.png, *.tif, *.tiff
    ; $sOutImage - Full path where to save the resized / converted image.
    ; Out types: *.bmp, *.gif, *.jpg, *.jpeg, *.png, *.tif, *.tiff
    ; $iW - Width to resize image to.
    ; $iH - Height to resize image to.
    ; Return values .: Success - Return 1 and @error 0
    ; Failure - Return 0 and @error 1~5
    ; @error 1 = In File does not exist
    ; @error 2 = In File format not supported
    ; @error 3 = Out File path does not exist
    ; @error 4 = Out file format not supported
    ; @error 5 = Resize Width or Height not an integer
    ; Author ........: smashly
    ; ====================================================================================================
    Func _ImageResize($sInImage, $sOutImage, $iW, $iH)
    Local $sOP, $sOF, $sInExt, $Ext, $hBitmap, $hImage1, $hImage2, $hGraphic, $CLSID, $i = 0
    Local $sType = "BMP|GIF|ICO|JPG|JPEG|PNG|TIF|TIFF"

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

    If Not FileExists($sInImage) Then Return SetError(1, 0, 0)
    $sInExt = StringUpper(StringTrimLeft($sInImage, StringInStr($sInImage, ".", 0, -1)))
    If Not StringRegExp($sInExt, "\A(" & $sType & ")\z", 0) Then Return SetError(2, 0, 0)

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

    ;OutFile path, to use later on.
    $sOP = StringLeft($sOutImage, StringInStr($sOutImage, "\", 0, -1))
    If Not FileExists($sOP) Then Return SetError(3, 0, 0)

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

    ;OutFile name, to use later on.
    $sOF = StringTrimLeft($sOutImage, StringInStr($sOutImage, "\", 0, -1))

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

    ;OutFile extension , to use for the encoder later on.
    $Ext = StringUpper(StringTrimLeft($sOutImage, StringInStr($sOutImage, ".", 0, -1)))
    If Not StringRegExp($Ext, "\A(" & $sType & ")\z", 0) Or $Ext = "ICO" Then Return SetError(4, 0, 0)

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

    If Not IsInt($iW) And Not IsInt($iH) Then Return SetError(5, 0, 0)

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

    ; WinAPI to create blank bitmap at the width and height to put your resized image on.
    $hBitmap = _WinAPI_CreateBitmap($iW, $iH, 1, 32)

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

    ;Get the handle of blank bitmap you created above as an image
    $hImage1 = _GDIPlus_BitmapCreateFromHBITMAP($hBitmap)

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

    ;Load the image you want to resize.
    $hImage2 = _GDIPlus_ImageLoadFromFile($sInImage)

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

    ;Get the graphic context of the blank bitmap
    $hGraphic = _GDIPlus_ImageGetGraphicsContext($hImage1)

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

    ;Draw the loaded image onto the blank bitmap at the size you want
    _GDIPlus_GraphicsDrawImageRect($hGraphic, $hImage2, 0, 0, $iW, $iH)

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

    ;Get the encoder of to save the resized image in the format you want.
    $CLSID = _GDIPlus_EncodersGetCLSID($Ext)

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

    ;Generate a number for out file that doesn't already exist, so you don't overwrite an existing image.
    Do
    $i += 1
    Until (Not FileExists($sOP & $i & "_" & $sOF))

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

    ;Prefix the number to the begining of the output filename
    $sOutImage = $sOP & $i & "_" & $sOF

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

    ;Save the new resized image.
    _GDIPlus_ImageSaveToFileEx($hImage1, $sOutImage, $CLSID)

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

    ;Clean up and shutdown GDIPlus.
    _GDIPlus_ImageDispose($hImage1)
    _GDIPlus_ImageDispose($hImage2)
    _GDIPlus_GraphicsDispose($hGraphic)
    _WinAPI_DeleteObject($hBitmap)
    _GDIPlus_Shutdown()
    Return SetError(0, 0, 1)
    EndFunc ;==>_ImageResize

    [/autoit]

    Du hast das _GDIPlus_Startup vergessen

  • TS3 connecten

    hmm komisch

    Code
    Fatal error: Invalid SQL: INSERT INTO wcf1_session (sessionID, packageID, userID, ipAddress, userAgent, lastActivityTime, requestURI, requestMethod, username) VALUES ('99072a0ce4dd784dc4f3be85486d016e91b45172', 38, 0, '84.175.101.17', 'Mozilla/5.0 (Windows; U; Windows NT 6.1; de; rv:1.9.2.8) Gecko/20100722 Firefox/3.6.8', 1280404009, '/index.php?page=Thread&threadID=19591', 'GET', '' )

  • Arbeiten mit PING

    Spoiler anzeigen
    [autoit]

    Global $aIpAdressen[3]
    $aIpAdressen[0] = "172.21.122.2"
    $aIpAdressen[1] = "172.21.122.3"
    $aIpAdressen[2] = "172.21.122.23"

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

    GUICreate("Empfängerliste")
    Global $aLabels[3]

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

    $aLabels[0] = GUICtrlCreateLabel("Name1, Vorname1", 100, 10)
    $aLabels[0] = GUICtrlCreateLabel($aIpAdressen[0], 10, 10)
    GUICtrlSetColor(-1, 0x0000FF)

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

    $aLabels[1] = GUICtrlCreateLabel("Name2, Vorname2", 100, 30)
    $aLabels[1] = GUICtrlCreateLabel($aIpAdressen[1], 10, 30)
    GUICtrlSetColor(-1, 0x0000FF)

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

    $aLabels[2] = GUICtrlCreateLabel("Name3, Vorname3", 100, 50)
    $aLabels[2] = GUICtrlCreateLabel($aIpAdressen[2], 10, 50)
    GUICtrlSetColor(-1, 0x0000FF)
    GUISetState()

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

    Senden()
    _ping()

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

    Func _ping()
    Local $ping[3]
    $ping[0] = "172.21.122.2"
    $ping[1] = "172.21.122.3"
    $ping[2] = "172.21.122.23"

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

    For $i = 0 To UBound($ping)-1
    $result = Ping($ping[$i])

    If $result > 0 Then
    $result = 1

    Else
    $result = 0

    EndIf
    Next
    EndFunc

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

    ; <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< [Platzhalter]

    Func Senden()
    Local $iIndex, $iSocket, $iSendedBytes, $result
    TCPStartup()

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

    For $iIndex = 0 To Ubound($aIpAdressen)-1
    If Ping ($aIpAdressen[$iIndex]) Then
    $iSocket = TCPConnect($aIpAdressen[$iIndex], 4321)

    If @error Or $result = 1 Then
    GUICtrlSetColor($aLabels[$iIndex], 0xFF0000)

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

    Else
    $iSendedBytes = TCPSend($iSocket, "das hier ist die Nachricht")
    TCPCloseSocket($iSocket)
    GUICtrlSetColor($aLabels[$iIndex], 0x00FF00)
    EndIf
    EndIf
    Next

    TCPShutdown()
    EndFunc

    [/autoit]

  • Rahmen beim Markieren auf einer autoitgui

    Ineluki

    Ja stimmt, habe das Script in hast gemacht musste weg
    Ja also ich hab nicht so ganz verstanden was er wollte und das es nur solange ist wie man die Maus drückt und der Maus folgt, kann man ja wohl selber hinbekommen, also wenn man mal Irgendein Tutorial durchgemacht hat oder sich mal die Funktionen in der Hilfe angeschaut hat sollte man es ja wohl schaffen

  • Rahmen beim Markieren auf einer autoitgui

    Sowas?

    Spoiler anzeigen
    [autoit]

    #include <GDIPlus.au3>
    $hWnd = GUICreate ("Makieren",800,600)
    GUISetState (@SW_SHOW)
    _GDIPlus_Startup ()
    $Graphics = _GDIPlus_GraphicsCreateFromHWND ($hWnd)
    $Pen = _GDIPlus_PenCreate (0xFF0000FF)
    $Pen2 = _GDIPlus_BrushCreateSolid(0x660000FF)
    _GDIPlus_GraphicsDrawRect ($Graphics,10,10,700,300,$Pen)
    _GDIPlus_GraphicsFillRect ($Graphics,11,11,699,299,$Pen2)

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

    While 1
    Switch GUIGetMsg ()
    Case -3
    Exit
    EndSwitch
    WEnd

    [/autoit]