1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Jam00

Beiträge von Jam00

  • GUI für Shutdown

    • Jam00
    • 8. Februar 2009 um 20:19

    Was ist denn dein Problem?

  • UDF selber erstellen - mit String möglich?

    • Jam00
    • 8. Februar 2009 um 01:56

    dann musst du return nehmen, und dann benen den wert, der zurückgegeben werden soll! Dann gibt die funk das aus wenn du sie ausführst!

  • Listviewstyle als Miniaturansicht

    • Jam00
    • 7. Februar 2009 um 12:26

    Hä? Was ist den dein Problem? Dein Beispiel geht doch!

  • alle Items vom Treeview auflisten

    • Jam00
    • 7. Februar 2009 um 02:01

    Was ist denn das Problem bei meinem?

  • alle Items vom Treeview auflisten

    • Jam00
    • 7. Februar 2009 um 01:36

    Ist doch eig. ganz leicht oder? Also ich hab es so gemacht, da werden auch die SubItems angezeigt!

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <TreeViewConstants.au3>
    #include <WindowsConstants.au3>
    #Include <GuiTreeView.au3>

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

    #Region ### START Koda GUI section ### Form=
    $Form2 = GUICreate("Form1", 410, 443, 303, 219)
    $TreeView1 = GUICtrlCreateTreeView(27, 24, 190, 244)
    $TreeView1_0 = GUICtrlCreateTreeViewItem("Test", $TreeView1)
    $TreeView1_1 = GUICtrlCreateTreeViewItem("Unterelement", $TreeView1_0)
    $TreeView1_2 = GUICtrlCreateTreeViewItem("Test2", $TreeView1)
    $TreeView1_3 = GUICtrlCreateTreeViewItem("Test3", $TreeView1)
    $Button1 = GUICtrlCreateButton("Items", 138, 282, 75, 25, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    _Items($TreeView1)
    EndSwitch
    WEnd
    Func _Items($hTree)
    For $A = 1 To _GUICtrlTreeView_GetCount($hTree)
    $Text = _GUICtrlTreeView_GetText($hTree,$A +3)
    MsgBox (0,"",$Text)
    Next
    EndFunc

    [/autoit]

    EDIT:
    Update, so kann man die Unterelemente auch erkenne, also das es unterelemente sind!

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <TreeViewConstants.au3>
    #include <WindowsConstants.au3>
    #Include <GuiTreeView.au3>

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

    #Region ### START Koda GUI section ### Form=
    $Form2 = GUICreate("Form1", 410, 443, 303, 219)
    $TreeView1 = GUICtrlCreateTreeView(27, 24, 190, 244)
    $TreeView1_0 = GUICtrlCreateTreeViewItem("Test", $TreeView1)
    $TreeView1_1 = GUICtrlCreateTreeViewItem("Unterelement", $TreeView1_0)
    $TreeView1_2 = GUICtrlCreateTreeViewItem("Test2", $TreeView1)
    $TreeView1_3 = GUICtrlCreateTreeViewItem("Test3", $TreeView1)
    $TreeView1_4 = GUICtrlCreateTreeViewItem("Test4", $TreeView1)
    $Button1 = GUICtrlCreateButton("Items", 138, 282, 75, 25, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    _Items($TreeView1)
    EndSwitch
    WEnd
    Func _Items($hTree)
    For $A = 1 To _GUICtrlTreeView_GetCount($hTree)
    $Text = _GUICtrlTreeView_GetTree($hTree, $A +3)
    MsgBox (0,"",$Text)
    Next
    EndFunc

    [/autoit]
  • GDI+

    • Jam00
    • 7. Februar 2009 um 01:18

    funkey
    Ich hatte das Problem immer, wenn ich mit GDI+ einen .png anzeige! Das hilft mir bestimmt, wenn es geht :D habs nich nit probiert

  • Desktop Radio 3.9

    • Jam00
    • 7. Februar 2009 um 00:52

    Also Deepred das ist echt super! Bei mir lauft es die ganze Zeit mit, und ich höre Radio!
    Ich find den Neuen stayle ganz cool, nur im minyplayer find ich die titelleiste nicht so gut, aber sonst spitze!

  • Runder Button

    • Jam00
    • 6. Februar 2009 um 17:38

    Oh, ich hab einen Pfad falsch angegeben!
    Du musst in Zeile 10 einfach beim Pfad noch \Data hinzufügen, hab es jetzt auch bei dem Link in Post33 auch aktualieseirt (Code und Rar)

    EDIT:
    Da ist noch ein Problem, manchmal auch wenn ich nichts anklicke führt er einen Button direckt nach dem Start aus, weiß jemand warum?

  • Runder Button

    • Jam00
    • 6. Februar 2009 um 17:18

    Okay, hab es hinbekommen, ich hab es schonmal gepostet und zwar hier .

  • Runde Buttons

    • Jam00
    • 6. Februar 2009 um 17:16

    Ich hab es jetzt so gemacht:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>

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

    Dim $Button[2],$Icon[2]
    #Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Hendrik\Favoriten\Eigene Dateien\AutoIt\Übungen\XSkin\Oberfläche\XSkin.kxf
    $Titel = "INC"
    $Form2 = GUICreate($Titel, 555, 532, 303, 219,$WS_POPUP)
    GUISetBkColor (0x00FF00)
    $Pic1 = GUICtrlCreatePic(@ScriptDir & "\Data\1.bmp", 0, 0, 555, 532, $WS_CLIPSIBLINGS)
    $Label1 = GUICtrlCreateLabel(" "& $Titel, 0, 0, 555, 32,$WS_EX_TRANSPARENT, $GUI_WS_EX_PARENTDRAG)
    GUICtrlSetBkColor (-1,$GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetColor (-1,0xFF0A000)
    GUICtrlSetFont (-1,12,550,0,"Arial")
    $Button[0] = GUICreate("", 16, 16, 525, 3, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $Form2);
    $Icon[0] = GUICtrlCreatePic(@ScriptDir & "\Data\X.gif",0, 0, 16, 16, BitOR($SS_NOTIFY,$WS_GROUP))
    $Button[1] = GUICreate("", 16, 16, 500, 3, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $Form2);
    $Icon[1] = GUICtrlCreatePic(@ScriptDir & "\Data\_.gif",0, 0, 16, 16, BitOR($SS_NOTIFY,$WS_GROUP))
    DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Form2, "int", 400, "long", 0x00040010);Slide von unten ein
    GUISetState(@SW_SHOW,$Button[0])
    GUISetState(@SW_SHOW,$Button[1])
    GUISetState(@SW_SHOW,$Form2)
    #EndRegion ### END Koda GUI section ###
    Dim $Pfad[2][2],$Status[2]
    $Pfad[0][0] = @ScriptDir & "\Data\X.gif"
    $Pfad[0][1] = @ScriptDir & "\Data\X1.gif"
    $Pfad[1][0] = @ScriptDir & "\Data\_.gif"
    $Pfad[1][1] = @ScriptDir & "\Data\_1.gif"
    $Status[0] = False
    $Status[1] = False
    _Ecken($Form2,0,0,10,10)
    Sleep (100)
    While 1
    $iOldOpt = Opt("MouseCoordMode", 2)
    $aPos = MouseGetPos()
    $aPos3 = WinGetPos($Form2)
    For $A = 0 To 1
    $aPos2 = WinGetPos($Button[$A])
    If IsArray ($aPos2) Then
    $Point = _PointInEllipse($aPos[0], $aPos[1],$aPos2[0] - $aPos3[0] , $aPos2[1] - $aPos3[1], 16, 16)
    _Pic($Icon[$A],$A)
    EndIf
    Next
    Opt("MouseCoordMode", $iOldOpt)
    $MSG = GUIGetMsg (1)
    Switch $MSG[1]
    Case $Button[0]
    GUIDelete ($Button[0])
    GUIDelete ($Button[1])
    DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Form2, "int", 400, "long", 0x00050010);Slide nach unten aus
    Exit
    Case $Button[1]
    GUISetState(@SW_MINIMIZE)
    EndSwitch
    WEnd
    Func _Ecken($h_win, $i_x1, $i_y1, $i_x3, $i_y3)
    Local $XS_pos, $XS_ret, $XS_ret2
    $XS_pos = WinGetPos($h_win)
    $XS_ret = DllCall("gdi32.dll", "long", "CreateRoundRectRgn", "long", $i_x1, "long", $i_y1, "long", $XS_pos[2], "long", $XS_pos[3], "long", $i_x3, "long", $i_y3)
    If $XS_ret[0] Then
    $XS_ret2 = DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $h_win, "long", $XS_ret[0], "int", 1)
    EndIf
    EndFunc ;==>_GuiRoundCorners
    Func _PointInEllipse($xPt, $yPt, $xTL, $yTL, $w, $h)
    Local $bInside = False, $a = $w / 2, $b = $h / 2
    Local $c1X, $c2X, $dist, $xc = $xTL + $a, $yc = $yTL + $b
    $c1X = $xc - ($a ^ 2 - $b ^ 2) ^ (1 / 2); 1st focal point x position
    $c2X = $xc + ($a ^ 2 - $b ^ 2) ^ (1 / 2); 2nd focal point x position
    $dist = (($xPt - $c1X) ^ 2 + ($yPt - $yc) ^ 2) ^ 0.5 + (($xPt - $c2X) ^ 2 + ($yPt - $yc) ^ 2) ^ 0.5
    If $dist <= $w Then $bInside = Not $bInside
    Return $bInside
    EndFunc ;==>_PointInEllipse
    Func _Pic($hHandel,$Zahl)
    If $Status[$Zahl] <> $Point Then
    $Status[$Zahl] = $Point
    If $Status[$Zahl] = True Then
    GUICtrlSetImage ($hHandel,$Pfad[$Zahl][1])
    ElseIf $Status[$Zahl] = False Then
    GUICtrlSetImage ($hHandel,$Pfad[$Zahl][0])
    EndIf
    EndIf
    EndFunc

    [/autoit]


    Ich mach nochmal Alles in ein Rar

    EDIT:
    War noch ein Fehler drin, hab ich jetzt behoben!

  • hilfe mit _ispressed

    • Jam00
    • 6. Februar 2009 um 14:12

    Schon mal was von UDF-Hilfe gehört?
    Mach wenigstens ein Beispielscript und sag genau was du nicht kanst!

  • Desktop Radio 3.9

    • Jam00
    • 6. Februar 2009 um 13:39

    @Deepred
    Jo, das ist super!!
    Wie bekommts du es hin das die Gui gelöscht wird? Wenn ich GuiDelet nehme beendet sich immer das ganze script :(

  • Runde Buttons

    • Jam00
    • 6. Februar 2009 um 13:35

    funkey
    Ja das ist schon ganz schön! Ich gucke mal ob ich das nehmen, wenn ich das mit der Transparent bei mir nicht richtig hinbekomme!

  • Runder Button

    • Jam00
    • 6. Februar 2009 um 13:27

    Ich hab jetzt noch ein Problem:
    Ich hab es jetzt mit Icon gemacht, aber da hab ich das Problem, das dass Pic da wo es transparent ist die Hintergrundfarbe zeigt, ich brauche aber das er das Pic zeigt was darunter ist!
    Ich habe mal Probier das Pic was darunter ist erst zu erstellen, und das ging nicht, dann hab ich Probiert es danch zu erstellen, aber das hat auch nicht fucktionier!
    Ich mache es mal in den Dateianhang!
    THX an alle :thumbup:

  • Runder Button

    • Jam00
    • 5. Februar 2009 um 21:19

    Eistee
    Okay danke

  • Maße eines Bildes

    • Jam00
    • 5. Februar 2009 um 18:06

    Mit GDI+!

  • Desktop Radio 3.9

    • Jam00
    • 5. Februar 2009 um 16:24

    Ich hab noch ein Parr Ideen:
    Ich fände es gut wenn es im MiniPlayer auch noch eine Lautstärkeregelung gäbe und du könntest es noch machen, das wenn man Play drückt der Button anders ausieht, und wenn man stop drückt eben der Play-Button wieder normal aussieht, und gauso mit dem OK button, das der nur aklcikbar ist wenn man einen Anderen sender ausgewählt hat als den der gerad lauft!

  • Runder Button

    • Jam00
    • 5. Februar 2009 um 16:14

    @Padmak
    upsa :whistling:
    Ne, ich kann nicht gut englisch, aber die, hab es einfach auf deutsch geschreiben und dann per Google übersetzt ^^ Die haben kapiert was ich meine!
    Und die Gui ist nur ein Test :evil:

    EDIT:
    Hab jetzt einfach per Ico gemacht:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>

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

    $hWin = GUICreate("Test", 200, 200)
    GUISetBkColor(0x00FF00, $hWin)

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

    $hPic = GUICtrlCreateIcon("button.ico",0, 90, 90, 35, 35)

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

    GUISetState()

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

    While 1

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

    $iMsg = GUIGetMsg()

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

    Switch $iMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $hPic
    $iOldOpt = Opt("MouseCoordMode", 2)
    $aPos = MouseGetPos()
    If _PointInEllipse($aPos[0], $aPos[1], 90, 90, 21, 21) Then MsgBox(0, "", "Hit")
    Opt("MouseCoordMode", $iOldOpt)
    EndSwitch

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

    WEnd

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

    Func _PointInEllipse($xPt, $yPt, $xTL, $yTL, $w, $h)
    Local $bInside = False, $a = $w / 2, $b = $h / 2
    Local $c1X, $c2X, $dist, $xc = $xTL + $a, $yc = $yTL + $b
    $c1X = $xc - ($a ^ 2 - $b ^ 2) ^ (1 / 2); 1st focal point x position
    $c2X = $xc + ($a ^ 2 - $b ^ 2) ^ (1 / 2); 2nd focal point x position
    $dist = (($xPt - $c1X) ^ 2 + ($yPt - $yc) ^ 2) ^ 0.5 + (($xPt - $c2X) ^ 2 + ($yPt - $yc) ^ 2) ^ 0.5
    If $dist <= $w Then $bInside = Not $bInside
    Return $bInside
    EndFunc ;==>_PointInEllipse

    [/autoit]
  • Runder Button

    • Jam00
    • 5. Februar 2009 um 16:04

    Das bild ist aus dem Englischen Forum, bei dem Geht es uach, denn da hab ich auch gefragt, woran das liegen könnte, und der hat das Bild hochgeladen!

    EDIT:
    Das hat der Programierer gerad dazu gesagt:
    But it is transparent for me! I presume you are using XP while I am on Vista - perhaps that is the difference. Can you get hold of any other .gifs with a transparent background to try? Perhaps mine did not travel well (joke!).

    EDIT2:
    @progandy
    Dein script ist auch gut!! Vor allem weil man damit auch Button rund bekommt! Allerdings ist für das was ich bruache Pic besser, deswegen nehme ich das aus dem Englischen Forum!

  • Ping funktion sendet immer eine Ping zeit zurück

    • Jam00
    • 5. Februar 2009 um 15:58

    Irgendwie geht das mit @error jetzt bei mir doch :wacko:

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™