Difference between revisions of "TCachePage"

Latest revision as of 04:22, 20 July 2023

@@ Line 38: / Line 38: @@
 |-
 | <code>FSector:LongWord;</code>
-| &nbsp;
+| Current Starting Sector (Calculated from Device)
 |-
 | <code>FCount:Word;</code>
-| &nbsp;
+| Current Sector Count (Calculated from Device)
 |-
 |colspan="2"|&nbsp;

`constructor Create;`
`destructor Destroy; override;`
private
`FDevice:TDiskDevice;`

`FData:Pointer;`

`FSector:LongWord;`	Current Starting Sector (Calculated from Device)
`FCount:Word;`	Current Sector Count (Calculated from Device)

`FPageTime:Int64;`	Time Page was Allocated from Empty (Ticks)
`FWriteTime:Int64;`	Time Page was Allocated to Dirty (Ticks)
`FPageType:TCachePageType;`
`FPageState:TCachePageState;`

`FPrevPage:TCachePage;`	Previous page in Page list
`FNextPage:TCachePage;`	Next page in Page list

`FPrevLink:TCachePage;`	Previous page in Empty/Clean/Dirty list
`FNextLink:TCachePage;`	Next page in Empty/Clean/Dirty list
public
`property Device:TDiskDevice read FDevice write FDevice;`

`property Data:Pointer read FData write FData;`

`property Sector:LongWord read FSector write FSector;`
`property Count:Word read FCount write FCount;`

`property PageTime:Int64 read FPageTime write FPageTime;`
`property WriteTime:Int64 read FWriteTime write FWriteTime;`
`property PageType:TCachePageType read FPageType write FPageType;`
`property PageState:TCachePageState read FPageState write FPageState;`

`property PrevPage:TCachePage read FPrevPage write FPrevPage;`
`property NextPage:TCachePage read FNextPage write FNextPage;`

`property PrevLink:TCachePage read FPrevLink write FPrevLink;`
`property NextLink:TCachePage read FNextLink write FNextLink;`