inherited frmClipboard: TfrmClipboard Left = 1052 Top = 199 Width = 193 Height = 551 BorderStyle = bsSizeToolWin Caption = 'Clipboard' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnActivate = FormActivate PixelsPerInch = 96 TextHeight = 13 object lvDataInClipboads: TListView Left = 0 Top = 22 Width = 185 Height = 502 Align = alClient Columns = < item Width = 10 end> ReadOnly = True RowSelect = True PopupMenu = pmClipboardViewer ShowColumnHeaders = False SmallImages = frmrkEdit.ImageList1 TabOrder = 0 ViewStyle = vsReport OnDblClick = lvDataInClipboadsDblClick OnResize = lvDataInClipboadsResize end object ToolBar1: TToolBar Left = 0 Top = 0 Width = 185 Height = 22 AutoSize = True Caption = 'ToolBar1' EdgeBorders = [] Flat = True Images = frmrkEdit.ImageList1 ParentShowHint = False ShowHint = True TabOrder = 1 object ToolButton1: TToolButton Left = 0 Top = 0 Action = frmrkEdit.actInsertTextFromClipoardx end object ToolButton2: TToolButton Left = 23 Top = 0 Action = frmrkEdit.actDeleteTextInClipboardx end end object pmClipboardViewer: TPopupMenu Images = frmrkEdit.ImageList1 Left = 64 Top = 72 object Inserttextfromclipboardx1: TMenuItem Action = frmrkEdit.actInsertTextFromClipoardx end object Deletetextinclipboardx1: TMenuItem Action = frmrkEdit.actDeleteTextInClipboardx end object Alwaysontop1: TMenuItem Action = frmrkEdit.actClipboardViewerOnTop end end end