Ließ die in der Hilfe die Beschreibung zu StringSplit durch, dann weiß warum es so nicht gehen kann: http://translation.autoit.de/onlinehilfe/fu…StringSplit.htm
Beiträge von chip
-
-
Das ist weil du das "ä" nicht encode thast. Nein ist nicht das selbe, weil hier nicht die API-Schnittstelle nutzt, von daher Problemlos nutzbar:
Spoiler anzeigen
[autoit]#include <Sound.au3>
[/autoit] [autoit][/autoit] [autoit]
$englisch = _URIEncode("Was gefällt dir besser")InetGet("http://translate.google.de/translate_tts?ie=UTF-8&q=" & $englisch & "&tl=de&total=1&idx=0&textlen=3", @ScriptDir & "\sound.mp3")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$sound = _SoundOpen(@ScriptDir & "\sound.mp3")
_SoundPlay($sound, 1)
_SoundClose($sound)Func _URIEncode($sData)
[/autoit] [autoit][/autoit] [autoit][/autoit]
; Prog@ndy
Local $aData = StringSplit(BinaryToString(StringToBinary($sData,4),1),"")
Local $nChar
$sData=""
For $i = 1 To $aData[0]
$nChar = Asc($aData[$i])
Switch $nChar
Case 45, 46, 48-57, 65 To 90, 95, 97 To 122, 126
$sData &= $aData[$i]
Case 32
$sData &= "+"
Case Else
$sData &= "%" & Hex($nChar,2)
EndSwitch
Next
Return $sData
EndFunc -
Das ist einfach die Datei die aufgerufen wird wenn auf den Lautsprecher klickst.
-
Also den Sound kannst auch so abspielen:
[autoit]#include <Sound.au3>
[/autoit][autoit][/autoit][autoit]
$englisch = "i love animals"InetGet("http://translate.google.de/translate_tts?ie=UTF-8&q=" & $englisch & "&tl=en&total=1&idx=0&textlen=3", @ScriptDir & "\sound.mp3")
[/autoit]
$sound = _SoundOpen(@ScriptDir & "\sound.mp3")
_SoundPlay($sound, 1)
_SoundClose($sound) -
-
Hat nicht mit Autoit zu tun. Vote 4 close
-
So:
[autoit]$post = "os_username=" & $username & "&os_password=" & $password
[/autoit] -
Danke trotzdem an euch zwei :).
-
Da solltest dich an den Hersteller wenden, das hat mit Autoit nichts zu tun.
-
Hi,
habe aktuell folgendes kleines Script:
Spoiler anzeigen
[autoit]#include <GDIPlus.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <GUIConstantsEx.au3>
Opt("GuiOnEventMode", 1)OnAutoItExitRegister("_end")
[/autoit] [autoit][/autoit] [autoit]$chipsetpfad = FileOpenDialog("Chipset", @ScriptDir & "\", "Bilder (*.png)", 1)
[/autoit] [autoit][/autoit] [autoit]$newchipset = GUICreate("Neues Chipset", 480, 256)
[/autoit] [autoit][/autoit] [autoit]
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
GUISetOnEvent($GUI_EVENT_PRIMARYUP, "getPixelcolor")
GUISetState(@SW_SHOW)_GDIPlus_Startup()
[/autoit] [autoit][/autoit] [autoit]$chipset = _GDIPlus_ImageLoadFromFile($chipsetpfad)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$graphic = _GDIPlus_GraphicsCreateFromHWND($newchipset)
_GDIPlus_GraphicsDrawImage($graphic, $chipset, 0, 0)While 1
[/autoit] [autoit][/autoit] [autoit]
Sleep(100)
WEndFunc getPixelcolor()
[/autoit] [autoit][/autoit] [autoit]
$pos = MouseGetPos()
$pix = PixelGetColor($pos[0], $pos[1])
$sMsgText = StringFormat("Der hexadezimale Wert der Farbe ist: %#06x\t", $pix)
MsgBox(0, "PixelGetColor", $sMsgText)
EndFunc ;==>getPixelcolorFunc CLOSEClicked()
[/autoit] [autoit][/autoit] [autoit]
Exit
EndFunc ;==>CLOSEClickedFunc _end()
[/autoit] [autoit][/autoit] [autoit][/autoit]
_GDIPlus_GraphicsDispose($graphic)
_GDIPlus_ImageDispose($chipset)
_GDIPlus_Shutdown()
EndFunc ;==>_endIn der Funktion getPixelcolor() wird der Hexwert der Farbe des Pixel an der aktuellen Mausposition ermittelt. Nun möchte ich diese Farbe im ganzen Bild transparent machen und ale neues PNG speichern. Hoffe es kann mir jemand sagen wie ich das mache.
Edit: Habs hinbekommen:
Spoiler anzeigen
[autoit]#include <GDIPlus.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
#include <GUIConstantsEx.au3>
Opt("GuiOnEventMode", 1)
Opt("MouseCoordMode", 2)OnAutoItExitRegister("_end")
[/autoit] [autoit][/autoit] [autoit]$chipsetpfad = FileOpenDialog("Chipset", @ScriptDir & "\", "Bilder (*.png)", 1)
[/autoit] [autoit][/autoit] [autoit]$newchipset = GUICreate("Neues Chipset", 480, 256)
[/autoit] [autoit][/autoit] [autoit]
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
GUISetOnEvent($GUI_EVENT_SECONDARYUP, "getPixelcolor")
GUISetState(@SW_SHOW)_GDIPlus_Startup()
[/autoit] [autoit][/autoit] [autoit]$chipset = _GDIPlus_ImageLoadFromFile($chipsetpfad)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$graphic = _GDIPlus_GraphicsCreateFromHWND($newchipset)
_GDIPlus_GraphicsDrawImage($graphic, $chipset, 0, 0)While 1
[/autoit] [autoit][/autoit] [autoit]
Sleep(100)
WEndFunc getPixelcolor()
[/autoit] [autoit][/autoit] [autoit]
$pos = MouseGetPos()
$pix = _GDIPlus_BitmapGetPixel($chipset, $pos[0], $pos[1])For $iY = 0 To 256
[/autoit] [autoit][/autoit] [autoit]
For $iX = 0 To 480
If _GDIPlus_BitmapGetPixel($chipset, $iX, $iY) = $pix Then
_GDIPlus_BitmapSetPixel($chipset, $iX, $iY, "00000000")
EndIf
Next
NextMsgBox(0,"","fertig")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
_GDIPlus_GraphicsClear($graphic, 0x00000000)
_GDIPlus_GraphicsDrawImage($graphic, $chipset, 0, 0)
_GDIPlus_ImageSaveToFile($chipset, FileSaveDialog("Bild speichern unter", @ScriptDir, "(*.png)", 18) & ".png")
EndFunc ;==>getPixelcolor; #FUNCTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name...........: _GDIPlus_BitmapGetPixel
; Description ...: Gets the color of a specified pixel in this bitmap
; Syntax.........: _GDIPlus_BitmapGetPixel($hBitmap, $iX, $iY)
; Parameters ....: $hBitmap - Pointer to the Bitmap object
; $iX - The X coordinate of the pixel
; $iY - The Y coordinate of the pixel
; Return values .: Success - Returns the pixel color of the bitmap
; Failure - 0 and either:
; |@error and @extended are set if DllCall failed
; |$GDIP_STATUS contains a non zero value specifying the error code
; Remarks .......: None
; Related .......: _GDIPlus_BitmapSetPixel
; Link ..........; @@MsdnLink@@ GdipBitmapGetPixel
; Example .......; Yes
; ===============================================================================================================================
Func _GDIPlus_BitmapGetPixel($hBitmap, $iX, $iY)
Local $aResult = DllCall($ghGDIPDll, "uint", "GdipBitmapGetPixel", "hwnd", $hBitmap, "int", $iX, "int", $iY, "uint*", 0)If @error Then Return SetError(@error, @extended, 0)
[/autoit] [autoit][/autoit] [autoit]
$GDIP_STATUS = $aResult[0]
Return $aResult[4]
EndFunc ;==>_GDIPlus_BitmapGetPixel; #FUNCTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name...........: _GDIPlus_BitmapSetPixel
; Description ...: Sets the color of a specified pixel in this bitmap
; Syntax.........: _GDIPlus_BitmapSetPixel($hBitmap, $iX, $iY, $iARGB)
; Parameters ....: $hBitmap - Pointer to the Bitmap object
; $iX - The X coordinate of the pixel
; $iY - The Y coordinate of the pixel
; $iARGB - The new color of the pixel
; Return values .: Success - True
; Failure - False and either:
; |@error and @extended are set if DllCall failed
; |$GDIP_STATUS contains a non zero value specifying the error code
; Remarks .......: None
; Related .......: _GDIPlus_BitmapGetPixel
; Link ..........; @@MsdnLink@@ GdipBitmapSetPixel
; Example .......; Yes
; ===============================================================================================================================
Func _GDIPlus_BitmapSetPixel($hBitmap, $iX, $iY, $iARGB)
Local $aResult = DllCall($ghGDIPDll, "uint", "GdipBitmapSetPixel", "hwnd", $hBitmap, "int", $iX, "int", $iY, "uint", $iARGB)If @error Then Return SetError(@error, @extended, False)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$GDIP_STATUS = $aResult[0]
Return $aResult[0] = 0
EndFunc ;==>_GDIPlus_BitmapSetPixelFunc CLOSEClicked()
[/autoit] [autoit][/autoit] [autoit]
Exit
EndFunc ;==>CLOSEClickedFunc _end()
[/autoit]
_GDIPlus_GraphicsDispose($graphic)
_GDIPlus_ImageDispose($chipset)
_GDIPlus_Shutdown()
EndFunc ;==>_end -
Na super das nenne ich mal eine Rückschritt, naja kann man nichts machen muss ich es halt mit FileInstall einbinden.
-
Hi,
scheinbar funktioniert das SQLite.dll.au3 in der aktuellen Version nichtmehr. Weiß jemand ein alternative um die SQLite.dll einzubinden oder bleibt nur FileInstall übrig?
-
Mit
[autoit]_FileListToArray
[/autoit]einlesen dann brauchst dir nur immer den endindex speichern und weiß beim neuen lesen das alles höher diesem Index neu ist.
-
Den Sinn hinter dieser Schleife ist mir nicht klar:
[autoit]For $ii = 1 To 2 - 1
[/autoit]Du gehst hier von 1 nach 2-1 also von 1 nach 1 sprich die Schleife läuft einmal durch also kannst sie auch weg lassen.
-
Möglichewiese teilen sich bei deinem Laptop die Tastatur und das Touchpad eine Signalleitung und bei dauerdruck auf eine Taste wird diese dann "überlastet". Da kannst Softwareseitig nichts dagegen machen.
-
Dann stimmt was mit deinem Rechner nicht. Ich kann die Maus auch bei gedrückter Leertaste bewegen.
-
Ich hatte nur schon bei paar Programme das Problem, dass es nicht funktioniert hat wenn das gleiche Script welches das Setup gestartet hat auch versuchte den Sicherheitsdialog zu bestätigen. Sollte das der Fall sein das Script von Cheater einfach als seperates Script zusätzlich starten.
-
Genau deshalb die Frage Cheater hehe.
-
Kennst den Spruch: Wer einmal Lügt dem glaubt man nicht, auch wenn er dann die Wahrheit spricht
http://minecraft.de/showthread.php…rver-Helper-GER -
Nur um sicher zu gehen ist das die Meldung der UAC mit den Schaltflächen Ja und Nein oder lediglich die Meldung ob das Programm wirklich ausgeführt werden soll mit dem Schaltflächen Ausführen und Abbrechen?