| Class Zone_Options (unit Zone_settings) |
TObject
| Constructors |
constructor Create;| Functions |
destructor destroy;
procedure read_ini;
procedure write_ini;| Properties |
| Events |
| Variables |
Cycle_tagged : boolean;
Cycling_mode : boolean;
error_flag : set of Zone_error;
error_string : String;
Max_time : Integer;
Min_time : Integer;
Prompt_change : boolean;
Prompt_force : boolean;
settings_name : String;
Startup_cycling : boolean;
Zone_Directory : String;| Constructors |
constructor Create;///////////////////////////////////////////////////////////////////////////// Zone_Options /////////////////////////////////////////////////////////////////////////////
| Functions |
destructor destroy;
procedure read_ini;
procedure write_ini;if not FileExists(INIFile) then begin error_flag := error_flag + [INI_file_not_found]; error_string := error_string + 'Zonerings couldn''t find the INI file '+INIfile+eol; end;
| Properties |
| Events |
| Variables |
Cycle_tagged : boolean;
Cycling_mode : boolean;
error_flag : set of Zone_error;we'll use a global error flag
error_string : String;
Max_time : Integer;
Min_time : Integer;
Prompt_change : boolean;
Prompt_force : boolean;
settings_name : String;
Startup_cycling : boolean;
Zone_Directory : String;