quick and dirty settings
#1
In my app Trope I wanted to be able to save and recall the following settings

window position and size
wordwrap on/off
Backup on/off
Toolbar on/off

I opted for a quick and dirty way: print those values to a settings file in a known order, and later read them back in the same order. It works fine, but be aware that if your user monkeys around with the settings file, it can cause considerable chaos.

Code:
WordWrap = 0
Backup = 0
Toolbar = 1
SettingsFile$ = "/boot/home/config/settings/Trope/Trope.settings"

sub SaveSettings()
    open SettingsFile$ for writing as #1
    print #1 window get "MainWindow", "position-x"
    print #1 window get "MainWindow", "position-y"
    print #1 window get "MainWindow", "width"
    print #1 window get "MainWindow", "height"
    print #1 str$(WordWrap)
    print #1 str$(Backup)
    print #1 str$(Toolbar)
    close #1
end sub

sub GetSettings()
    local tempval$
    open SettingsFile$ for reading as #1
        line input #1 tempval$: xorigin = val(tempval$)
        if xorigin = 0 then //ie if the settings file was empty
            xorigin = 50 //reset xorigin, use defaults for others
            close #1
            return
        else
            line input #1 tempval$: yorigin = val(tempval$)
            line input #1 tempval$: xwidth = val(tempval$)
            line input #1 tempval$: yheight = val(tempval$)
            line input #1 tempval$: WordWrap = val(tempval$)
            line input #1 tempval$: Backup = val(tempval$)
            line input #1 tempval$: Toolbar = val(tempval$)
        end if
    close #1
end sub
Reply


Messages In This Thread
quick and dirty settings - by clasqm - 07-05-2015, 06:55 PM
RE: quick and dirty settings - by lelldorin - 07-07-2015, 01:48 PM
RE: quick and dirty settings - by bbjimmy - 07-07-2015, 02:33 PM
RE: quick and dirty settings - by clasqm - 07-08-2015, 04:59 AM
RE: quick and dirty settings - by lelldorin - 07-08-2015, 06:12 AM
RE: quick and dirty settings - by bbjimmy - 07-08-2015, 11:05 AM

Forum Jump:


Users browsing this thread: 1 Guest(s)
Free Web Hosting