Bug dans les flags de OpenWindow()

[falsam]

PB : 4.61
La combinaison des flags #PB_Window_MinimizeGadget|#PB_Window_MaximizeGadget|#PB_Window_ScreenCentered n’empêche pas le redimensionnement d'une fenêtre avec la version 4.61 de Pure Basic. Par contre le redimensionnement d'une fenêtre avec cette combinaison n'est pas possible avec la version 4.51 de Pure Basic.

Pouvez vous essayer ce code merci

Code : Tout sélectionner

Enumeration
  #Mainform
EndEnumeration


Define.l Event, WEvent, MEvent, GEvent, TEvent

Global WindowStyle.i=#PB_Window_MinimizeGadget|#PB_Window_MaximizeGadget|#PB_Window_ScreenCentered

Procedure Open_MainForm()
  OpenWindow(#Mainform, 0, 0, 500, 400, "New Form", WindowStyle)
EndProcedure

Procedure Start()
  ;Initialisation application, police, etc ..
  
  Open_MainForm()
EndProcedure

start()

Repeat
  Event  = WaitWindowEvent(10)
  WEvent = EventWindow() ;different de WindowEvent() :p (oui je me suis fais avoir !!!)
  MEvent = EventMenu()
  GEvent = EventGadget()
  TEvent = EventType()
  Select Event
    Case #PB_Event_Gadget
      Select GEvent
      EndSelect
        
    Case #PB_Event_CloseWindow
      End
  EndSelect
ForEver

[blendman]

Visiblement, le problème vient de #PB_Window_MaximizeGadget
Si on l'enlève, on ne peut plus redimensionner la fenêtre.

Je crois qu'on peut considérer ça comme un bug, car on ne devrait pas pouvoir redimensionner la fenêtre sans #PB_Window_SizeGadget.

[falsam]

Bonjour blendman,
j'ai signalé ce bug sur le forum anglais.

[falsam]

Finalement on peut se poser la question. Si j'autorise le paramètre #PB_Window_MaximizeGadget, ça veut dire implicitement que j'autorise aussi à redimensionner une fenêtre. Finalement c'est pas pas plus mal et donc pas forcement un bug.

[Ar-S]

Si j'autorise le paramètre #PB_Window_MaximizeGadget, ça veut dire implicitement que j'autorise aussi à redimensionner une fenêtre.

Effectivement