Textfarbe einer Gruppe ändern? Problem...

1. offizieller Beitrag

    Hallo,
    tut mir leid, dass ich schon wieder eine Frage stelle.
    Ich stehe auf dem Schlauch ?(

    Wieso tut denn dieser Quellcodeabschnitt nicht?

    [autoit]


    #include <GuiConstantsEx.au3>

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

    Guictrlcreategroup("Text", 20, 50)
    Guictrlsetcolor(-1, 0x66342D)

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

    Wenn man statt einer Gruppe ein Label macht, geht's...
    Und in der Hilfe steht ja auch, dass guictrlsetcolor mit einer Gruppe gehen sollte. 8|
    Guictrlsetbkcolor geht übrigens bei einer Gruppe, aber ich will ja die Textfarbe ändern ^^"

    Liebe Grüße
    Corinna

    Einmal editiert, zuletzt von Elodie (27. Mai 2009 um 22:34)

    Danke sehr :)

    Hatte gehofft, dass es einfacher geht ;)

    Hab's nun so gemacht:

    [autoit]


    #include <GuiConstantsEx.au3>

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

    GUICtrlCreateGroup(" ", 20, 200) ; Ausschnitt in die Gruppe machen
    guictrlcreatelabel("Text:",25, 200) ; mit Text füllen
    Guictrlsetcolor(-1, 0x756EA4)
    GUICtrlCreateGroup("", -99, -99, 1, 1)

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

    mit bisschen herumprobieren klappt's ^^

    Hi,
    jetzt habe ich was vergessen - Das herzlich Willkommen ! ;)
    Hier noch ein Beispiel:

    Spoiler anzeigen
    [autoit]


    #Region Group Daten
    GUICtrlCreateLabel("", 220, 12, 164, 152)
    GUICtrlSetBkColor(-1, 0xEEEEEE) ;i silber
    GUICtrlSetState(-1, $GUI_DISABLE)

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

    GUICtrlCreateGroup("", 220, 5, 165, 160) ; create group $gbDaten

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

    ;! Rundruf Teil-1 - Nicht existierende Dateien sind nicht answählbar - Das Sichern verläuft ohne Unterbrechungen
    Global $aExistFile[8] = ['', @AppDataDir & '\Mozilla\Firefox\profiles.ini', @AppDataDir & '\Thunderbird\profiles.ini', _
    @AppDataDir & '\Microsoft\Outlook\', $identPath & '\Identities\' & $ident & '\Microsoft\Outlook Express\', _
    @AppDataDir & '\Microsoft\Address Book\', @FavoritesDir & '\', @MyDocumentsDir & '\']

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

    Global $aDatenCk = IniReadSection($ini, "Daten")
    If @error Then Global $aDatenCk[8][2] = [[7, 0],['FF', $GUI_UNCHECKED],['TB', $GUI_UNCHECKED], _
    ['OL', $GUI_UNCHECKED],['OE', $GUI_UNCHECKED],['AB', $GUI_UNCHECKED],['IE', $GUI_UNCHECKED],['ED', $GUI_CHECKED]]
    For $i = 1 To 7 ;i statisch kein Ubound
    $aDatenCkb[$i] = GUICtrlCreateCheckbox($languages[$i + 16][1], 240, $i * 20, 105, 17)
    GUICtrlSetBkColor(-1, 0xEEEEEE)
    ; create 7x Checkbox
    GUICtrlSetState(-1, $aDatenCk[$i][1])
    GUICtrlSetTip(-1, $languages[45][1])
    GUICtrlSetTip($aDatenCkb[7], $languages[48][1])

    If Not FileExists($aExistFile[$i]) Then GUICtrlSetState($aDatenCkb[$i], $GUI_DISABLE)
    ;! Rundruf Teil-2 - Nicht existierende Dateien sind nicht answählbar - Das Sichern verläuft ohne Unterbrechungen
    Next
    GUICtrlCreateGroup("", -99, -99, 1, 1) ; close group $gbDaten
    #EndRegion Group Daten

    [/autoit]


    Edit: Habe ich vieleicht was falsch verstanden ?

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>

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

    #region - GUI Create
    GUICreate('', 400, 400, -1, -1)
    GUICtrlCreateGroup("text", 20, 200) ; Ausschnitt in die Gruppe machen
    ;guictrlcreatelabel("Text:",25, 200) ; mit Text füllen
    Guictrlsetcolor(-1, 0xEEEEEE) ;i silber 0x756EA4)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    GUISetState()
    #endregion

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

    #region - GUI SelectLoop
    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    Exit
    EndSelect
    WEnd
    #endregion

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


    Viel Erfolg ! :)

    Danke fürs Herzlich Willkommen :)

    eventuell habe ich mich falsch ausgedrückt - sorry.

    Also, ich würde gerne nur die Überschriftstextfarbe bei einer Gruppe ändern ^^

    Einmal editiert, zuletzt von Elodie (27. Mai 2009 um 21:19)

    • Offizieller Beitrag

    Die Farbe kannst Du nur beim klassischen Style von Windows ändern:

    [autoit]


    #include <GUIConstantsEx.au3>

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

    #region - GUI Create
    GUICreate('', 400, 400, -1, -1)
    DllCall('uxtheme.dll', 'none', 'SetThemeAppProperties', 'int', 0) ; auf den klassischen Style umschalten
    GUICtrlCreateGroup("text", 20, 200)
    GUICtrlSetFont(-1, 16, 400, 0)
    Guictrlsetcolor(-1, 0xFF0000)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    DllCall('uxtheme.dll', 'none', 'SetThemeAppProperties', 'int', 7) ; zurück zum Standard-Windowsstyle
    GUISetState()
    #endregion

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

    #region - GUI SelectLoop
    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    Exit
    EndSelect
    WEnd
    #endregion

    [/autoit]