| |
|
|
Thomas Freier | Bisher J'ai eu toujours Klassisches Designs. Pour Commutateur sur X-Designs ist chez den Bouton Radio " qui Hintergrund noir. je find simple qui Solution pas. KompilierenMarqueSéparationDef GetSysColor(1) !"USER32","GetSysColor"
Cls GetSysColor(15)
var wahl&=Create("GroupBox",%hwnd,"",8,320,448,42)
var alle&=Create("RadioButton",wahl&,"Alle",4,16,66,16)
WaitInput
En |
|
|
| |
|
|
|
Thomas Freier | Merkwürdig, direct sur %hwnd ist alles "normal". dans qui "GroupBox" habe maintenant une schwarzen Hintergrund. sous Profan 6.6 ist es encore comment gewünscht. |
|
|
| |
|
|
|
Dieter Zornow | ensuite lass es doch sur %Hwnd, mais est sowieso besser, sur qui groupbox trop poser ist unüblich |
|
|
| Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2 | 25.08.2009 ▲ |
|
|
|
|
Dieter Zornow | peux meinen Beitrag pas Travailler, peux mich tot klicken et es venez rien.
chez 6.6 hat es wahrscheinlich avec dem SetTrueColor trop 1faire, dass es là encore allez |
|
|
| Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2 | 25.08.2009 ▲ |
|
|
|
|
Thomas Freier | oui, mais était pas qui "GroupBox" pour gedacht. ici qui 6il-code KompilierenMarqueSéparationSetTrueColor 1
Cls rgb(222,222,222)
declare button&,alle&,grup&
grup& = CreateGroupBox(%hwnd,"",10,10,200,200)
button& = Control("BUTTON","Test",$54010029,10,20,100,20,grup&,0,%hinstance,$0)
alle& = CreateRadioButton(grup&,"Alle",10,60,66,16)
WaitInput
>
|
|
|
| |
|
|
|
Jörg Sellmeyer | non, qui Groupbox ist pour gedacht, qui Elemente grafisch trop gliedern et dans qui Funktion trop gruppieren. Alle Radiobuttons, qui pour einer Groupbox erstellt volonté (jusqu'à zur prochain), beziehen sich aufeinander. D.h.: Klick je la première à, verliert une markierte autre qui Markierung. |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 25.08.2009 ▲ |
|
|
|
|
Thomas Freier | eh, comment droite tu as. Ist mir, comment dit, seulement beim modifié Designs aufgefallen. So gehts réellement KompilierenMarqueSéparationDef GetSysColor(1) !"USER32","GetSysColor"
Cls GetSysColor(15)
declare button&,alle&,grup&,ber&,bis&,grup1&,nur&
grup& = CreateGroupBox(%hwnd,"",10,10,180,200)
alle& = CreateRadioButton(%hwnd,"Alle",30,60,86,16)
ber&=Create("RadioButton",%hwnd,"Bereich",30,90,86,16)
grup1& = CreateGroupBox(%hwnd,"",0,0,0,0)
bis&=Create("RadioButton",%hwnd,"Bereich",230,30,86,16)
nur&=Create("RadioButton",%hwnd,"Bereich",230,90,86,16)
SetCheck alle&,1
SetCheck nur&,1
while 1
WaitInput
case %key=2:break
wend
end
|
|
|
| |
|
|