Class Zone_settings_file (unit Zone_settings)

Inherits from

TObject

Constructors


constructor Create;

///////////////////////////////////////////////////////////////////////////// Zone_settings_file methods /////////////////////////////////////////////////////////////////////////////


Functions

procedure Add(setting:Zone_setting);


procedure Clear;


procedure Close_File;


procedure Delete(index:integer);

if we didn't find a tagged one, then just pick any old one

destructor Destroy;


function Entries : integer;


function Entry(index:integer) : Zone_setting;


function Open_File(filename:string; showthoughts:boolean) : boolean;


procedure Overwrite(index:integer; setting:Zone_setting);


function Random_Setting(tagged_only:boolean) : integer;


procedure Read_settings_data;


procedure Save_settings_data;


procedure Set_setting_name(index:integer; name:string);


procedure Set_setting_screensave(index:integer; val:boolean);


Properties

Events

Variables

compressed_data : My_LZH_Compressor;


file_name : string;


memory : TMemoryStream;


Modified : boolean;


Settings : TList;



Constructors


constructor Create;

///////////////////////////////////////////////////////////////////////////// Zone_settings_file methods /////////////////////////////////////////////////////////////////////////////


Functions


procedure Add(setting:Zone_setting);


procedure Clear;


procedure Close_File;


procedure Delete(index:integer);

if we didn't find a tagged one, then just pick any old one


destructor Destroy;


function Entries : integer;


function Entry(index:integer) : Zone_setting;


function Open_File(filename:string; showthoughts:boolean) : boolean;


procedure Overwrite(index:integer; setting:Zone_setting);


function Random_Setting(tagged_only:boolean) : integer;


procedure Read_settings_data;


procedure Save_settings_data;


procedure Set_setting_name(index:integer; name:string);


procedure Set_setting_screensave(index:integer; val:boolean);


Properties


Events


Variables


compressed_data : My_LZH_Compressor;


file_name : string;


memory : TMemoryStream;


Modified : boolean;


Settings : TList;