iswindow

[t57042]

Why does iswindow return "not initialized?

Richard

Code: Select all

a=OpenWindow(0, 100, 200, 195, 260, "PureBasic Window", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget)

 If IsWindow(a)
       Debug "ok"    
 Else
       Debug "not initialised"
 EndIf  
  
  Repeat
    Event = WaitWindowEvent()

    If Event = #PB_Event_CloseWindow  ; If the user has pressed on the close button
      Quit = 1
    EndIf

  Until Quit = 1


End   

[TI-994A]

Why does iswindow return "not initialized?

You'd need to use #PB_Any to assign the window number to a:

Code: Select all

a = OpenWindow(#PB_Any, 100, 200, 195, 260...

[NEW NicknameFJ]

Do it this way:

Code: Select all

 a=OpenWindow(0, 100, 200, 195, 260, "PureBasic Window", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget)

 If IsWindow(0)
       Debug "ok"   
 Else
       Debug "not initialised"
 EndIf 
 
  Repeat
    Event = WaitWindowEvent()

    If Event = #PB_Event_CloseWindow  ; If the user has pressed on the close button
      Quit = 1
    EndIf

  Until Quit = 1


End  

or this way

Code: Select all

 a=OpenWindow(#pb_any, 100, 200, 195, 260, "PureBasic Window", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget)

 If IsWindow(a)
       Debug "ok"   
 Else
       Debug "not initialised"
 EndIf 
 
  Repeat
    Event = WaitWindowEvent()

    If Event = #PB_Event_CloseWindow  ; If the user has pressed on the close button
      Quit = 1
    EndIf

  Until Quit = 1


End  

EDIT: to late

[Demivec]

Or test it this third way:

Code: Select all

 a=OpenWindow(0, 100, 200, 195, 260, "PureBasic Window", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget)

 If a
       Debug "ok"   
 Else
       Debug "not initialised"
 EndIf 
 
  Repeat
    Event = WaitWindowEvent()

    If Event = #PB_Event_CloseWindow  ; If the user has pressed on the close button
      Quit = 1
    EndIf

  Until Quit = 1


End