object frmPointerScanner: TfrmPointerScanner Left = 667 Height = 460 Top = 344 Width = 749 Caption = 'Pointer scan' ClientHeight = 440 ClientWidth = 749 Menu = MainMenu1 OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnResize = FormResize OnShow = FormShow Position = poScreenCenter LCLVersion = '1.6.0.4' object Panel1: TPanel Left = 0 Height = 27 Top = 0 Width = 749 Align = alTop AutoSize = True BevelOuter = bvNone ClientHeight = 27 ClientWidth = 749 TabOrder = 0 object cbType: TComboBox AnchorSideTop.Control = Panel1 Left = 0 Height = 23 Top = 2 Width = 145 BorderSpacing.Top = 2 BorderSpacing.Bottom = 2 ItemHeight = 15 Items.Strings = ( '4 Byte' 'Float' 'Double' ) OnChange = cbTypeChange Style = csDropDownList TabOrder = 0 Visible = False end object cbTestCrappyConnection: TCheckBox AnchorSideLeft.Control = Panel1 Left = 320 Height = 19 Top = 2 Width = 146 Anchors = [akTop] Caption = 'Simulate no connection' OnChange = cbTestCrappyConnectionChange TabOrder = 1 Visible = False end object cbNonResponsive: TCheckBox Left = 480 Height = 19 Top = 2 Width = 165 Caption = 'Non responsive connection' OnChange = cbNonResponsiveChange TabOrder = 2 Visible = False end end object btnStopRescanLoop: TButton Left = 160 Height = 25 Top = -1 Width = 144 Caption = 'Stop rescan loop' OnClick = btnStopRescanLoopClick TabOrder = 2 Visible = False end object pnlProgress: TPanel Left = 0 Height = 25 Top = 415 Width = 749 Align = alBottom AutoSize = True ClientHeight = 25 ClientWidth = 749 TabOrder = 3 Visible = False object pnlProgressName: TPanel Left = 1 Height = 23 Top = 1 Width = 143 Align = alLeft BevelOuter = bvNone ClientHeight = 23 ClientWidth = 143 TabOrder = 0 object lblProgressbar1: TLabel AnchorSideTop.Side = asrCenter Left = 0 Height = 15 Top = 2 Width = 123 Caption = 'Generating pointermap' ParentColor = False end end object pnlProgressBar: TPanel Left = 144 Height = 23 Top = 1 Width = 604 Align = alClient ClientHeight = 23 ClientWidth = 604 TabOrder = 1 object ProgressBar1: TProgressBar AnchorSideLeft.Control = pnlProgressBar AnchorSideTop.Control = pnlProgressBar AnchorSideRight.Control = pnlProgressBar AnchorSideRight.Side = asrBottom Left = 1 Height = 21 Top = 1 Width = 602 Anchors = [akTop, akLeft, akRight] Step = 1 TabOrder = 0 end end end object pnlData: TPanel Left = 0 Height = 388 Top = 27 Width = 749 Align = alClient BevelOuter = bvNone Caption = 'pnlData' ClientHeight = 388 ClientWidth = 749 TabOrder = 4 object tvInfo: TTreeView Left = 0 Height = 359 Top = 0 Width = 590 Align = alClient DefaultItemHeight = 18 Indent = 19 PopupMenu = miInfoPopup ReadOnly = True RightClickSelect = True RowSelect = True TabOrder = 0 Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoRightClickSelect, tvoRowSelect, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw] end object pnlStop: TPanel Left = 0 Height = 29 Top = 359 Width = 749 Align = alBottom AutoSize = True BevelOuter = bvNone ClientHeight = 29 ClientWidth = 749 TabOrder = 1 object btnStopScan: TButton Left = 0 Height = 25 Hint = 'This will stop the current scan and show you the results it has found' Top = 2 Width = 90 AutoSize = True BorderSpacing.Top = 2 BorderSpacing.Bottom = 2 Caption = 'Stop' Constraints.MinWidth = 90 OnClick = btnStopScanClick ParentShowHint = False ShowHint = True TabOrder = 0 end end object pnlControl: TPanel Left = 590 Height = 359 Top = 0 Width = 159 Align = alRight AutoSize = True BevelOuter = bvNone ClientHeight = 359 ClientWidth = 159 TabOrder = 2 object cbPriority: TComboBox AnchorSideLeft.Control = lblThreadPriority AnchorSideTop.Control = lblThreadPriority AnchorSideTop.Side = asrBottom AnchorSideRight.Control = pnlControl AnchorSideRight.Side = asrBottom Left = 2 Height = 23 Top = 206 Width = 155 Anchors = [akTop, akLeft, akRight] BorderSpacing.Right = 2 ItemHeight = 15 ItemIndex = 3 Items.Strings = ( 'Idle' 'Lowest' 'Lower' 'Normal' 'Higher' 'Highest' 'TimeCritical' ) OnChange = cbPriorityChange Style = csDropDownList TabOrder = 0 Text = 'Normal' end object gbNetwork: TGroupBox AnchorSideRight.Side = asrBottom Left = 0 Height = 191 Top = 0 Width = 159 Align = alTop AutoSize = True Caption = 'Network' ClientHeight = 171 ClientWidth = 155 TabOrder = 1 object edtIP: TEdit AnchorSideLeft.Control = lblIP AnchorSideTop.Control = lblIP AnchorSideTop.Side = asrBottom AnchorSideRight.Control = gbNetwork AnchorSideRight.Side = asrBottom Left = 2 Height = 23 Top = 17 Width = 151 Anchors = [akTop, akLeft, akRight] BorderSpacing.Right = 2 TabOrder = 0 end object lblIP: TLabel AnchorSideLeft.Control = gbNetwork AnchorSideTop.Control = gbNetwork Left = 2 Height = 15 Top = 2 Width = 10 BorderSpacing.Left = 2 BorderSpacing.Top = 2 Caption = 'IP' ParentColor = False end object lblPort: TLabel AnchorSideLeft.Control = lblIP AnchorSideTop.Control = edtIP AnchorSideTop.Side = asrBottom Left = 2 Height = 15 Top = 40 Width = 22 Caption = 'Port' ParentColor = False end object edtPort: TEdit AnchorSideLeft.Control = lblPort AnchorSideTop.Control = lblPort AnchorSideTop.Side = asrBottom Left = 2 Height = 23 Top = 55 Width = 80 NumbersOnly = True TabOrder = 1 Text = '52737' end object edtPassword: TEdit AnchorSideLeft.Control = lblPassword AnchorSideRight.Control = gbNetwork AnchorSideRight.Side = asrBottom Left = 2 Height = 23 Top = 100 Width = 151 Anchors = [akTop, akLeft, akRight] BorderSpacing.Right = 2 TabOrder = 2 end object lblPassword: TLabel AnchorSideLeft.Control = lblIP AnchorSideTop.Control = edtPort AnchorSideTop.Side = asrBottom Left = 2 Height = 15 Top = 78 Width = 50 Caption = 'Password' ParentColor = False end object cbTrusted: TCheckBox AnchorSideLeft.Control = edtPassword AnchorSideTop.Control = edtPassword AnchorSideTop.Side = asrBottom Left = 2 Height = 19 Hint = 'Trust that this server will not disappear during the scan and that the children it trusts itself won''t do so either' Top = 123 Width = 91 Caption = 'Trust stability' ParentShowHint = False ShowHint = True TabOrder = 3 end object btnConnect: TButton AnchorSideLeft.Control = gbNetwork AnchorSideTop.Control = cbTrusted AnchorSideTop.Side = asrBottom Left = 6 Height = 25 Top = 144 Width = 143 AutoSize = True BorderSpacing.Left = 6 BorderSpacing.Top = 2 BorderSpacing.Right = 6 BorderSpacing.Bottom = 2 Caption = 'Add to connection list' OnClick = btnConnectClick TabOrder = 4 end end object lblThreadPriority: TLabel AnchorSideLeft.Control = gbNetwork AnchorSideTop.Control = gbNetwork AnchorSideTop.Side = asrBottom Left = 2 Height = 15 Top = 191 Width = 123 BorderSpacing.Left = 2 Caption = 'Scanner thread priority:' ParentColor = False end object btnIncreaseThreadCount: TButton AnchorSideLeft.Control = btnDecreaseThreadCount AnchorSideTop.Control = btnDecreaseThreadCount AnchorSideTop.Side = asrBottom AnchorSideRight.Control = btnDecreaseThreadCount AnchorSideRight.Side = asrBottom Left = 2 Height = 25 Top = 272 Width = 142 AutoSize = True BorderSpacing.Top = 2 Caption = 'Increase worker count' OnClick = btnIncreaseThreadCountClick TabOrder = 2 end object btnDecreaseThreadCount: TButton AnchorSideLeft.Control = cbPriority AnchorSideTop.Control = cbPriority AnchorSideTop.Side = asrBottom AnchorSideRight.Control = cbPriority AnchorSideRight.Side = asrBottom Left = 2 Height = 25 Top = 245 Width = 146 AutoSize = True BorderSpacing.Top = 16 BorderSpacing.Right = 2 Caption = 'Decrease worker count' OnClick = btnDecreaseThreadCountClick TabOrder = 3 end end end object lvResults: TListView Left = 360 Height = 65 Top = 80 Width = 121 Columns = <> HideSelection = False OwnerData = True PopupMenu = PopupMenu1 ReadOnly = True RowSelect = True TabOrder = 1 Visible = False ViewStyle = vsReport OnColumnClick = lvResultsColumnClick OnData = lvResultsData OnDblClick = lvResultsDblClick OnResize = lvResultsResize end object MainMenu1: TMainMenu left = 464 top = 40 object File1: TMenuItem Caption = 'File' object New1: TMenuItem Caption = 'New' Enabled = False ShortCut = 16462 OnClick = New1Click end object N2: TMenuItem Caption = '-' end object Open1: TMenuItem Caption = 'Open' ShortCut = 16463 OnClick = Open1Click end object miExportTosqlite: TMenuItem Caption = 'Export to sqlite database' ShortCut = 16453 OnClick = miExportTosqliteClick end object miImportFromsqlite: TMenuItem Caption = 'Import from sqlite database' ShortCut = 16457 OnClick = miImportFromsqliteClick end end object MenuItem2: TMenuItem Caption = 'Distributed pointer scan' object miCreatePSNnode: TMenuItem Caption = 'Setup as PSN worker and/or node' ShortCut = 16452 OnClick = miCreatePSNnodeClick end end object Pointerscanner1: TMenuItem Caption = 'Pointer scanner' object Method3Fastspeedandaveragememoryusage1: TMenuItem Caption = 'Scan for pointer' ShortCut = 16464 OnClick = Method3Fastspeedandaveragememoryusage1Click end object N1: TMenuItem Caption = '-' end object Rescanmemory1: TMenuItem Caption = 'Rescan memory - Removes pointers not pointing to the right address' Enabled = False ShortCut = 16466 OnClick = Rescanmemory1Click end object miResume: TMenuItem Caption = 'Resume scan' Enabled = False ShortCut = 49234 Visible = False OnClick = miResumeClick end end end object SaveDialog1: TSaveDialog Title = 'Specify the filename you want to store the results' DefaultExt = '.PTR' Filter = 'Cheat Engine Pointerlist|*.PTR' Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing] left = 208 top = 288 end object OpenDialog1: TOpenDialog DefaultExt = '.PTR' Filter = 'Cheat Engine Pointerlist|*.PTR' left = 144 top = 288 end object Timer2: TTimer Interval = 500 OnTimer = Timer2Timer left = 72 top = 288 end object PopupMenu1: TPopupMenu left = 472 top = 272 object Resyncmodulelist1: TMenuItem Caption = 'Resync modulelist' OnClick = Resyncmodulelist1Click end object MenuItem1: TMenuItem Caption = 'Show modulelist' OnClick = MenuItem1Click end end object odMerge: TOpenDialog DefaultExt = '.ptr' Filter = 'Cheat Engine Pointerlist|*.PTR' Options = [ofAllowMultiSelect, ofFileMustExist, ofEnableSizing, ofViewDetail] left = 111 top = 198 end object SaveDialog2: TSaveDialog Title = 'Specify the filename for the pointermap you''re about to generate' DefaultExt = '.PTM' Filter = 'All files (*.*)|*.*|scandata files (*.scandata)|*.scandata' FilterIndex = 2 Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing] left = 304 top = 288 end object SQLite3: TSQLite3Connection Connected = False LoginPrompt = False KeepConnection = False Transaction = SQLTransaction Options = [] left = 56 top = 40 end object odSqlite: TOpenDialog DefaultExt = '.sqlite' Filter = 'All files (*.*)|*.*|Sqlite files (*.sqlite)|*.sqlite' FilterIndex = 2 left = 58 top = 98 end object SQLTransaction: TSQLTransaction Active = False Database = SQLite3 Options = [] left = 128 top = 40 end object SQLQuery: TSQLQuery FieldDefs = <> Database = SQLite3 Transaction = SQLTransaction Options = [] Params = <> left = 223 top = 46 end object sdSqlite: TSaveDialog DefaultExt = '.sqlite' Filter = 'All files (*.*)|*.*|Sqlite files (*.sqlite)|*.sqlite' FilterIndex = 2 left = 128 top = 98 end object miInfoPopup: TPopupMenu OnPopup = miInfoPopupPopup left = 258 top = 178 object miDisconnect: TMenuItem Caption = 'Disconnect' OnClick = miDisconnectClick end object miForceDisconnect: TMenuItem Caption = 'Unsafe disconnect' Enabled = False OnClick = miForceDisconnectClick end end end