GUI Oberfläche in Win 10
Verfasst: 01.09.2020 15:03
Hallo,
die von mir mit dem FormDesigner von PureBasic 3.1 erstellten GUI Oberflächen wurden alle noch unter WinXp erstellt.
Unter Win10 erscheinen diese Oberflächen alle nur noch zweidimensional und die verwendeten Farben werden anders dargestellt. Was muß ich ändern, damit die Oberflächen auch unter Win10 im herkömmlichen "XP-Look" dargestellt werden?
Beispiel:
// Edit : Code-Tags hinzugefügt (Kiffi)
die von mir mit dem FormDesigner von PureBasic 3.1 erstellten GUI Oberflächen wurden alle noch unter WinXp erstellt.
Unter Win10 erscheinen diese Oberflächen alle nur noch zweidimensional und die verwendeten Farben werden anders dargestellt. Was muß ich ändern, damit die Oberflächen auch unter Win10 im herkömmlichen "XP-Look" dargestellt werden?
Beispiel:
Code: Alles auswählen
Global Versuch
Global Button_0, String_2
Procedure OpenVersuch(x = 0, y = 0, width = 600, height = 400)
Versuch = OpenWindow(#PB_Any, x, y, width, height, "", #PB_Window_SystemMenu)
Button_0 = ButtonGadget(#PB_Any, 126, 187, 100, 25, "Versuch1")
String_2 = StringGadget(#PB_Any, 126, 137, 100, 25, "Versuch", #PB_String_ReadOnly)
EndProcedure
Procedure Versuch_Events(event)
Select event
Case #PB_Event_CloseWindow
ProcedureReturn #False
Case #PB_Event_Menu
Select EventMenu()
EndSelect
Case #PB_Event_Gadget
Select EventGadget()
EndSelect
EndSelect
ProcedureReturn #True
EndProcedure