BSOne.SFC/Tocsg.Module/KeyMon/EXE_KeyMon/DKeyMonMain.dfm

148 lines
3.7 KiB
Plaintext

object DlgKeyMon: TDlgKeyMon
Left = 0
Top = 0
Caption = 'KeyMon'
ClientHeight = 384
ClientWidth = 567
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Position = poScreenCenter
TextHeight = 13
object Splitter1: TSplitter
Left = 0
Top = 281
Width = 567
Height = 5
Cursor = crVSplit
Align = alBottom
ExplicitTop = 0
ExplicitWidth = 279
end
object Splitter2: TSplitter
Left = 217
Top = 0
Width = 5
Height = 281
ExplicitHeight = 267
end
object mmLog: TMemo
Left = 0
Top = 286
Width = 567
Height = 98
Align = alBottom
ImeName = 'Microsoft IME 2010'
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
ExplicitTop = 268
ExplicitWidth = 557
end
object vtList: TVirtualStringTree
Left = 0
Top = 0
Width = 217
Height = 281
Align = alLeft
Colors.BorderColor = 15987699
Colors.DisabledColor = clGray
Colors.DropMarkColor = 15385233
Colors.DropTargetColor = 15385233
Colors.DropTargetBorderColor = 15385233
Colors.FocusedSelectionColor = 15385233
Colors.FocusedSelectionBorderColor = 15385233
Colors.GridLineColor = 15987699
Colors.HeaderHotColor = clBlack
Colors.HotColor = clBlack
Colors.SelectionRectangleBlendColor = 15385233
Colors.SelectionRectangleBorderColor = 15385233
Colors.SelectionTextColor = clBlack
Colors.TreeLineColor = 9471874
Colors.UnfocusedColor = clGray
Colors.UnfocusedSelectionColor = clWhite
Colors.UnfocusedSelectionBorderColor = clWhite
Header.AutoSizeIndex = 0
Header.Options = [hoColumnResize, hoDrag, hoShowSortGlyphs, hoVisible]
HintMode = hmTooltip
ParentShowHint = False
ShowHint = True
TabOrder = 1
TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages, toFullVertGridLines]
TreeOptions.SelectionOptions = [toFullRowSelect, toRightClickSelect]
OnFocusChanged = vtListFocusChanged
OnFreeNode = vtListFreeNode
OnGetText = vtListGetText
OnGetHint = vtListGetHint
OnGetNodeDataSize = vtListGetNodeDataSize
Touch.InteractiveGestures = [igPan, igPressAndTap]
Touch.InteractiveGestureOptions = [igoPanSingleFingerHorizontal, igoPanSingleFingerVertical, igoPanInertia, igoPanGutter, igoParentPassthrough]
Columns = <
item
Position = 0
Text = #48264#54840
end
item
Position = 1
Text = #54532#47196#49464#49828
Width = 100
end
item
Position = 2
Text = #51077#47141
end>
end
object pnClient: TPanel
Left = 222
Top = 0
Width = 345
Height = 281
Align = alClient
BevelOuter = bvNone
TabOrder = 2
ExplicitWidth = 335
ExplicitHeight = 263
object mmInput: TMemo
Left = 0
Top = 25
Width = 345
Height = 256
Align = alClient
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 0
ExplicitWidth = 335
ExplicitHeight = 238
end
object pnClientTop: TPanel
Left = 0
Top = 0
Width = 345
Height = 25
Align = alTop
BevelOuter = bvNone
TabOrder = 1
ExplicitWidth = 335
object btnRefresh: TSpeedButton
Left = 1
Top = 2
Width = 64
Height = 22
Caption = #49352#47196#44256#52840
OnClick = btnRefreshClick
end
object btnTrans: TSpeedButton
Left = 66
Top = 2
Width = 64
Height = 22
Caption = #54620#50689#48320#54872
OnClick = btnTransClick
end
end
end
end