
In vielen Fenster sehe ich dass Frame3dGadget auch als Trennlinie gibt ohne Überschrift
und ohne Viereck sondern nur eine einzigste Trennlinie. Wie mache ich solch eine Trennlinie?
Egal in welcher Höhe bei mir entsteht immer ein Rechteck.
Code: Alles auswählen
Procedure Main()
If OpenWindow(0, #PB_Ignore, #PB_Ignore, 500, 500, "")
CreateWindowEx_(0, "static", #Null, #WS_CHILD|#WS_VISIBLE|#SS_ETCHEDHORZ, 10, 10, 480, 1, WindowID(0), 0, 0, 0)
CreateWindowEx_(0, "static", #Null, #WS_CHILD|#WS_VISIBLE|#SS_ETCHEDVERT, 10, 20, 0, 100, WindowID(0), 0, 0, 0)
Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
EndProcedure:End main()
Code: Alles auswählen
EnableExplicit
Define EventID
If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
TextGadget(1, 10, 10, 100, 2, "", #SS_ETCHEDHORZ)
TextGadget(2, 10, 20, 2, 100, "", #SS_ETCHEDVERT)
Repeat
EventID = WaitWindowEvent()
If EventID = #PB_Event_CloseWindow
End
EndIf
ForEver
EndIf
Code: Alles auswählen
Line 6: Constant not found #SS_ETCHEDHORZ
Code: Alles auswählen
#SS_ETCHEDHORZ = 16
#SS_ETCHEDVERT = 17