Code: Select all
Enumeration
#imgLocatie = 10
#imgLogo = #imgLocatie + 20
#imgAdd
#imgDel
#imgEdit
#imgMail
#imgLoading
#MainGadgetsStart ;------------------------
#gimLogo
#gimLocatie
#gimLoading
#gimgAddv
#gimgDelv
#gimgEditv
#gimgMailv
#gimgAddk
#gimgDelk
#gimgEditk
#prgLaden
#Panel
#MainGadgetsEnd ;------------------------
#txtLocatie
#cmbLocatie
#txtWachtwoord
#strWachtwoord
#btnInloggen
#txtLoginError
#lstDeeln
#frmDeeln
#lstVrij
EndEnumeration
Code: Select all
For g = #MainGadgetsStart To #MainGadgetsEnd
If IsGadget(g)
DisableGadget(g,1)
EndIf
Next g