ich arbeite mit 5.11 x.86 unter Windows XP und unter Linux.
In beiden Betriebssystemen habe ich den gleichen Effekt, dass manchmal die Einstellungen "rechts einrasten" und "unten einrasten" verloren geht.
Ich habe im Prog. ein Panel in dem auf verschiedenen Seiten z.B. ein Editorgadget, Buttons, CanvasGadget mit dem Formdesigner eingebaut wurden.
Regelmäßig verlieren diese Elemente die beiden Einstellungen.
Hat noch jemand diesen Effekt beobachtet oder ist er vielleicht inzwischen schon behoben?
Code: Alles auswählen
Global Window_1
Global Panel_0, Editor_0
Declare ResizeGadgetsWindow_1()
Procedure OpenWindow_1()
Window_1 = OpenWindow(#PB_Any, 0, 0, 600, 400, "", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget | #PB_Window_SizeGadget)
Panel_0 = PanelGadget(#PB_Any, 38, 63, 532, 317)
AddGadgetItem(Panel_0, -1, "Tab 1")
Editor_0 = EditorGadget(#PB_Any, 10, 10, 512, 268)
AddGadgetItem(Panel_0, -1, "zweite")
CloseGadgetList()
EndProcedure
Procedure ResizeGadgetsWindow_1()
Protected WindowWidth, WindowHeight
WindowWidth = WindowWidth(Window_1)
WindowHeight = WindowHeight(Window_1)
ResizeGadget(Panel_0, 38, 63, WindowWidth - 68, WindowHeight - 83)
; die folgende Zeile geht immer verloren!!!
ResizeGadget(Editor_0, 10, 10, GetGadgetAttribute(Panel_0,#PB_Panel_ItemWidth) - 20, GetGadgetAttribute(Panel_0,#PB_Panel_ItemHeight) - 20)
EndProcedure
Procedure Window_1_Events(event)
Select event
Case #PB_Event_SizeWindow
ResizeGadgetsWindow_1()
Case #PB_Event_CloseWindow
ProcedureReturn #False
Case #PB_Event_Menu
Select EventMenu()
EndSelect
Case #PB_Event_Gadget
Select EventGadget()
EndSelect
EndSelect
ProcedureReturn #True
EndProcedure
Wolfgang