Mhm ok und könntest du das code beispiel mal mit einer txt machen? Kapiere das nicht ganz mit der txt datei^^
Beiträge von slash
-
-
Thx nice kann geclosed werden!!
-
sry hab vergessen das rauszumachen. die extprob.au3 kann man entnehmen..
-
Okay hier habe ich mal komplett alles... also script und images. einfach entpacken und script öffnen.
-
Danke für die beispiele. Jedoch verstehe ich eins nicht und zwar das von Bugfix. Könntest du es etwas genauer erklären?
-
Guten Abend.
Hab da ma ne frage.
Wie kann ich bspws. zufällige daten aus einer ini in einer gui wiedergeben?
z.B
2 ini dateien.
Ini1 = Normal modus
Ini2 = Hardcore ModusIn der Gui wird man gefragt ob modus 1 oder 2 gewählt werden soll.
Wällt man einen dieser modies so erscheint in der Gui z.B sie sind nun im .... Modus.
Klicken sie auf generieren um einen zufälligen text auszugeben.Klickt man diesen Button so wird eine zeile aus der ini ausgegeben.
nehmen wir mal an
Ini1:test1
test2
test3 usw...Ich glaube ihr versteht mich.
Könnte mir jemand ein Beispiel nennen oder so? Also ich wüsste jetzt nicht wie ich das machen soll.....
Thx im voraus!
-
-
Das liegt daran das du die bilder nicht hast.
Und wegen dem Song, der wird bei der fileopen funktion angegeben. -
die kannst du raus nehmen
die funktion habe ich noch nicht eingebaut 
-
Guten Morgen.
Kann mir jemand sagen warum die Play/Pause/Stop funktion nicht geht? Das Fileopen geht aber der rest nicht.
Hier mein Code:
Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#cs ============================================================================Author: Slash (Martin P)
[/autoit] [autoit][/autoit] [autoit]
Script: iFlow Music Player#ce ============================================================================
[/autoit] [autoit][/autoit] [autoit]#NoTrayIcon
[/autoit] [autoit][/autoit] [autoit]
#include <GDIPlus.au3>
#include <File.au3>
#include <array.au3>
#include <WindowsConstants.au3>
#include <GuiConstantsEx.au3>
#include <extprop.au3>
#include <Sound.au3>
#include <StaticConstants.au3>
#include <GuiSlider.au3>
#include <GuiToolTip.au3>Opt("MustDeclareVars", 0)
[/autoit] [autoit][/autoit] [autoit]$dll=DllOpen("user32.dll")
[/autoit] [autoit][/autoit] [autoit]Global Const $AC_SRC_ALPHA = 1
[/autoit] [autoit][/autoit] [autoit]
Global $ImageDir = @ScriptDir & "\data\"; Load PNG file as GDI bitmap
[/autoit] [autoit][/autoit] [autoit]
_GDIPlus_Startup()
$pngSrc = @ScriptDir & "\data\iflowbg.png"
$hImage = _GDIPlus_ImageLoadFromFile($pngSrc); Extract image width and height from PNG
[/autoit] [autoit][/autoit] [autoit]
$width = _GDIPlus_ImageGetWidth($hImage)
$height = _GDIPlus_ImageGetHeight($hImage);Hauptfenster
[/autoit] [autoit][/autoit] [autoit]
$GUI = GUICreate("iFlow Music Player", $width, $height, -1, -1, $WS_POPUP, $WS_EX_LAYERED)
SetBitmap($GUI, $hImage, 0)
GUIRegisterMsg($WM_NCHITTEST, "WM_NCHITTEST")
GUISetState()For $i = 0 To 255 Step 5
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($GUI, $hImage, $i)
Next
;Ende Hauptfenster;Keine Ahnung für was das ist??
[/autoit] [autoit][/autoit] [autoit]
$GUI1 = GUICreate("ControlGUI", $width, $height, 0, 0, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $GUI)
GUICtrlCreatePic($ImageDir & "grey.gif", 0, 0, $width, $height)
GUICtrlSetState(-1, $GUI_DISABLE)
;Ende Keine Ahnung für was das ist??;Fenster Titel
[/autoit] [autoit][/autoit] [autoit]
GUICtrlCreateLabel("iFlow Music Player", 233, 16, 100, 32)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetColor(-1, 0xFFFFFF)
GUISetState(@SW_SHOW)
;Ende Fenster Titel;Close Button
[/autoit] [autoit][/autoit] [autoit]
$hImageclose = _GDIPlus_ImageLoadFromFile("data\close.png")
$hImageclose1 = _GDIPlus_ImageLoadFromFile("data\closehover.png")
$hImageclose2 = _GDIPlus_ImageLoadFromFile("data\closehover.png")$Close = GUICreate("Close", 0, 0, 488,13,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($Close,$hImageclose,255)
GUISetState()
;Ende Close Button;Minimier Button
[/autoit] [autoit][/autoit] [autoit]
$hImagemin = _GDIPlus_ImageLoadFromFile("data\min.png")
$hImagemin1 = _GDIPlus_ImageLoadFromFile("data\minhover.png")
$hImagemin2 = _GDIPlus_ImageLoadFromFile("data\minhover.png")$Min = GUICreate("Minimieren", 0, 0, 469,13,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($Min,$hImagemin,255)
GUISetState()
;Ende Minimier Button;Play Button
[/autoit] [autoit][/autoit] [autoit]
$hImageplay = _GDIPlus_ImageLoadFromFile("data\play.png")
$hImageplay1 = _GDIPlus_ImageLoadFromFile("data\playhover.png")
$hImageplay2 = _GDIPlus_ImageLoadFromFile("data\playhover.png")$Play = GUICreate("Play", 0, 0, 20,305,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($Play,$hImageplay,255)
GUISetState()
;Ende Play Button;Pause Button
[/autoit] [autoit][/autoit] [autoit]
$hImagepause = _GDIPlus_ImageLoadFromFile("data\pause.png")
$hImagepause1 = _GDIPlus_ImageLoadFromFile("data\pausehover.png")
$hImagepause2 = _GDIPlus_ImageLoadFromFile("data\pausehover.png")$Pause = GUICreate("Pause", 0, 0, 60,305,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($Pause,$hImagepause,255)
GUISetState()
;Ende Pause Button;Stop Button
[/autoit] [autoit][/autoit] [autoit]
$hImagestop = _GDIPlus_ImageLoadFromFile("data\stop.png")
$hImagestop1 = _GDIPlus_ImageLoadFromFile("data\stophover.png")
$hImagestop2 = _GDIPlus_ImageLoadFromFile("data\stophover.png")$Stop = GUICreate("Stop", 0, 0, 100,305,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($Stop,$hImagestop,255)
GUISetState()
;Ende Stop Button;Open Button
[/autoit] [autoit][/autoit] [autoit]
$hImageopen = _GDIPlus_ImageLoadFromFile("data\open.png")
$hImageopen1 = _GDIPlus_ImageLoadFromFile("data\openhover.png")
$hImageopen2 = _GDIPlus_ImageLoadFromFile("data\openhover.png")$Open = GUICreate("Open", 0, 0, 460,305,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($Open,$hImageopen,255)
GUISetState()
;Ende Open Button;Volume Button
[/autoit] [autoit][/autoit] [autoit]
$hImagevolume = _GDIPlus_ImageLoadFromFile("data\volume.png")
$hImagevolume1 = _GDIPlus_ImageLoadFromFile("data\volumehover.png")
$hImagevolume2 = _GDIPlus_ImageLoadFromFile("data\volumemute.png")$VolumeBTN = GUICreate("Volume", 0, 0, 390,305,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($VolumeBTN,$hImagevolume,255)
GUISetState()
;Ende Volume Button;Volume Button
[/autoit] [autoit][/autoit] [autoit]
$hImagevolumepopup = _GDIPlus_ImageLoadFromFile("data\volumepopup.png")
$hImagevolumepopup1 = _GDIPlus_ImageLoadFromFile("data\volumepopuphover.png")
$hImagevolumepopup2 = _GDIPlus_ImageLoadFromFile("data\volumepopuphover.png")$VolumeBTNPopup = GUICreate("Volume", 0, 0, 415,305,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($VolumeBTNPopup,$hImagevolumepopup,255)
GUISetState()
;Ende Volume ButtonWhile 1
[/autoit] [autoit][/autoit] [autoit]
btnclose($Close,$hImageclose,$hImageclose1,$hImageclose2)
btnmin($Min,$hImagemin,$hImagemin1,$hImagemin2)
btnplay($Play,$hImageplay,$hImageplay1,$hImageplay2)
btnpause($Pause,$hImagepause,$hImagepause1,$hImagepause2)
btnstop($Stop,$hImagestop,$hImagestop1,$hImagestop2)
btnopen($Open,$hImageopen,$hImageopen1,$hImageopen2)
btnvolume($VolumeBTN,$hImagevolume,$hImagevolume1,$hImagevolume2)
btnvolumepopup($VolumeBTNPopup,$hImagevolumepopup,$hImagevolumepopup1,$hImagevolumepopup2)
$nMsg = GUIGetMsg()
Select
Case $nMsg = $GUI_EVENT_CLOSE
Exit
EndSelect
WEndGUIDelete($GUI)
[/autoit] [autoit][/autoit] [autoit];Bild aufbauen
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImageclose, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImagemin, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImageplay, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImagepause, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImagestop, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImageopen, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImagevolume, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImagevolumepopup, $i)
Next; Release resources
[/autoit] [autoit][/autoit] [autoit]
_WinAPI_DeleteObject($hImageclose)
_WinAPI_DeleteObject($hImagemin)
_WinAPI_DeleteObject($hImageplay)
_WinAPI_DeleteObject($hImagepause)
_WinAPI_DeleteObject($hImagestop)
_WinAPI_DeleteObject($hImageopen)
_WinAPI_DeleteObject($hImagevolume)
_WinAPI_DeleteObject($hImagevolumepopup)
_WinAPI_DeleteObject($hImage)
_GDIPlus_Shutdown()Func WM_NCHITTEST($hWnd, $iMsg, $iwParam, $ilParam)
[/autoit] [autoit][/autoit] [autoit]
If ($hWnd = $GUI) And ($iMsg = $WM_NCHITTEST) Then Return $HTCAPTION
EndFunc ;==>WM_NCHITTEST;Minimier Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnmin($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Exit
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Minimier Button Hover;Close Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnclose($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Exit
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Close Button Hover;Play Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnplay($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
_SoundPlay($Song)
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Play Button Hover;Pause Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnpause($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
_SoundPause($Song)
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Pause Button Hover;Stop Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnstop($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
_SoundStop($Song)
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Stop Button Hover;Open Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnopen($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
$Song = FileOpenDialog("Bitte Musik Datei auswählen", @DesktopDir & "", "Musik Dateien(*.mp3;*.wav;*.wma;)",1)
_SoundPlay($Song)
SoundSetWaveVolume(5)
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Open Button Hover;Volume Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnvolume($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
SoundSetWaveVolume(0)
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Volume Button Hover;VolumePopup Hover
[/autoit] [autoit][/autoit] [autoit]
func btnvolumepopup($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
_CreateSliderGUI()
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende VolumePopup Button HoverFunc _CreateSliderGUI($Min = 0, $Max = 100, $GuiWidth = 200, $GuiHeight = 50)
[/autoit] [autoit][/autoit] [autoit]
Local $MousePos = MouseGetPos()
Local $Mouse[2]
$Mouse[0] = $MousePos[0]
$Mouse[1] = $MousePos[1]
Local $sGUI = GUICreate("Slider GUI", $GuiWidth, $GuiHeight, $MousePos[0] - $GuiWidth/2, $MousePos[1] - $GuiHeight/2, $WS_POPUP)
Local $sSlider = GUICtrlCreateSlider(0, 0, $GuiWidth, $GuiHeight)
GUICtrlSetBkColor(-1, 0x333333)
GUICtrlSetLimit(-1, $Max, $Min)
GUISetState(@SW_SHOW)
While (($MousePos[0] >= $Mouse[0] - $GuiWidth/2 And $MousePos[0] <= $Mouse[0] + $GuiWidth/2) And ($MousePos[1] >= $Mouse[1] - $GuiHeight/2 And $MousePos[1] <= $Mouse[1] + $GuiHeight/2))
$MousePos = MouseGetPos()
WEnd
GUISetState(@SW_HIDE)
Return GUICtrlRead($sSlider)
EndFunc ;==>_CreateSliderGUI;Funktion für Transparentes GUI
[/autoit] [autoit][/autoit] [autoit]
Func SetBitmap($hGUI, $hImage, $iOpacity)
Local $hScrDC, $hMemDC, $hBitmap, $hOld, $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend$hScrDC = _WinAPI_GetDC(0)
[/autoit] [autoit][/autoit] [autoit]
$hMemDC = _WinAPI_CreateCompatibleDC($hScrDC)
$hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)
$hOld = _WinAPI_SelectObject($hMemDC, $hBitmap)
$tSize = DllStructCreate($tagSIZE)
$pSize = DllStructGetPtr($tSize)
DllStructSetData($tSize, "X", _GDIPlus_ImageGetWidth($hImage))
DllStructSetData($tSize, "Y", _GDIPlus_ImageGetHeight($hImage))
$tSource = DllStructCreate($tagPOINT)
$pSource = DllStructGetPtr($tSource)
$tBlend = DllStructCreate($tagBLENDFUNCTION)
$pBlend = DllStructGetPtr($tBlend)
DllStructSetData($tBlend, "Alpha", $iOpacity)
DllStructSetData($tBlend, "Format", $AC_SRC_ALPHA)
_WinAPI_UpdateLayeredWindow($hGUI, $hScrDC, 0, $pSize, $hMemDC, $pSource, 0, $pBlend, $ULW_ALPHA)
_WinAPI_ReleaseDC(0, $hScrDC)
_WinAPI_SelectObject($hMemDC, $hOld)
_WinAPI_DeleteObject($hBitmap)
_WinAPI_DeleteDC($hMemDC)
EndFunc
;Ende Funktion für Transparentes GUI;Funktion für Button Hover
[/autoit] [autoit][/autoit] [autoit]
Func hander()
Local $iRet = DllCall("user32.dll", "int", "WindowFromPoint", "long", MouseGetPos(0), "long", MouseGetPos(1))
If IsArray($iRet) Then Return HWnd($iRet[0])
Return SetError(1, 0, 0)
EndFuncFunc event($sHexKey="01", $vDLL = $dll)
[/autoit]
Local $a_R = DllCall($vDLL, "short", "GetAsyncKeyState", "int", '0x' & $sHexKey)
If @error Then Return SetError(@error, @extended, False)
Return BitAND($a_R[0], 0x8000) <> 0
EndFunc
;Ende Funktion für Button Hover -
Okay mach ich
DANKE! -
Jo hammer

Genauso habe ich mir das Vorgestellt^^
Cool wäre wenn er anzeigt wieviel % volume. Ich denke du weist was ich meine^^Und weist du villt mein Problem wegen dem Play/Pause/Stop usw?
-
Nice
100% getroffen^^.Wenn ich schon hier den post offen habe kann ich auch noch was anderes fragen.
Und zwar.
Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#cs ============================================================================Author: Slash (Martin P)
[/autoit] [autoit][/autoit] [autoit]
Script: iFlow Music Player#ce ============================================================================
[/autoit] [autoit][/autoit] [autoit]#NoTrayIcon
[/autoit] [autoit][/autoit] [autoit]
#include <GDIPlus.au3>
#include <File.au3>
#include <array.au3>
#include <WindowsConstants.au3>
#include <GuiConstantsEx.au3>
#include <extprop.au3>
#include <Sound.au3>
#include <StaticConstants.au3>
#include <GuiSlider.au3>
#include <GuiToolTip.au3>Opt("MustDeclareVars", 0)
[/autoit] [autoit][/autoit] [autoit]$dll=DllOpen("user32.dll")
[/autoit] [autoit][/autoit] [autoit]Global Const $AC_SRC_ALPHA = 1
[/autoit] [autoit][/autoit] [autoit]
Global $ImageDir = @ScriptDir & "\data\"; Load PNG file as GDI bitmap
[/autoit] [autoit][/autoit] [autoit]
_GDIPlus_Startup()
$pngSrc = @ScriptDir & "\data\iflowbg.png"
$hImage = _GDIPlus_ImageLoadFromFile($pngSrc); Extract image width and height from PNG
[/autoit] [autoit][/autoit] [autoit]
$width = _GDIPlus_ImageGetWidth($hImage)
$height = _GDIPlus_ImageGetHeight($hImage);Hauptfenster
[/autoit] [autoit][/autoit] [autoit]
$GUI = GUICreate("iFlow Music Player", $width, $height, -1, -1, $WS_POPUP, $WS_EX_LAYERED)
SetBitmap($GUI, $hImage, 0)
GUIRegisterMsg($WM_NCHITTEST, "WM_NCHITTEST")
GUISetState()For $i = 0 To 255 Step 5
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($GUI, $hImage, $i)
Next
;Ende Hauptfenster;Keine Ahnung für was das ist??
[/autoit] [autoit][/autoit] [autoit]
$GUI1 = GUICreate("ControlGUI", $width, $height, 0, 0, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $GUI)
GUICtrlCreatePic($ImageDir & "grey.gif", 0, 0, $width, $height)
GUICtrlSetState(-1, $GUI_DISABLE)
;Ende Keine Ahnung für was das ist??;Fenster Titel
[/autoit] [autoit][/autoit] [autoit]
GUICtrlCreateLabel("iFlow Music Player", 233, 16, 100, 32)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetColor(-1, 0xFFFFFF)
GUISetState(@SW_SHOW)
;Ende Fenster Titel;Close Button
[/autoit] [autoit][/autoit] [autoit]
$hImageclose = _GDIPlus_ImageLoadFromFile("data\close.png")
$hImageclose1 = _GDIPlus_ImageLoadFromFile("data\closehover.png")
$hImageclose2 = _GDIPlus_ImageLoadFromFile("data\closehover.png")$Close = GUICreate("Close", 0, 0, 488,13,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($Close,$hImageclose,255)
GUISetState()
;Ende Close Button;Minimier Button
[/autoit] [autoit][/autoit] [autoit]
$hImagemin = _GDIPlus_ImageLoadFromFile("data\min.png")
$hImagemin1 = _GDIPlus_ImageLoadFromFile("data\minhover.png")
$hImagemin2 = _GDIPlus_ImageLoadFromFile("data\minhover.png")$Min = GUICreate("Minimieren", 0, 0, 469,13,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($Min,$hImagemin,255)
GUISetState()
;Ende Minimier Button;Play Button
[/autoit] [autoit][/autoit] [autoit]
$hImageplay = _GDIPlus_ImageLoadFromFile("data\play.png")
$hImageplay1 = _GDIPlus_ImageLoadFromFile("data\playhover.png")
$hImageplay2 = _GDIPlus_ImageLoadFromFile("data\playhover.png")$Play = GUICreate("Play", 0, 0, 20,305,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($Play,$hImageplay,255)
GUISetState()
;Ende Play Button;Pause Button
[/autoit] [autoit][/autoit] [autoit]
$hImagepause = _GDIPlus_ImageLoadFromFile("data\pause.png")
$hImagepause1 = _GDIPlus_ImageLoadFromFile("data\pausehover.png")
$hImagepause2 = _GDIPlus_ImageLoadFromFile("data\pausehover.png")$Pause = GUICreate("Pause", 0, 0, 60,305,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($Pause,$hImagepause,255)
GUISetState()
;Ende Pause Button;Stop Button
[/autoit] [autoit][/autoit] [autoit]
$hImagestop = _GDIPlus_ImageLoadFromFile("data\stop.png")
$hImagestop1 = _GDIPlus_ImageLoadFromFile("data\stophover.png")
$hImagestop2 = _GDIPlus_ImageLoadFromFile("data\stophover.png")$Stop = GUICreate("Stop", 0, 0, 100,305,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($Stop,$hImagestop,255)
GUISetState()
;Ende Stop Button;Open Button
[/autoit] [autoit][/autoit] [autoit]
$hImageopen = _GDIPlus_ImageLoadFromFile("data\open.png")
$hImageopen1 = _GDIPlus_ImageLoadFromFile("data\openhover.png")
$hImageopen2 = _GDIPlus_ImageLoadFromFile("data\openhover.png")$Open = GUICreate("Open", 0, 0, 460,305,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($Open,$hImageopen,255)
GUISetState()
;Ende Open Button;Open Button
[/autoit] [autoit][/autoit] [autoit]
$hImagevolume = _GDIPlus_ImageLoadFromFile("data\volume.png")
$hImagevolume1 = _GDIPlus_ImageLoadFromFile("data\volumehover.png")
$hImagevolume2 = _GDIPlus_ImageLoadFromFile("data\volumemute.png")$VolumeBTN = GUICreate("Volume", 0, 0, 420,305,$WS_POPUP,BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD),$GUI)
[/autoit] [autoit][/autoit] [autoit]
SetBitmap($VolumeBTN,$hImagevolume,255)
GUISetState()
;Ende Open ButtonWhile 1
[/autoit] [autoit][/autoit] [autoit]
btnclose($Close,$hImageclose,$hImageclose1,$hImageclose2)
btnmin($Min,$hImagemin,$hImagemin1,$hImagemin2)
btnplay($Play,$hImageplay,$hImageplay1,$hImageplay2)
btnpause($Pause,$hImagepause,$hImagepause1,$hImagepause2)
btnstop($Stop,$hImagestop,$hImagestop1,$hImagestop2)
btnopen($Open,$hImageopen,$hImageopen1,$hImageopen2)
btnvolume($VolumeBTN,$hImagevolume,$hImagevolume1,$hImagevolume2)
$nMsg = GUIGetMsg()
Select
Case $nMsg = $GUI_EVENT_CLOSE
Exit
EndSelect
WEndGUIDelete($GUI)
[/autoit] [autoit][/autoit] [autoit];Bild aufbauen
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImageclose, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImagemin, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImageplay, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImagepause, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImagestop, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImageopen, $i)
Next
For $i = 0 To 255 Step 10
SetBitmap($GUI, $hImagevolume, $i)
Next; Release resources
[/autoit] [autoit][/autoit] [autoit]
_WinAPI_DeleteObject($hImageclose)
_WinAPI_DeleteObject($hImagemin)
_WinAPI_DeleteObject($hImageplay)
_WinAPI_DeleteObject($hImagepause)
_WinAPI_DeleteObject($hImagestop)
_WinAPI_DeleteObject($hImageopen)
_WinAPI_DeleteObject($hImagevolume)
_WinAPI_DeleteObject($hImage)
_GDIPlus_Shutdown()Func WM_NCHITTEST($hWnd, $iMsg, $iwParam, $ilParam)
[/autoit] [autoit][/autoit] [autoit]
If ($hWnd = $GUI) And ($iMsg = $WM_NCHITTEST) Then Return $HTCAPTION
EndFunc ;==>WM_NCHITTEST;Minimier Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnmin($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Exit
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Minimier Button Hover;Close Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnclose($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Exit
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Close Button Hover;Play Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnplay($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Exit
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Play Button Hover;Pause Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnpause($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Exit
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Pause Button Hover;Stop Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnstop($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Exit
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Stop Button Hover;Open Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnopen($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
$Song = FileOpenDialog("Bitte Musik Datei auswählen", @DesktopDir & "", "Musik Dateien(*.mp3;*.wav;*.wma;)",1)
_SoundPlay($Song)
SoundSetWaveVolume(5)
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Open Button Hover;Open Button Hover
[/autoit] [autoit][/autoit] [autoit]
func btnvolume($guicanset,$anh1,$anh2,$anh3)
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
Do
if event() then
Do
if hander()<>$guicanset then
SetBitmap($guicanset,$anh1,255)
Else
SetBitmap($guicanset,$anh3,255)
EndIf
Until not event()
if hander()=$guicanset then
SetBitmap($guicanset,$anh2,255)
SoundSetWaveVolume(0)
EndIf
EndIf
Until hander()<>$guicanset
SetBitmap($guicanset,$anh1,255)
EndIf
EndFunc
;Ende Open Button Hover;Funktion für Transparentes GUI
[/autoit] [autoit][/autoit] [autoit]
Func SetBitmap($hGUI, $hImage, $iOpacity)
Local $hScrDC, $hMemDC, $hBitmap, $hOld, $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend$hScrDC = _WinAPI_GetDC(0)
[/autoit] [autoit][/autoit] [autoit]
$hMemDC = _WinAPI_CreateCompatibleDC($hScrDC)
$hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)
$hOld = _WinAPI_SelectObject($hMemDC, $hBitmap)
$tSize = DllStructCreate($tagSIZE)
$pSize = DllStructGetPtr($tSize)
DllStructSetData($tSize, "X", _GDIPlus_ImageGetWidth($hImage))
DllStructSetData($tSize, "Y", _GDIPlus_ImageGetHeight($hImage))
$tSource = DllStructCreate($tagPOINT)
$pSource = DllStructGetPtr($tSource)
$tBlend = DllStructCreate($tagBLENDFUNCTION)
$pBlend = DllStructGetPtr($tBlend)
DllStructSetData($tBlend, "Alpha", $iOpacity)
DllStructSetData($tBlend, "Format", $AC_SRC_ALPHA)
_WinAPI_UpdateLayeredWindow($hGUI, $hScrDC, 0, $pSize, $hMemDC, $pSource, 0, $pBlend, $ULW_ALPHA)
_WinAPI_ReleaseDC(0, $hScrDC)
_WinAPI_SelectObject($hMemDC, $hOld)
_WinAPI_DeleteObject($hBitmap)
_WinAPI_DeleteDC($hMemDC)
EndFunc
;Ende Funktion für Transparentes GUI;Funktion für Button Hover
[/autoit] [autoit][/autoit] [autoit]
Func hander()
Local $iRet = DllCall("user32.dll", "int", "WindowFromPoint", "long", MouseGetPos(0), "long", MouseGetPos(1))
If IsArray($iRet) Then Return HWnd($iRet[0])
Return SetError(1, 0, 0)
EndFuncFunc event($sHexKey="01", $vDLL = $dll)
[/autoit]
Local $a_R = DllCall($vDLL, "short", "GetAsyncKeyState", "int", '0x' & $sHexKey)
If @error Then Return SetError(@error, @extended, False)
Return BitAND($a_R[0], 0x8000) <> 0
EndFunc
;Ende Funktion für Button HoverWo soll ich das einbauen für play/stop/pause? hab es zwar schon versucht in die jeweiligen function rein zu machen aber das funktioniert iwie nicht -.-
irgendwie geht nur das Fileopendialog lol.
Also nicht denken ich weis die funktion nicht NEIN! ich hab keine ahnung wo ich es sonst einbauen soll. -
Guten Morgen.
Habe mal wieder eine Frage.
Ist es möglich den Volume slider so zu bauen das er bei klick auf einen button als Popup erscheint? und beim weggehen der maus wieder verschwindet?Wenn nicht, geht es wenn man den Slider komplett custom macht? also aus eigenen bildern erstellt?
-
wenn man dazu php/mysql/html oder andere web sprachen wäre es kein problem da es ja eine facebook api gibt mit der das online sharing funktioniert.
Nur bin ich die ganze zeit am grübeln wie das funtzen soll wen man es über ein script macht^^
-
Hi leute.
Ich habe gerade einen gedanken gehabt.
Ist es möglich über ein Script eine Share funktion zu bauen?
z.B das Script ermittelt was du gerade machst. Und dann veröffentlicht es deine Aktion bei Facebook.z.B ich höre gerade ein lied und dann klick ich share und es veröffentlicht es auf fb....
Denke mal ihr wisst was ich meine...
-
Guten Morgen.
Als erstes , ja ich weis ich stell viel fragen =P
Also ich habe hier den Code für mein Icon Button.
[autoit]
[/autoit]
$Open = GUICtrlCreateIcon($ImageDir & 'open.ico', 300, 300, 60, 41)
GUICtrlSetOnEvent(-1, '_OpenTitle')Aber iwie zeigt der mir das nicht Transparent an lol?
Dann möchte ich noch ein Hover machen jedoch weis ich nicht wie ich das anstellen soll mit den Icons.
Im anhang ist das Icon.
-
Natürlich habe ich nicht nur Copy & Paste gemacht, jedoch manche Funktionen sind via Copy & Paste da ich sie nachschreiben wollte und etwas abändern wollte und es dann doch net geklappt hat.
Damit ihr ma seht was ich eigentlich mache:
-
Das Ding ist ja, das ich nicht wirklich den Perfekten Coderstil suche, sondern einfach nur anpassungen weil bei manchen GDI funktionen denk ich nur bahnhof.
Ich versuche es zu verstehen aber versteh es nicht wirklich, wenn ich denke die funktion is überflüssig und ich sie raus nehme , geht es nicht mehr^^.
Am besten wäre halt wenn sich jemand einen kurzen Moment (Jetz wo das Script eher klein gehalten ist) zeit nimmt und mir die Funktionen aufteilt und kommentiert... Sodass ich in der Zukunft weis was ich damals für Funktionen benutze.
Wenn ihr überzeugt werden wollt das es ein Größeres Projekt wird dann werde ich euch nur einen Screen des Projektes(nicht des Quellcodes) zeigen.
-
Guten Abend.
Ich hätte da eine Frage.
Könnte sich jemand evntl ein wenig zeit nehmen und mir helfen meinen Code anzupassen?
Ansich verstehe ich einiges in Autoit. Jedoch weis ich nicht genau ob die Codes so ok sind. Es gibt zwar keine Errors oder so jedoch möchte ich es ordentlicher gestalten, aber jedesmal wenn ich das versuche funktioniert etwas danach nicht mehr.Es wäre eine GROSSE Hilfe für mich wenn sich jemand die Zeit nimmt.
Das ding ist, ich möchte den Sourcecode nicht gerade Public machen zumindest jetzt noch nicht.... Daher könnte sich ja ein Erfahrener AutoITler bei mir melden.
Ich weis es ist etwas viel verlangt, jedoch wenn mein Projekt fertig ist werdet ihr sehen warum

Ich danke schonmal im voraus.
@Admin/Mod sollte das Thema an der Falschen stelle sein pls Moven
Mfg Slash