Backgroundcolour always changes do default.

[shokwave8]

Hello there Com,

The following is my problem. I try to create a window with Koda-Formdesigner and the background of the Form, Button and Edit shall be blue with white letters. Everytime i run the code the colour from button and edit background sets to default. 

i tried to set the backgroundcolour manually to blue for the button and the editbox but then the GUI just does not appear while running the script. 

I got you some screens of Koda (howitshould.jpg) and the actual running script (howitis.jpg). I hope you guys can help me  

Thanks for reading and replying.

(I'm german and i might did some mistakes in language )

#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Form1", 619, 442, 221, 182)
GUISetBkColor(0x0000FF)
$idPic = GUICtrlCreatePic("C:\Users\***\Downloads\Löwe Weiß1.jpg", 4, 4, 356, 364)
$Label1 = GUICtrlCreateLabel("TEST", 256, 48, 287, 36)
GUICtrlSetFont(-1, 20, 800, 0, "Cambria")
GUICtrlSetColor(-1, 0xFFFFFF)
$JOIN = GUICtrlCreateButton("JOIN", 400, 336, 185, 73)
GUICtrlSetFont(-1, 16, 800, 0, "Cambria")
GUICtrlSetColor(-1, 0xFFFFFF)
$Edit1 = GUICtrlCreateEdit("", 376, 96, 217, 233, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN))
GUICtrlSetData(-1, "Newest Updates:")
GUICtrlSetFont(-1, 10, 400, 0, "Cambria")
GUICtrlSetColor(-1, 0xFFFFFF)
GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

 

 

 

Edited January 14, 2016 by shokwave8

[water]

Fehler sind hier kein Problem! Wenn wir wo nicht klarkommen, dann fragen wir nach.

Could you please post the code generated by Koda?

[Melba23]

shokwave8,

You are not setting the background colour of the controls so unsurprisingly they default to the default colour.

Either use a GUICtrlSetBkColor command for each control, or use the GUISetDefColor/BkColor like this:

#include <GUIConstantsEx.au3>
#include <EditConstants.au3>

$Form1_1 = GUICreate("Form1", 619, 442, 221, 182)
GUISetBkColor(0x0000FF)
GUICtrlSetDefBkColor(0x0000FF)
GUICtrlSetDefColor(0xFFFFFF)

$idPic = GUICtrlCreatePic("C:\Users\***\Downloads\Löwe Weiß1.jpg", 4, 4, 356, 364)
$Label1 = GUICtrlCreateLabel("Next Life RP-Funserver", 256, 48, 287, 36)
GUICtrlSetFont(-1, 20, 800, 0, "Cambria")
$JOIN = GUICtrlCreateButton("JOIN", 400, 336, 185, 73)
GUICtrlSetFont(-1, 16, 800, 0, "Cambria")
$Edit1 = GUICtrlCreateEdit("", 376, 96, 217, 233, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN))
GUICtrlSetData(-1, "Newest Updates:")
GUICtrlSetFont(-1, 10, 400, 0, "Cambria")

GUISetState(@SW_SHOW)

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch

WEnd

A couple of points:

• Colouring buttons fraught with danger as they can misbehave quite badly.
• Looking at the title of the GUI, please read the Forum rules carefully before posting again

M23

 

[shokwave8]

Oh i'm very sorry  will not happen again

Very thanks to both of you