[Overview][Types][Classes][Index] | Reference for unit 'PropertyStorage' (#lcl)

# TCustomPropertyStorage

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

## Declaration

Source position: propertystorage.pas line 116

`type TCustomPropertyStorage = class(TComponent)`
`protected`
`function GetRoot; virtual;` |  |
`function RootSection; virtual;` |  |
`procedure SaveProperties; virtual;` |  |
`procedure RestoreProperties; virtual;` |  |
`procedure GetPropertyList(); virtual; abstract;` |  |
`procedure FinishPropertyList(); virtual;` |  |
`function DoReadInteger(); virtual;` |  |
`function DoReadString(); virtual; abstract;` |  |
`procedure DoWriteString(); virtual; abstract;` |  |
`procedure DoWriteInteger(); virtual;` |  |
`procedure DoEraseSections(); virtual; abstract;` |  |
`public`
`constructor Create(); override;` |  |
`destructor Destroy; override;` |  |
`procedure Save; virtual;` |  |
`procedure Restore; virtual;` |  |
`procedure StorageNeeded(); virtual;` |  |
`procedure FreeStorage; virtual;` |  |
`function ReadBoolean();`
`function ReadString();` |  |
`function ReadInteger();` |  |
`procedure ReadRect();`
`procedure ReadStrings();`
`procedure WriteString();` |  |
`procedure WriteInteger();` |  |
`procedure WriteBoolean();`
`procedure WriteRect();`
`procedure WriteStrings();`
`procedure EraseSections;` |  |
`property StoredValue: TStoredType; [rw]` |  |
`property Root: TComponent; [r]` |  |
`property Active: Boolean; [rw]` |  |
`property StoredValues: TStoredValues; [rw]` |  |
`property OnSavingProperties: TNotifyEvent; [rw]`
`property OnSaveProperties: TNotifyEvent; [rw]` |  |
`property OnRestoringProperties: TNotifyEvent; [rw]`
`property OnRestoreProperties: TNotifyEvent; [rw]` |  |
`end;`

## Inheritance

`TCustomPropertyStorage` |  |
`TComponent,IUnknown,IInterfaceComponentReference`
`TPersistent`
`TObject`

The latest version of this document can be found at lazarus-ccr.sourceforge.net .