object frmMemoryAllocHandler: TfrmMemoryAllocHandler Left = 631 Height = 174 Top = 372 Width = 446 AutoSize = True BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'Memory Allocations' ClientHeight = 174 ClientWidth = 446 OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow Position = poScreenCenter LCLVersion = '1.6.0.4' object GroupBox1: TGroupBox Left = 0 Height = 137 Top = 37 Width = 446 Align = alClient Caption = 'Data' ClientHeight = 117 ClientWidth = 442 TabOrder = 0 OnClick = GroupBox1Click object lblErr: TLabel AnchorSideLeft.Control = Panel2 AnchorSideTop.Control = Panel2 AnchorSideTop.Side = asrBottom Left = 6 Height = 15 Top = 65 Width = 358 BorderSpacing.Top = 5 Caption = 'Couldn''t find in heap. Found using the Alloc hook. (Not very useful)' Font.Color = clRed ParentColor = False ParentFont = False Visible = False end object StatusBar1: TStatusBar AnchorSideTop.Control = lblErr AnchorSideTop.Side = asrBottom AnchorSideRight.Control = GroupBox1 AnchorSideRight.Side = asrBottom Left = 0 Height = 23 Top = 85 Width = 442 Align = alNone Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 5 Panels = < item Text = '-' Width = 300 end item Text = '--' Width = 50 end> SimplePanel = False end object Panel2: TPanel AnchorSideLeft.Control = GroupBox1 AnchorSideTop.Control = GroupBox1 Left = 6 Height = 60 Top = 0 Width = 97 AutoSize = True BorderSpacing.Left = 6 BorderSpacing.Bottom = 4 BevelOuter = bvNone ClientHeight = 60 ClientWidth = 97 TabOrder = 1 object Label2: TLabel AnchorSideTop.Control = lblBaseAddress AnchorSideRight.Control = lblBaseAddress Left = 0 Height = 15 Top = 0 Width = 72 Anchors = [akTop, akRight] BorderSpacing.Right = 5 Caption = 'Base Address:' ParentColor = False end object lblBaseAddress: TLabel AnchorSideTop.Control = Panel2 AnchorSideRight.Control = Panel2 AnchorSideRight.Side = asrBottom Left = 77 Height = 15 Top = 0 Width = 20 Anchors = [akTop, akRight] Caption = 'xxxx' ParentColor = False end object lblSize: TLabel AnchorSideLeft.Control = lblBaseAddress AnchorSideTop.Control = lblBaseAddress AnchorSideTop.Side = asrBottom Left = 77 Height = 15 Top = 15 Width = 20 Caption = 'xxxx' ParentColor = False end object Label4: TLabel AnchorSideTop.Control = lblSize AnchorSideRight.Control = lblSize Left = 49 Height = 15 Top = 15 Width = 23 Anchors = [akTop, akRight] BorderSpacing.Right = 5 Caption = 'Size:' ParentColor = False end object Label3: TLabel AnchorSideTop.Control = lblHeapHandle AnchorSideRight.Control = lblHeapHandle Left = 6 Height = 15 Top = 30 Width = 66 Anchors = [akTop, akRight] BorderSpacing.Right = 5 Caption = 'HeapHandle' ParentColor = False end object lblHeapHandle: TLabel AnchorSideLeft.Control = lblBaseAddress AnchorSideTop.Control = lblSize AnchorSideTop.Side = asrBottom Left = 77 Height = 15 Top = 30 Width = 20 Caption = 'xxxx' ParentColor = False end object lblFlags: TLabel AnchorSideLeft.Control = lblBaseAddress AnchorSideTop.Control = lblHeapHandle AnchorSideTop.Side = asrBottom Left = 77 Height = 15 Top = 45 Width = 20 Caption = 'xxxx' ParentColor = False end object Label1: TLabel AnchorSideTop.Control = lblHeapHandle AnchorSideTop.Side = asrBottom AnchorSideRight.Control = lblFlags Left = 42 Height = 15 Top = 45 Width = 30 Anchors = [akTop, akRight] BorderSpacing.Right = 5 Caption = 'Flags:' ParentColor = False end end end object Panel1: TPanel Left = 0 Height = 37 Top = 0 Width = 446 Align = alTop AutoSize = True BevelOuter = bvNone ClientHeight = 37 ClientWidth = 446 TabOrder = 1 object Edit1: TEdit AnchorSideLeft.Control = Panel1 AnchorSideTop.Control = Panel1 Left = 8 Height = 23 Top = 8 Width = 121 BorderSpacing.Left = 8 BorderSpacing.Top = 8 TabOrder = 0 end object Button1: TButton AnchorSideLeft.Control = Edit1 AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = Edit1 AnchorSideTop.Side = asrCenter Left = 131 Height = 25 Top = 7 Width = 104 AutoSize = True BorderSpacing.Left = 2 BorderSpacing.Bottom = 5 Caption = 'Check Address' OnClick = Button1Click TabOrder = 1 end object btnReload: TButton AnchorSideLeft.Control = cbHookAllocs AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = Edit1 AnchorSideTop.Side = asrCenter AnchorSideRight.Control = Panel1 AnchorSideRight.Side = asrBottom Left = 373 Height = 25 Top = 7 Width = 65 Anchors = [akTop, akLeft, akRight] AutoSize = True BorderSpacing.Right = 8 BorderSpacing.Bottom = 5 Caption = 'Reload' OnClick = btnReloadClick TabOrder = 2 end object cbHookAllocs: TCheckBox AnchorSideLeft.Control = Button1 AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = Edit1 AnchorSideTop.Side = asrCenter Left = 243 Height = 19 Top = 10 Width = 130 BorderSpacing.Left = 8 Caption = 'Hook alloc functions' OnClick = cbHookAllocsClick TabOrder = 3 end end object Timer1: TTimer OnTimer = Timer1Timer left = 456 top = 64 end end