PureBoard

Verfasst: **07.04.2019 12:26**

Hallo Leute,

hier ein Auszug meines aktuellen Projekts:

Dim stringarray$ (5,50)
Dim gadgetlive (600)

Global gadgetlive.i
Global stringarray$

Enumeration 10 Step 1
 #windownum
 #fontnum
 #fontnumWD
 #panelgadgetnum
 #savefilenum
 #loadfilenum
 #emailcheck
 #biccheck
 
EndEnumeration

Procedure Disabling (gadget.i)
      If IsGadget(gadget)
        Select GadgetType(gadget)
          Case #PB_GadgetType_ComboBox, #PB_GadgetType_Date, #PB_GadgetType_Button
            DisableGadget(gadget, 1)
          Case #PB_GadgetType_String
            SendMessage_(GadgetID(gadget),#EM_SETREADONLY,1,0)
            SetGadgetColor(gadget, #PB_Gadget_BackColor, $FFFFFF)
            SetGadgetColor(gadget, #PB_Gadget_FrontColor, $000000)
        EndSelect
        
             gadgetlive (gadget) = 1

      EndIf
      
EndProcedure

Beim Kompilieren kommt der Fehler, dass "gadgetlive()" keine Funktion, Array, oder oder oder sei.

Ich wollte in einer Funktion auf das Array gadgetlive() zugreifen. Wo ist mein Denkfehler?

Verfasst: **07.04.2019 12:33**

Code: Alles auswählen

Global Dim stringarray$ (5,50)
Global Dim gadgetlive.i (600)

Verfasst: **07.04.2019 14:30**

Vielen Dank!

Ja, eigentlich ganz einfach, man muss es halt nur wissen!

PureBoard

Problem mit DIM und GLOBAl und PROCEDURE

Problem mit DIM und GLOBAl und PROCEDURE

Re: Problem mit DIM und GLOBAl und PROCEDURE

Re: Problem mit DIM und GLOBAl und PROCEDURE