FGroupbox

Die Groupbox hat hauptsächlich eine decorative Funktion. Es kann innerhalb der Box mit Tab- bzw. Pfeiltasten der Focus bewegt werden.
Im Bezug auf die Gruppierung der RadioButton hat sie keine Wirkung. (siehe auch FRadioButton)

PropertyDatentyp(Read/Write)Hinweise
LeftInteger (R/W) Linke Position
TopInteger (R/W) Obere Position
WidthInteger (R/W) Weite
HeightInteger (R/W) Höhe
ClientHeightInteger (R) Höhe des Clientbereiches
ClientWidthInteger (R) Breite des Clientbereiches
CaptionString (R/W) Liest,Setzt oder ändert den Text
BorderInteger (R/W) Rahmen - Linie
0 = keine
1 = sunken (voreingestellt)
2 = erhoben
3 = Linie ; in Farbe BorderColor(voreingestellt ist grau)
BorderColorUinteger (R/W) Wenn Border = 3 , dann Linienfarbe
VisibleInteger (R/W) TRUE = sichtbar (voreingestellt) ; FALSE = nicht sichtbar
EnabledInteger (R/W) TRUE = aktiv (voreingestellt) ; FALSE = inaktiv
ColorUInteger (R/W) Hintergrundfarbe ; voreingestellt ist hellgrau
TextColorUInteger (R/W) Textfarbe ; voreingestellt ist schwarz
HandleHWND (R) Handle des Control(nur lesen !)
Sub/FunctionArgumenteHinweise
SUB Create (ByVal hParent As HWND,
Caption As String,
ByVal x As Integer,ByVal y As Integer,ByVal w As Integer,ByVal h As Integer )
Handle des Elternfenster
Text
Dimensionen x,y,Weite,Höhe
Invalidate keine Veranlasst das senden einer WM_PAINT Botschaft
Repaint keine Wie Invalidate aber mit Nicht-Clientbereich
setFont (Face As String,
ByVal size As Integer,
ByVal bold As Integer,
ByVal italic As Integer,
ByVal underlin As Integer)
Schrift-Name
Schriftgröße
1=bold,0=normal
1=italic,0=normal
1=underlin,0=normal
Event SUBArgumenteHinweis
onLButtondown(ByVal x As Short, ByVal y As Short) Wenn auf dem Control mit der linker Mousetaste geklickt wird
x und y ist dabei die Position des Mousezeigers
onRButtondown(ByVal x As Short, ByVal y As Short) Wenn auf dem Control mit der rechter Mousetaste geklickt wird
x und y ist dabei die Position des Mousezeigers
Beispiel :
#Include "winFBgui.bi"


Dim Shared As FForm form1 
Dim Shared As FToolBtn Btn1
Dim Shared As FGroupbox grup1,grup2
Dim Shared As FCheckbox check1,check2,check3,check4

Sub btn1_Click
	form1.FormClose
End Sub

'--------------------------------------------------------------------
'                  Form und Control
'--------------------------------------------------------------------

form1.Create("Test 1",0,0,350,270)
Form1.Center
Form1.Color = &HEEFFBF

grup1.Create(form1.Handle," Test Box ",10,10,200,80)
grup1.Color = &HEEFFBF
grup1.TextColor = &HFF0000

grup2.Create(form1.Handle," Test Box 2",10,110,200,100)
grup2.Border = 3
grup2.BorderColor = &HFF
grup2.Color = &HEEFFBF
grup2.TextColor = &HFF

Btn1.Create(form1.Handle,230,20,90,30)
Btn1.Caption = "Exit"
Btn1.onClick = @btn1_Click
Btn1.Border = TRUE
Btn1.BorderColor = &HAAAAAA

check1.Create(grup1.Handle,"Check1",20,30,80,26 )
check1.Color = &HEEFFBF
check1.Check = TRUE
check2.Create(grup1.Handle,"Check2",110,30,80,26 )
check2.Color = &HEEFFBF

check3.Create(grup2.Handle,"Check3",20,40,80,26 )
check3.Color = &HEEFFBF
check4.Create(grup2.Handle,"Check4",110,40,80,26 )
check4.Color = &HEEFFBF
check4.Check = TRUE
'------ Show entält MessageLoop - muss immer am Ende sein ------------
form1.Show
ExitProcess(0)
End
So sieht es aus :
GroupBox