object frmStringMap: TfrmStringMap Left = 392 Height = 400 Top = 322 Width = 480 AutoSize = True Caption = 'String map' ClientHeight = 400 ClientWidth = 480 OnClose = FormClose OnDestroy = FormDestroy OnResize = FormResize Position = poScreenCenter LCLVersion = '1.6.0.4' object Panel1: TPanel Left = 309 Height = 400 Top = 0 Width = 171 Align = alRight AutoSize = True ClientHeight = 400 ClientWidth = 171 TabOrder = 0 OnResize = Panel1Resize object ProgressBar1: TProgressBar AnchorSideLeft.Control = Panel1 AnchorSideLeft.Side = asrCenter AnchorSideTop.Control = Panel1 AnchorSideRight.Side = asrBottom Left = 3 Height = 20 Top = 5 Width = 165 BorderSpacing.Left = 4 BorderSpacing.Top = 4 BorderSpacing.Right = 4 TabOrder = 0 end object lblStringCount: TLabel AnchorSideLeft.Control = Panel2 AnchorSideTop.Control = Panel2 AnchorSideTop.Side = asrBottom Left = 6 Height = 15 Top = 86 Width = 74 Caption = 'Stringcount: 0' ParentColor = False end object btnShowList: TButton AnchorSideLeft.Control = Panel1 AnchorSideBottom.Control = Panel1 AnchorSideBottom.Side = asrBottom Left = 1 Height = 25 Top = 372 Width = 89 Anchors = [akLeft, akBottom] AutoSize = True BorderSpacing.Bottom = 2 Caption = '< HideSelection = False PopupMenu = pmStringList ReadOnly = True RowSelect = True TabOrder = 1 ViewStyle = vsReport OnDblClick = ListView1DblClick end object SaveDialog1: TSaveDialog DefaultExt = '.txt' Filter = 'Text files|*.txt' left = 57 top = 170 end object pmStringList: TPopupMenu left = 35 top = 33 object miFind: TMenuItem Caption = 'Find...' ShortCut = 16454 OnClick = miFindClick end object miNext: TMenuItem Caption = 'Next' Enabled = False ShortCut = 114 Visible = False OnClick = miNextClick end end object FindDialog1: TFindDialog Width = 480 Height = 136 Options = [frDown, frHideWholeWord, frHideUpDown, frHideEntireScope] OnFind = FindDialog1Find left = 136 top = 40 end end