object frmPaging: TfrmPaging Left = 678 Height = 235 Top = 262 Width = 412 Caption = 'Paging' ClientHeight = 235 ClientWidth = 412 OnCreate = FormCreate OnDestroy = FormDestroy LCLVersion = '1.6.0.4' object tvPage: TTreeView Left = 0 Height = 185 Top = 50 Width = 412 Align = alClient DefaultItemHeight = 18 PopupMenu = PopupMenu1 ReadOnly = True TabOrder = 0 OnDblClick = tvPageDblClick OnExpanding = tvPageExpanding Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw] end object frmPaging: TPanel Left = 0 Height = 50 Top = 0 Width = 412 Align = alTop AutoSize = True BevelOuter = bvNone ClientHeight = 50 ClientWidth = 412 TabOrder = 1 object edtCR3: TEdit AnchorSideLeft.Control = Label1 AnchorSideRight.Control = Button1 Left = 5 Height = 23 Top = 24 Width = 222 Anchors = [akTop, akLeft, akRight] BorderSpacing.Right = 4 BorderSpacing.Bottom = 2 TabOrder = 0 end object Button1: TButton AnchorSideTop.Control = edtCR3 AnchorSideTop.Side = asrCenter AnchorSideRight.Control = Label1 AnchorSideRight.Side = asrBottom Left = 231 Height = 25 Top = 23 Width = 75 Anchors = [akTop, akRight] BorderSpacing.Bottom = 2 Caption = 'Go' OnClick = Button1Click TabOrder = 1 end object Label1: TLabel AnchorSideLeft.Control = frmPaging AnchorSideTop.Control = frmPaging Left = 5 Height = 15 Top = 3 Width = 301 BorderSpacing.Left = 5 BorderSpacing.Top = 3 Caption = 'Fill in the physical address of the paging base (or just cr3)' ParentColor = False end object cb8byteentries: TCheckBox AnchorSideLeft.Control = Label1 AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = Label1 Left = 310 Height = 19 Top = 3 Width = 92 BorderSpacing.Left = 4 Caption = '8-byte entries' TabOrder = 2 end object cb64bit: TCheckBox AnchorSideLeft.Control = cb8byteentries AnchorSideTop.Control = cb8byteentries AnchorSideTop.Side = asrBottom Left = 310 Height = 19 Top = 22 Width = 51 BorderSpacing.Bottom = 2 Caption = '64-bit' OnChange = cb64bitChange TabOrder = 3 end end object FindDialog1: TFindDialog Options = [frDown, frHideMatchCase, frHideWholeWord, frHideUpDown, frDisableMatchCase, frDisableUpDown, frDisableWholeWord, frEntireScope] OnFind = FindDialog1Find left = 49 top = 114 end object PopupMenu1: TPopupMenu left = 124 top = 83 object MenuItem1: TMenuItem Caption = 'Find' ShortCut = 16454 OnClick = MenuItem1Click end end end