Global enumeration of named

[User_Russian]

This is necessary to generate unique numbers for objects such as windows, gadgets, files, images, etc.
This requires the reserved names for all objects, which to be global (for example: Window, Gadget, File, Timer etc).

Code: Select all

Enumeration Window
  #Window
EndEnumeration


DeclareModule x
Enumeration Window
  #Window
EndEnumeration
EndDeclareModule

Module x
  
EndModule

Debug #Window
Debug x::#Window ; Must be 1.

[ts-soft]

+1

like this, fullqualified:

Code: Select all

 DeclareModule Common
  Enumeration Gadgets
    #btn_1
    #btn_2
  EndEnumeration
EndDeclareModule

Common::Enumeration Gadgets
  #btn3
EndEnumeration

Debug #btn3 ; should 2 

[User_Russian]

Code: Select all

DeclareModule Common
  Enumeration Gadgets
    #btn_1
    #btn_2
  EndEnumeration
EndDeclareModule

Enumeration Common::Gadgets
  #btn3
EndEnumeration

Debug #btn3 ; should 2

[ts-soft]

thx , works fine

[User_Russian]

But the drawback of this method is that you need to know the exact name of the module.

It is better if it had special names like PB_Enum_Window, PB_Enum_Gadget, etc, which were reserved names and would be's global throughout the code, including the modules.

Code: Select all

DeclareModule Common
  Enumeration PB_Enum_Gadget
    #btn_1
    #btn_2
  EndEnumeration
EndDeclareModule

Enumeration PB_Enum_Gadget
  #btn3
EndEnumeration

Debug #btn3 ; should 2