PureBasic Forums - English

GJ-68 wrote:I don't understand your problem with initial sizing.
This works for me.

Code: Select all

OpenWindow(1, 0, 0, 220, 100, "PB 5.30 b2", #PB_Window_SystemMenu|#PB_Window_ScreenCentered|#PB_Window_SizeGadget|#PB_Window_Invisible)
ListViewGadget(1, 0, 0, 0, 0) ; <- No position and no size here
HideWindow(1,0) ; <- #PB_Event_SizeWindow fired here
    
Repeat
  Event = WaitWindowEvent()
  Select Event
    Case #PB_Event_SizeWindow
      ResizeGadget(1,10,10,WindowWidth(1)-20,WindowHeight(1)-20)
  EndSelect
Until Event = #PB_Event_CloseWindow

grabiller wrote:So what the point removing this event at all in the first place ? What is the benefit ?

GJ-68 wrote:I don't understand your problem with initial sizing.
This works for me.

Code: Select all

OpenWindow(1, 0, 0, 220, 100, "PB 5.30 b2", #PB_Window_SystemMenu|#PB_Window_ScreenCentered|#PB_Window_SizeGadget|#PB_Window_Invisible)
ListViewGadget(1, 0, 0, 0, 0) ; <- No position and no size here
HideWindow(1,0) ; <- #PB_Event_SizeWindow fired here
    
Repeat
  Event = WaitWindowEvent()
  Select Event
    Case #PB_Event_SizeWindow
      ResizeGadget(1,10,10,WindowWidth(1)-20,WindowHeight(1)-20)
  EndSelect
Until Event = #PB_Event_CloseWindow

DK_PETER wrote:@Grabiller
Normally, I don't get into debates like this. 'Acting up' because something doesn't suit you - is totally bad form.
I, for one - have absolutely no problem with the current implementation.

DK_PETER wrote:My main concern here is: Only a minority of registred users visits this forum and a tiny portion of those engage actively
in debates. Still some people act out an illusion of grandure - believing, that speak for us all.
State your case and don't ever assume, that you have the majority to back you up.

freak wrote:> You are in control of the PureBasic language, so what prevent you to internally rewire the real-time sizing binded event as a PureBasic window event/message ?
I explained exactly that point in my post. Maybe you should read it before mouthing off.

Danilo wrote:

grabiller wrote:So what the point removing this event at all in the first place ? What is the benefit ?

Behavior was not cross-platform, so there were 2 choices:
1.) Remove the event on Windows
2.) Add the event to Linux and Mac
They decided to remove it on Windows, so behavior is cross-platform now.
If they would have added it to Linux and Mac, the Linux and Mac
guys could complain that there is now an additional event that is
usually not correct on their platform. Same as you complain now that
it is not correct Windows behavior.

Danilo wrote:Personally, I just want it 100% cross-platform, because that's what PB is.
Whether they choose way (1) or (2), it should be same on all platforms.

Danilo wrote:If they add the event on all platforms and you open an invisible Window,
should the resize event fire?

grabiller wrote:

Danilo wrote:If they add the event on all platforms and you open an invisible Window,
should the resize event fire?

I think it should, yes, because what makes a Window at first, showed or not, is its topology. There are circumstances where a Window may ultimately have a different topology that the one you give to OpenWindow (maximized window for instance, and this may be not hardcoded when you create a window, depending on your application). So it is very elegant to have this first sizing event triggered, as then you can shape your window content accordingly without the need to worry about if it is the first or the next sizing event.

Procedure Win1_Resize()
    Debug "Win1_Resize()"
    ResizeGadget(1,10,10,WindowWidth(1)-20,WindowHeight(1)-20)
    ;If IsGadget(1) : ResizeGadget(1,10,10,WindowWidth(1)-20,WindowHeight(1)-20) : EndIf
EndProcedure


; When binding #PB_Event_SizeWindow before the window
; is created, the event arrives.
; But at this point, the gadgets are not created,
; so everything must be checked with IsGadget()
; inside the resize procedure.
; Gadgets that are not created yet can't get resized.
;
BindEvent(#PB_Event_SizeWindow,@Win1_Resize(),1)

If OpenWindow(1, 0, 0, 220, 100, "Win1",#PB_Window_SystemMenu|#PB_Window_ScreenCentered|#PB_Window_SizeGadget|#PB_Window_Invisible):PostEvent(#PB_Event_SizeWindow,1,0)
    
    ; When binding #PB_Event_SizeWindow after the window
    ; is created, the old event does not arrive at this
    ; new event procedure
    BindEvent(#PB_Event_SizeWindow,@Win1_Resize(),1)
    
    ListViewGadget(1,10,10,WindowWidth(1)-20,WindowHeight(1)-20)
    For i = 1 To 100:AddGadgetItem(1,-1,"ListViewGadget Line "+i):Next
    
    HideWindow(1,0)
    ;Win1_Resize() ; you can call resize anytime manually
    ;PostEvent(#PB_Event_SizeWindow,1,0)
    
    Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf

Danilo wrote:../.. So #PB_Event_SizeWindow at window creation is quite useless, because there
are no gadgets yet, that can be resized.
Looks like you need the resize event on HideWindow(1,0), which is not the
case on MacOSX at this time.

freak wrote:[...]They are sometimes also called from functions that change the GUI (if this change directly generates an event).

grabiller wrote:Well, the patch I use (http://www.purebasic.fr/english/viewtop ... 56#p445956) is working as expected