How to save a Disabled Button

[thomassen234]

At first the button is enabled, and when someone clicks a button, the button turns to its disabled state.


Button1.Enabled=False

i want to be able to save the button when its disabled so when the app is opened again, the button is still in its disabled state,

Anyhelp?

 

[kickaha]

Have a look at state manager

 

[lagore]

The state manager is probably the best option, you can load default options first time round then save the settings as they are saved, not at my computer at the moment so can't show any code

Sent from my HTC Desire using Tapatalk 2

 

[thomassen234]

i have tried, but the software doesn't recognize statemanager, Is it because i only have the trial?

 

[NJDude]

Yes, the trial doesn't allow the use of libraries or modules.

 

[thomassen234]

is there anyother way i can do it???

 

[kickaha]

Statemanager is a code module not a library. Have you downloaded the zip file from the thread i linked to?

 

[NJDude]

You can try using a MAP.

 

[thomassen234]

It wont let me download the zip as i only have trial, could you host it someone else?

 

[NJDude]

It wont let me download the zip as i only have trial, could you host it someone else?

Dude, you CANNOT use libraries or modules with the trial version, read the FAQ.

 

[thomassen234]

could someone try and write me some code using map to save?

 

[margret]

You can save and load like this:

Sub Globals
   Dim sets As Map
    sets.Initialize
End Sub

Sub savebtns
    sets.Clear
   sets.Put("EditText1", EditText1.Enabled)
   sets.Put("EditText2", EditText2.Enabled)
   File.WriteMap(File.DirInternal, "btnset.set", sets)
End Sub

Sub loadbtns
   sets = File.ReadMap(File.DirInternal, "btnset.set")
   EditText1.Enabled = sets.Get("EditText1")
   EditText2.Enabled = sets.Get("EditText2")
End Sub

 

[kickaha]

I did not know that modules are not supported in the trial version.

May i suggest that you try and write the code yourself, and if you run in to problems we will gladly help. If you search the forum there are a lot of code snippets showing exactly what you need.

Edit:
The lovely Margret provided the code whilst I was typing

 

[thomassen234]

okay, to set it i have this...

sets.Clear
sets.Put("adid", adidasiconButton.Enabled=false)
File.WriteMap(File.DirInternal, "btnset.set", sets)


and to get it i have this....

sets = File.ReadMap(File.DirInternal, "btnset.set")
adidasiconButton.Enabled = sets.Get("adid")

and im getting an error Cannot Parse: null as boolean when i press the button on the phone,, anyhelp please?

 

[margret]

You had an error in the code, you had adidasiconButton.Enabled=false. I removed the = false. The code below should work:

sets.Clear
sets.Put("adid", adidasiconButton.Enabled) '=false) -this I removed
File.WriteMap(File.DirInternal, "btnset.set", sets)


sets = File.ReadMap(File.DirInternal, "btnset.set")
adidasiconButton.Enabled = sets.Get("adid")