NAME=SetModified
AUTHOR=
ITEM=sub SetModified handle$, byref prevContents$, value
DESCRIPTION=Sub sets the "is-modified" state of a text control to true/false, and modifies the string used for comparison accordingly. Providing this string in the main program is the programmer's responsibility.
OUTSIDE CODE=

sub SetModified handle$, byref prevContents$, value
    'Arguments:
        'handle$ - handle of a text window, textbox or texteditor
        'prevContents$ - providing a string for control contents is the programmer's
        'task. Just associate a string for each text control but don't modify it
        'outside the function
        'value -
            'non-zero (1): set to modified
            'zero (0): set to not modified
    if value = 0 then
        #handle$, "!contents? prevContents$"
        else
        prevContents$ = chr$(0)
    end if
end sub
