FStaticFrame zeichnet eine Linie oder Rechteck zur Gestaltung einer Oberfläche
Property | Datentyp(Read/Write) | Hinweise |
Left | Integer (R/W) | Linke Position |
Top | Integer (R/W) | Obere Position |
Width | Integer (R/W) | Weite |
Height | Integer (R/W) | Höhe |
Handle | HWND (R) | Handle des Control (nur lesen !) |
SUB | Argumente | Hinweis |
Sub Create | (ByVal hParent As HWND, ByVal x As Integer,ByVal y As Integer,ByVal w As Integer,ByVal h As Integer ) |
Handle des Elternfenster Dimensionen |
Beispiel: #Define F_Button #Define F_StaticFrame #Define F_LabelEx #Define F_Panel #Define F_Label #Include "winFBgui2.bi" Dim Shared As FForm form1 Dim As FStaticFrame line1,line2,line3,line4,line6 Dim As FButton btn1 Dim As FlabelEx lbl1 Dim As FPanel panel1 Dim As FLabel label1,label2,label3,Label4 '------------- Event-Sub ------------------------------------ Sub btn_Click form1.FormClose End Sub ' ------------------- Create Control --------------------------------- ' Form form1.Create("Test",10,10,400,300) form1.Border = 2 ' Dialogbox-Style form1.Color = &Hdddddd lbl1.Create(form1.Handle,25,30,335,120) lbl1.Caption = "Freebasic" lbl1.Color = -1 'Transparent lbl1.TextColor = bgr(0,0,125) lbl1.TextEndColor = bgr(195,240,255) lbl1.TextGradients = 2 lbl1.SetFont("Arial",40,1,0,0) btn1.Create(form1.Handle,"Exit",140,150,100,30) btn1.onClick = @btn_Click line1.Create(form1.Handle,25,20,345,190) line2.Create(form1.Handle,27,22,341,186) panel1.Create(form1.Handle,25,220,343,30) Panel1.Color = &HE0b090 Panel1.Border = 3 line3.Create(panel1.Handle,90,2,2,26) line4.Create(panel1.Handle,170,2,2,26) line3.Create(panel1.Handle,250,2,2,26) label1.Create(panel1.Handle,"Label",6,6,70,22) label1.Color = &HE0b090 label1.TextColor = &HE0 label2.Create(panel1.Handle,"Align 1",98,6,70,22) label2.Color = &HE0b090 label2.Align = 1 label3.Create(panel1.Handle,"Border 1",177,4,68,22) label3.Color = &HE0b090 label3.Border = 1 label3.Create(panel1.Handle,"Border 2",258,4,76,22) label3.Color = &HE0b090 label3.Border = 2 ' alles anzeigen form1.Show ExitProcess(0) End |
So sieht es aus: ![]() |