PureBasic Forums - English

Posted: **Sat May 21, 2016 4:19 pm**

To get a window where the gadget.

Procedure GadgetWindowID( Gadget )
    CompilerSelect #PB_Compiler_OS
      CompilerCase #PB_OS_Windows
        ProcedureReturn GetAncestor_( GadgetID( Gadget ), #GA_ROOT )
      CompilerCase #PB_OS_Linux
        ProcedureReturn gtk_widget_get_toplevel_( GadgetID( Gadget ))
      CompilerCase #PB_OS_MacOS ; TODO
    CompilerEndSelect
  EndProcedure

It would be nice to add for mac os.