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. Floooooo24

Beiträge von Floooooo24

  • Switch Bitmap Flackert beim Deaktivieren

    • Floooooo24
    • 24. November 2022 um 13:32

    Guten Tag zusammen,

    ich bin dabei über eine Checkbox eine Bitmap zulegen, mit dem Befehl: _GUICtrlButton_SetImageList. Das klappt auch so weit.

    Ich habe nur folgendes Problem:

    Wenn die Checkbox den Status : "Unchecked" hat, und ich sie mit dem Befehl: _GUICtrlButton_Enable($gSwitch, False) deaktiviere, dann verschwindet meine Bitmap kurz, bevor die nächste erscheint.

    Bei allen anderen Änderungen passiert das nicht.

    Hier ist ein Beispiel Code:

    C
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Add_Constants=n
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    
    ;Funktionen
    #include <GDIPlus.au3>
    #include <GuiImageList.au3>
    #include <GuiButton.au3>
    
    
    ;Constanten
    #include <AutoItConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <ButtonConstants.au3>
    #include <GDIPlusConstants.au3>
    ;----------------------------------------------------------------------------
    ;Create Main-GUI
    ;----------------------------------------------------------------------------
    
    Global $hGUI = GUICreate(@ScriptName, 300, 330, -1, -1, $WS_POPUP+$WS_BORDER)
    
    ;Fenstergröße bestimmen
    Local $aWinPos = WinGetPos($hGUI)
    Global $GUI_Width = $aWinPos[2]
    Global $GUI_Height = $aWinPos[3] - 30 ;Wegen der Titelbar 30 abziehen
    
    GUISetBkColor(0x13161F, $hGUI)
    GUISetState(@SW_SHOW, $hGUI)
    
    
    Local $gButton = GUICtrlCreateButton("x", $aWinPos[2]-50,0, 50,30) ;Close Button
    Local $gButton2 = GUICtrlCreateButton("Disable", 120,50, 100,30) ;
    
    Local $gSwitch = CreateSwitch("Allgemein", 50,50, 60,30, 0xFF13161F, 0xFF00A000, 0xFFFFFFFF)
    
    
    
    ;----------------------------------------------------------------------------
    ;Design GUI
    ;----------------------------------------------------------------------------
    While 1 ;Endlosschleife
        Switch GUIGetMsg() ;Empfängt alle klicks auf Buttons und verarbeitet diese
            Case $GUI_EVENT_CLOSE, $gButton ;Kreuz oben rechts
                GUIDelete($hGUI)
                Exit 0 ;beendet das Skript
            ;--------------------------------------------------------------------
            ;Buttons
            ;--------------------------------------------------------------------
    
            Case $gButton2
                GUICtrlSetData($gButton2, "Enable")
                If Not ControlCommand($hGUI, "", $gSwitch, "IsEnabled") Then
                    _GUICtrlButton_Enable($gSwitch, True)
                Else
                    _GUICtrlButton_Enable($gSwitch, False)
                EndIf
    
        EndSwitch
    WEnd
    
    
    Func CreateSwitch($sText, $iLeft,$iTop, $iWidth=90,$iHeight=40, $iBKColor = 0xFFFFFFFF, $iColorAkzent = 0xFF00A000, $iTxtColor = 0xFF000000, $iState = 15, $iFontSize = 8.5, $sFont = "Arial", $iAlign = 1, $iFontStyle = 0)
        Local $gButton = GUICtrlCreateCheckbox("", $iLeft, $iTop, $iWidth, $iHeight, $BS_BITMAP) ;Erstellt einen Button mit den Parametern des Nutzers
        GUICtrlSetBkColor(-1, "0x" & StringRight(Hex($iBKColor), 6))
    
        Local $hBitmapWithText[8]
        _GDIPlus_Startup()
    
        ;Bitmaps erstellen
        If IsArray($iBKColor) Then
            For $i = 0 To UBound($hBitmapWithText)-1
                If IsPtr($iBKColor[$i]) Then
                    $hBitmapWithText[$i] = $iBKColor[$i]
                Else
                    $hBitmapWithText[$i] = _GDIPlus_CreateSwitchBmp($iWidth, $iHeight, $iBKColor[$i], $sText, $iTxtColor, $iState, 0xFFFFFFFF, $iFontSize,$sFont,$iAlign,$iFontStyle) ;Standart-Farbe
                EndIf
            Next
        Else
            $hBitmapWithText[0]  = _GDIPlus_CreateSwitchBmp($iWidth, $iHeight, $iBkColor,  $iColorAkzent, $sText, $iTxtColor, 128, 0xFFFFFFFF, $iFontSize,$sFont,$iAlign,$iFontStyle) ;Standart-Farbe (unchecked)
            $hBitmapWithText[1]  = _GDIPlus_CreateSwitchBmp($iWidth, $iHeight, $iBkColor,  $iColorAkzent, $sText, $iTxtColor, 129, 0xFFFFFFFF, $iFontSize,$sFont,$iAlign,$iFontStyle) ;Hover-Over (unchecked)
            $hBitmapWithText[2]  = _GDIPlus_CreateSwitchBmp($iWidth, $iHeight, $iBkColor,  $iColorAkzent, $sText, $iTxtColor, 130, 0xFFFFFFFF, $iFontSize,$sFont,$iAlign,$iFontStyle) ;Pressed (State bevor: unchecked)
            $hBitmapWithText[3]  = _GDIPlus_CreateSwitchBmp($iWidth, $iHeight, $iBkColor,  $iColorAkzent, $sText, $iTxtColor, 192, 0xFFFFFFFF, $iFontSize,$sFont,$iAlign,$iFontStyle) ;Disabled
            $hBitmapWithText[4]  = _GDIPlus_CreateSwitchBmp($iWidth, $iHeight, $iBkColor,  $iColorAkzent, $sText, $iTxtColor, 260, 0xFFFFFFFF, $iFontSize,$sFont,$iAlign,$iFontStyle) ;Standart-Farbe (checked)
            $hBitmapWithText[5]  = _GDIPlus_CreateSwitchBmp($iWidth, $iHeight, $iBkColor,  $iColorAkzent, $sText, $iTxtColor, 264, 0xFFFFFFFF, $iFontSize,$sFont,$iAlign,$iFontStyle) ;Hover-Over (checked)
            $hBitmapWithText[6]  = _GDIPlus_CreateSwitchBmp($iWidth, $iHeight, $iBkColor,  $iColorAkzent, $sText, $iTxtColor, 272, 0xFFFFFFFF, $iFontSize,$sFont,$iAlign,$iFontStyle) ;Pressed (State bevor: checked)
            $hBitmapWithText[7]  = _GDIPlus_CreateSwitchBmp($iWidth, $iHeight, $iBkColor,  $iColorAkzent, $sText, $iTxtColor, 352, 0xFFFFFFFF, $iFontSize,$sFont,$iAlign,$iFontStyle) ;Disabled
        EndIf
    
        ;ImageList erstellen
        Local $gImageList = _GUIImageList_Create($iWidth, $iHeight, 5, 3, UBound($hBitmapWithText)-1) ;Erstellt eine Imagelist und scaliert dann alle Bilder auf die Maße des Buttons
        For $i = 0 To UBound($hBitmapWithText)-1 ;Befüllt die Imagelist mit den gewählten Icons aus der zuvor erstellten ".dll"
            Local $test = _GUIImageList_Add($gImageList, $hBitmapWithText[$i])
        Next
    
        ;Button erstellen abschliesen
        _GUICtrlButton_SetImageList($gButton, $gImageList, 1, 0,0,0,0) ;weißt die Imagelist dem Button zu
        _GDIPlus_Shutdown()
        Return $gButton ;gibt den Handel zum Button zurück
    EndFunc
    
    Func _GDIPlus_CreateSwitchBmp($iW, $iH, $iBkColor = 0xFFFFFFFF, $iColorAkzent = 0xFF00A000, $sTXT = "", $iTxtColor = 0xFF000000, $iState = 0, $iStateColor = 0xFFFFFFFF, $iFontSize = 8.5, $sFont = "Arial", $iAlign = 1, $iFontStyle = 0)
        Local $hBitmap = DllCall($__g_hGDIPDll, "uint", "GdipCreateBitmapFromScan0", "int", $iW, "int", $iH, "int", 0, "int", $GDIP_PXF32ARGB, "ptr", 0, "int*", 0) ;Erstellt irgendwie eine Bitmap und gibt dazu eineige Infos mit aus
        $hBitmap = $hBitmap[6] ;Nimmt nur das was gebraucht wird.
    
        Local $hBmpCtxt = _GDIPlus_ImageGetGraphicsContext($hBitmap) ;erstellt ein Handel zu einem Graphic object basierend auf der erstellten Bitmap
    
    
        _GDIPlus_GraphicsSetSmoothingMode($hBmpCtxt, 2)
    
        ;Erstellt die benötigten Objekt-Tools
        ;Brusches
         Local $hBrushBackground = _GDIPlus_BrushCreateSolid($iBkColor) ;Pinsel Hintergrund
         Local $hBrushAkzent = _GDIPlus_BrushCreateSolid(0xFF606060) ;Pinsel Aktzent Farbe
         Local $hBrushWhite = _GDIPlus_BrushCreateSolid(0xFFFFFFFF) ;Pinsel White
        ;Pens
         Local $hPenBoarder = _GDIPlus_PenCreate($iStateColor, 1) ;Erstellt einen Stift, er wird später ggf. dicker gemacht
         Local $hPen = _GDIPlus_PenCreate($iStateColor, 1) ;Erstellt einen Stift
        ;Fonts for Text
         Local $hFormat = _GDIPlus_StringFormatCreate() ;Format
         Local $hFamily = _GDIPlus_FontFamilyCreate($sFont) ;Font Family
         Local $hFont = _GDIPlus_FontCreate($hFamily, $iFontSize, $iFontStyle) ;Font
         Local $tLayout = _GDIPlus_RectFCreate($iH, $iH / 2 - ($iFontSize / 1.3), $iW-$iH, $iH) ;Rechteck in dem der String kommt
         _GDIPlus_StringFormatSetAlign($hFormat, $iAlign) ;Ausrichtung
    
        ;zeichnen der Bitmap
        ;Hintergrund
        _GDIPlus_GraphicsFillRect($hBmpCtxt, -1,-1, $iW+1,$iH+1, $hBrushBackground)
    
        ;State dependig modifications
        If BitAND($iState, 1) = 1 Then _GDIPlus_BrushSetSolidColor($hBrushAkzent, 0xFF808080) ;setzt die Akzent farbe etwas Heller als Grau
        If BitAND($iState, 2) = 2 Then _GDIPlus_BrushSetSolidColor($hBrushAkzent, 0xFF707070) ;setzt die Akzent farbe auf die angegebene Akzentfarbe
        If BitAND($iState, 4) = 4 Then _GDIPlus_BrushSetSolidColor($hBrushAkzent, $iColorAkzent) ;setzt die Akzent farbe auf die angegebene Akzentfarbe
        If BitAND($iState, 8) = 8 Then _GDIPlus_BrushSetSolidColor($hBrushAkzent, GetChangeColor($iColorAkzent, 0x00202020, False)) ;setzt die Akzent farbe auf die angegebene Akzentfarbe
        If BitAND($iState, 16) = 16 Then _GDIPlus_BrushSetSolidColor($hBrushAkzent, GetChangeColor($iColorAkzent, 0x00101010, False)) ;setzt die Akzent farbe auf die angegebene Akzentfarbe
        If BitAND($iState, 32) = 32 Then _GDIPlus_BrushSetSolidColor($hBrushAkzent, GetChangeColor($iColorAkzent, 0x00404040, True)) ;setzt die Akzent farbe auf die angegebene Akzentfarbe
    
        $iW -=2
        $iH -=2
    
        _GDIPlus_GraphicsFillEllipse($hBmpCtxt, 0,0, $iH,$iH, $hBrushAkzent)
        _GDIPlus_GraphicsFillRect($hBmpCtxt, ($iH/2),0, $iW-$iH,$iH, $hBrushAkzent)
        _GDIPlus_GraphicsFillEllipse($hBmpCtxt, $iW-$iH,0, $iH,$iH, $hBrushAkzent)
    
        If BitAND($iState, 64) = 64 Then _GDIPlus_BrushSetSolidColor($hBrushWhite, 0xFFA0A0A0) ;setzt die Punkt Farbe Grauer
        If BitAND($iState, 128) = 128 Then _GDIPlus_GraphicsFillEllipse($hBmpCtxt, $iW/20,$iH/10, $iH-$iH/5,$iH-$iH/5, $hBrushWhite) ;Zeichnet den linken Punkt
        If BitAND($iState, 256) = 256 Then _GDIPlus_GraphicsFillEllipse($hBmpCtxt, $iW-$iW/20-($iH-$iH/5),$iH/10, $iH-$iH/5,$iH-$iH/5, $hBrushWhite) ;Zeichnet den Rechten Punkt
    
        ;Erstellt das Handle zu dem Objekt
        Local $hHBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap)
    
        ;löscht alle nicht mehr benötigten Objekte
        _GDIPlus_FontDispose($hFont)
        _GDIPlus_FontFamilyDispose($hFamily)
        _GDIPlus_StringFormatDispose($hFormat)
        _GDIPlus_BrushDispose($hBrushAkzent)
        _GDIPlus_BrushDispose($hBrushWhite)
        _GDIPlus_GraphicsDispose($hBmpCtxt)
        _GDIPlus_BitmapDispose($hBitmap)
    
        ;rückgabe des handels
        Return $hHBitmap
    EndFunc
    
    Func GetChangeColor($hexColor, $hexOffset, $bDarker = True)
    
        Local $iColorLen = StringLen(Hex($hexColor))
        Local $iOffsetLen = StringLen(Hex($hexOffset))
    
        ;Color
        Local $iRed = Dec(StringMid(Hex($hexColor), $iColorLen-5, 2))
        Local $iGrn = Dec(StringMid(Hex($hexColor), $iColorLen-3, 2))
        Local $iBlu = Dec(StringMid(Hex($hexColor), $iColorLen-1, 2))
        Local $iAlpha = -1
        If $iColorLen = 8 Then Local $iAlpha = Dec(StringMid(Hex($hexColor), $iColorLen-7, 2))
    
        ;Offset
        Local $iRedOffset = Dec(StringMid(Hex($hexOffset), $iOffsetLen-5, 2))
        Local $iGrnOffset = Dec(StringMid(Hex($hexOffset), $iOffsetLen-3, 2))
        Local $iBluOffset = Dec(StringMid(Hex($hexOffset), $iOffsetLen-1, 2))
        Local $iAlphaOffset = -1
        If $iOffsetLen = 8 Then Local $iAlphaOffset = Dec(StringMid(Hex($hexOffset), $iOffsetLen-7, 2))
    
        If $bDarker Then
            ;Darker Color
            $iRed -= $iRedOffset
            $iGrn -= $iGrnOffset
            $iBlu -= $iBluOffset
            If $iAlpha <> -1 And $iAlphaOffset <> -1 Then $iAlpha -= $iAlphaOffset
        Else
            ;Brighter Color
            $iRed += $iRedOffset
            $iGrn += $iGrnOffset
            $iBlu += $iBluOffset
            If $iAlpha <> -1 And $iAlphaOffset <> -1 Then $iAlpha += $iAlphaOffset
        Endif
    
        Local $hexResult
        If $iAlpha <> -1 Then
            $hexResult = "0x" & Hex(ColorBorder($iAlpha), 2) & Hex(ColorBorder($iRed), 2) & Hex(ColorBorder($iGrn), 2) & Hex(ColorBorder($iBlu), 2)
        Else
            $hexResult = "0x" & ColorBorder($iRed) & ColorBorder($iGrn) & ColorBorder($iBlu)
        EndIf
    
        Return $hexResult
    EndFunc
    
    Func ColorBorder($iColor)
        If $iColor > 255 Then $iColor = 255
        If $iColor < 0 Then $iColor = 0
    
        Local $sResult = ""
        If $sResult < 10 Then $sResult = "0"
        $sResult &= String($iColor)
    
        Return $sResult
    EndFunc
    Alles anzeigen
  • To Wert einer For-Schleife bearbeiten

    • Floooooo24
    • 10. Oktober 2022 um 10:51

    Klingt definitv Sinnvoll, Danke

  • To Wert einer For-Schleife bearbeiten

    • Floooooo24
    • 10. Oktober 2022 um 10:41

    Danke, dachte ich es mir doch das es eine Sinnvollere Lösung gibt

  • To Wert einer For-Schleife bearbeiten

    • Floooooo24
    • 10. Oktober 2022 um 10:14

    Guten Morgen zusammen,

    ist es möglich den am Anfang der For-Schleife festegelegten Ziel Wert zu bearbeiten?

    Mein Problem ist, das ich ein Array habe, das ich durchsuche und ggf. Zeile lösche. Allerdings nehme ich das als ziel wert.

    Gibt es noch andere Wege, als diesen hier:

    C
    #include <Array.au3>
    #include <_Dbug.au3> ;Debugger
    
    Local $aArray[16] = [0, 1, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1]
    Local $x
    
    _ArrayDisplay($aArray)
    
    For $i = 0 To Ubound($aArray) - 1
        $i -= $x
        If $aArray[$i] = 1 Then
            _ArrayDelete($aArray, $i)
            $i -= 1
            $x += 1
        EndIf
        $i += $x
    Next
    _ArrayDisplay($aArray)
    Alles anzeigen
  • AdlibRegister sinnvoll einsetzen

    • Floooooo24
    • 13. Juni 2022 um 12:58

    Guten Tag,

    ich hab ein skript geschrieben, welches eine Fehlerdatenbank verwaltet. Darin brauche ich einige abfragen, welche ich immer wieder überprüfen muss.

    Bisher habe ich diese einfach in der Haupt While-Schleife geschrieben, was auch funktioniert. Ich habe allerdings in einem anderen Thema gelesen, das man besser für so was AdlibRegister verwenden soll.

    Da es aber sehr viele solcher abfragen sind, ist das sinnvoll? Und welche Zeiten machen dafür Sinn, das der Nutzer nicht bemerkt, das da ein moment vergeht.

    Mit freundlichen Grüßen

    Flo

  • Guis Buggen in einander

    • Floooooo24
    • 24. Mai 2022 um 13:54

    Guten Tag zusammen,

    Danke für eure ganze Hilfen. Die $ParentGUI habe ich ergänz, aber ich glaube tatsächlich, dass das Problem wo danders liegt:

    Ich habe einen Dbugger in das Programm eingebunden, welcher wohl ein paar Probleme macht, zumindest in einem anderen skript, bei dem ich durch zufall drauf gekommen bin.

    Dort sind beim verwenden von GUICtrlSetGraphic() immer wieder Programmzeilen nicht richtig ausgeführt worden.

    hier fehlt zum Beispiel ein Bezier und eine Line, welche dann durch das schließen der Form ersetzt wurde.

    Erst als ich den Debugger am Anfang nicht stoppen lies gab es keine Probleme mehr.

    Kennt ihr einen guten Debugger, der nicht solche probleme hat?

    Gruß Flo

  • Guis Buggen in einander

    • Floooooo24
    • 10. Mai 2022 um 14:44

    Ich werde es so bald ich kann ausprobieren.

    Die _Metro_CreateGUI weicht etwas von der GUICreate ab:

    Code
    ; #FUNCTION# ====================================================================================================================
    ; Name ..........: _Metro_CreateGUI
    ; Description ...: Creates a modern borderless GUI with the colors of the selected theme.
    ; Syntax ........: _Metro_CreateGUI($Title, $Width, $Height[, $Left = -1[, $Top = -1[, $AllowResize = False[, $ParentGUI = ""]]]])
    ; Parameters ....: $Title               - Title of the window
    ;                  $Width               - Width
    ;                  $Height              - Height
    ;                  $Left                - [optional] Window pos X. Default is -1.
    ;                  $Top                 - [optional] Window pos Y. Default is -1.
    ;                  $AllowResize         - [optional] True/False. Default is False. ;Enables resizing + drag move for the gui.
    ;                  $ParentGUI           - [optional] Handle to the parent gui. Default is "".
    ; Return values .: Handle to the created gui
    ; Example .......: _Metro_CreateGUI("Example", 500, 300, -1, -1, True)
    ; ===============================================================================================================================
    Func _Metro_CreateGUI($Title, $Width, $Height, $Left = -1, $Top = -1, $AllowResize = False, $ParentGUI = "")
    Alles anzeigen
  • Guis Buggen in einander

    • Floooooo24
    • 10. Mai 2022 um 13:18

    hi,

    Danke für die hilfe.

    Ich hab vergessen, zu erwähnen, das ich die UDF verwende. Eure Vermutung, das dort GuiSwitch( fehlt ist richtig. es müsste doch ausreichen, wenn ich das selbst in meinem Code mache richtig?GrußFlo

  • Guis Buggen in einander

    • Floooooo24
    • 10. Mai 2022 um 10:22

    Ich habe @SW_Show/@SW_Hide verwendet, da die zweite GUI komplett verschwinden soll, was @SW_Disable nicht macht, wenn ich es richtig verstanden habe

  • Guis Buggen in einander

    • Floooooo24
    • 10. Mai 2022 um 10:10

    So wirklich hat mir das leider nicht geholfen, aber danke.

    gibt es noch weitere Ideen was ich falsch gemacht haben könnte?

  • Guis Buggen in einander

    • Floooooo24
    • 10. Mai 2022 um 09:15

    Guten Morgen zusammen,

    Ich habe das Problem, das bei mir ab und zu zwei GUIs aus einem Skript in einander buggen. das sieht dan so aus:

    Gui bug.png

    eigentlich sollte es so aussehen:

    pasted-from-clipboard.png

    die Zweite GUI sollte am anfang eigentlich versteckt sein, wesshalb ich sie auch am Anfang geziehlt verstecke mit dem Befehlt:

    pasted-from-clipboard.png

    Code
    GUISetState(@SW_HIDE, $hNewError)

    da ich mir nicht sicher bin, ob es sinnvoll ist die 1000 zeilen code die das gesamte Programm hat, erstmal nur der teil in dem die zweite GUI erstellt wird:

    Code
    ;----------------------------------------------------------------------------
    ;Create New Error-GUI
    ;----------------------------------------------------------------------------
    
    ;GUI create
    Local $hNewError = _Metro_CreateGUI("New Error", 500, 300, -1, -1, True) ;Erstellt die GUI
    GUISetState(@SW_HIDE, $hNewError) ;Versteckt die GUI $hNewError
    
    ;Create Control-Buttons (oben rechts)
    Local $Control_Buttons = _Metro_AddControlButtons(True, False, False, False, False)
    
    ;create Gui flags
    Local $GUI_CLOSE_BUTTON_NewError = $Control_Buttons[0]
    
    ;----------------------------------------------------------------------------
    ;Design New Error-GUI
    ;----------------------------------------------------------------------------
    
    ;Create Treeview
    Local $gTreeview_New = GUICtrlCreateTreeView(0 + $hGUI_OffsetX, 10 + $hGUI_OffsetY, 200, 250) ;Erstellt eine Treelist
    GUICtrlSetBkColor($gTreeview_New, "0x" & Int(StringRight($GUIThemeColor, 6)) + 052005) ;setzt die Hintergrundfarbe
    GUICtrlSetColor($gTreeview_New, $ButtonTextColor) ;setzt die Textfarbe
    GUICtrlSetFont($gTreeview_New, 11) ;setzt die Textgröße
    
    Local $gLabelName_New = GUICtrlCreateLabel("Erorr Name: ", 210 + $hGUI_OffsetX, 10 + $hGUI_OffsetY, 150, 25) ;Erstellt ein Label
    GUICtrlSetColor($gLabelName_New, $ButtonTextColor) ;setzt die Textfarbe
    GUICtrlSetFont($gLabelName_New, 13) ;setzt die Textgröße
    
    Local $gEditName_New = GUICtrlCreateEdit("",210 + $hGUI_OffsetX, 35 + $hGUI_OffsetY, 260, 25, BitOR($ES_AUTOHSCROLL, $ES_AUTOVSCROLL), 0) ;Erstellt ein Edit
    GUICtrlSetBkColor($gEditName_New, "0x" & Int(StringRight($GUIThemeColor, 6)) + 252525) ;setzt die Hintergrundfarbe
    GUICtrlSetColor($gEditName_New, $ButtonTextColor) ;setzt die Textfarbe
    GUICtrlSetFont($gEditName_New, 13, Default, Default, "Courier New") ;setzt die Textgröße und die Schrifftart
    
    Local $gLabelBeschreibung_New = GUICtrlCreateLabel("Description: ", 210 + $hGUI_OffsetX, 70 + $hGUI_OffsetY, 150, 25) ;Erstellt ein Label
    GUICtrlSetColor($gLabelBeschreibung_New, $ButtonTextColor) ;setzt die Textfarbe
    GUICtrlSetFont($gLabelBeschreibung_New, 13) ;setzt die Textgröße
    
    Local $gEditBeschreibung_New = GUICtrlCreateEdit("",210 + $hGUI_OffsetX, 95 + $hGUI_OffsetY, 260, 100, BitOR($ES_WANTRETURN, $ES_AUTOHSCROLL, $ES_AUTOVSCROLL), 0) ;Erstellt ein Edit
    GUICtrlSetBkColor($gEditBeschreibung_New, "0x" & Int(StringRight($GUIThemeColor, 6)) + 252525) ;setzt die Hintergrundfarbe
    GUICtrlSetColor($gEditBeschreibung_New, $ButtonTextColor) ;setzt die Textfarbe
    GUICtrlSetFont($gEditBeschreibung_New, 13, Default, Default, "Courier New") ;setzt die Textgröße und die Schrifftart
    
    Local $gSaveButton_New = _Metro_CreateButton("Save", 210 + $hGUI_OffsetX, 210 + $hGUI_OffsetY, 260, 50) ;Erstellt einen Button
    
    $root = _GUICtrlTreeView_AddChild($gTreeview_New, "", "Datenbank") ;definiert den Pfad, aus dem, die Ordner aufgelistet werden sollen
    _SearchFolder(@ScriptDir & "\Datenbank", $root, False, Default, $gTreeview_New) ;Startet die auflistung der Datein und Ordnern und ergänzt sie in der Treeview
    Alles anzeigen

    vielen Dank schon mal

    Gruß

    Flo

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™