BSOne.SFC/Tocsg.Module/ClipboardMon/DCbMonMain.dfm

object DlgCbMonMain: TDlgCbMonMain
  Left = 0
  Top = 0
  Caption = 'ClipboardMon'
  ClientHeight = 414
  ClientWidth = 673
  Color = clBtnFace
  Constraints.MinHeight = 350
  Constraints.MinWidth = 460
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'Segoe UI'
  Font.Style = []
  Position = poScreenCenter
  TextHeight = 15
  object SP1: TSplitter
    Left = 0
    Top = 193
    Width = 673
    Height = 4
    Cursor = crVSplit
    Align = alTop
    ExplicitTop = 177
    ExplicitWidth = 700
  end
  object pnTop: TPanel
    Left = 0
    Top = 0
    Width = 673
    Height = 41
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    ExplicitLeft = 104
    ExplicitTop = 88
    ExplicitWidth = 185
    object btnCbMon: TButton
      Left = 8
      Top = 8
      Width = 137
      Height = 25
      Caption = #53364#47549#48372#46300' '#49688#51665' '#49884#51089
      TabOrder = 0
      OnClick = btnCbMonClick
    end
  end
  object vtList: TVirtualStringTree
    Left = 0
    Top = 41
    Width = 673
    Height = 152
    Align = alTop
    Header.AutoSizeIndex = 3
    Header.Options = [hoColumnResize, hoDrag, hoShowSortGlyphs, hoVisible]
    HintMode = hmTooltip
    ParentShowHint = False
    PopupMenu = popFun
    ShowHint = True
    TabOrder = 1
    TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages]
    TreeOptions.SelectionOptions = [toFullRowSelect, toMultiSelect, toRightClickSelect]
    OnFocusChanged = vtListFocusChanged
    OnFreeNode = vtListFreeNode
    OnGetText = vtListGetText
    OnGetHint = vtListGetHint
    OnGetNodeDataSize = vtListGetNodeDataSize
    Touch.InteractiveGestures = [igPan, igPressAndTap]
    Touch.InteractiveGestureOptions = [igoPanSingleFingerHorizontal, igoPanSingleFingerVertical, igoPanInertia, igoPanGutter, igoParentPassthrough]
    ExplicitTop = 39
    Columns = <
      item
        Position = 0
        Text = #48264#54840
      end
      item
        Position = 1
        Text = #49688#51665' '#51068#49884
        Width = 150
      end
      item
        Position = 2
        Text = #54532#47196#49464#49828' '#51060#47492
        Width = 90
      end
      item
        Position = 3
        Text = #50952#46020#50864' '#52897#49496
        Width = 120
      end
      item
        Position = 4
        Text = #54252#47607
        Width = 80
      end
      item
        Position = 5
        Text = #45236#50857
        Width = 243
      end>
    DefaultText = ''
  end
  object cpMain: TCardPanel
    Left = 0
    Top = 197
    Width = 673
    Height = 217
    Align = alClient
    ActiveCard = cdHtml
    BevelOuter = bvNone
    Caption = 'cpMain'
    TabOrder = 2
    ExplicitLeft = 48
    ExplicitTop = 216
    ExplicitWidth = 300
    ExplicitHeight = 200
    object cdText: TCard
      Left = 0
      Top = 0
      Width = 673
      Height = 217
      Caption = 'cdText'
      CardIndex = 0
      TabOrder = 0
      ExplicitWidth = 185
      ExplicitHeight = 41
      object mmText: TMemo
        Left = 0
        Top = 0
        Width = 673
        Height = 217
        Align = alClient
        ReadOnly = True
        ScrollBars = ssBoth
        TabOrder = 0
        ExplicitLeft = 184
        ExplicitTop = 104
        ExplicitWidth = 185
        ExplicitHeight = 89
      end
    end
    object cdHtml: TCard
      Left = 0
      Top = 0
      Width = 673
      Height = 217
      Caption = 'cdHtml'
      CardIndex = 1
      TabOrder = 1
      ExplicitWidth = 185
      ExplicitHeight = 41
      object web: TWebBrowser
        Left = 0
        Top = 0
        Width = 673
        Height = 217
        Align = alClient
        TabOrder = 0
        ExplicitLeft = 168
        ExplicitTop = 80
        ExplicitWidth = 300
        ExplicitHeight = 150
        ControlData = {
          4C0000008E4500006D1600000000000000000000000000000000000000000000
          000000004C000000000000000000000001000000E0D057007335CF11AE690800
          2B2E126208000000000000004C0000000114020000000000C000000000000046
          8000000000000000000000000000000000000000000000000000000000000000
          00000000000000000100000000000000000000000000000000000000}
      end
    end
    object cdImage: TCard
      Left = 0
      Top = 0
      Width = 673
      Height = 217
      Caption = 'cdImage'
      CardIndex = 2
      TabOrder = 2
      ExplicitWidth = 185
      ExplicitHeight = 41
      object imgEn: TImageEn
        Left = 0
        Top = 0
        Width = 673
        Height = 217
        Cursor = crHandPoint
        Background = clBlack
        Ctl3D = False
        ParentCtl3D = False
        LegacyBitmap = True
        MouseInteract = [miZoom, miScroll]
        AutoFit = True
        OnMouseWheel = imgEnMouseWheel
        EnableInteractionHints = True
        MouseWheelParams.Action = iemwZoom
        Align = alClient
        PopupMenu = popIFun
        TabOrder = 0
        ExplicitWidth = 601
        ExplicitHeight = 382
      end
    end
  end
  object popFun: TPopupMenu
    AutoHotkeys = maManual
    OnPopup = popFunPopup
    Left = 144
    Top = 104
    object miClear: TMenuItem
      Caption = #47785#47197' '#52488#44592#54868
      OnClick = miClearClick
    end
  end
  object popIFun: TPopupMenu
    AutoHotkeys = maManual
    Left = 248
    Top = 272
    object miSetFit: TMenuItem
      Caption = #54868#47732#50640' '#47582#52644
      Checked = True
      OnClick = miSetFitClick
    end
    object miSetOrgSize: TMenuItem
      Caption = #50896#48376' '#53356#44592
      OnClick = miSetOrgSizeClick
    end
  end
end