BSOne.SFC/Tocsg.Module/MtpMon/DMptMonMain.dfm

155 lines
4.0 KiB
Plaintext

object DlgMptMonMain: TDlgMptMonMain
Left = 0
Top = 0
Caption = 'DlgMptMonMain'
ClientHeight = 292
ClientWidth = 517
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = []
Position = poScreenCenter
TextHeight = 15
object pcMain: TPageControl
Left = 0
Top = 0
Width = 517
Height = 292
ActivePage = tabMtpList
Align = alClient
TabOrder = 0
ExplicitLeft = 56
ExplicitTop = 40
ExplicitWidth = 289
ExplicitHeight = 193
object tabMtpList: TTabSheet
Caption = 'MTP '#47785#47197' '#51221#48372
object pnTop: TPanel
Left = 0
Top = 0
Width = 509
Height = 27
Align = alTop
BevelOuter = bvNone
TabOrder = 0
ExplicitWidth = 479
object btnRefresh: TButton
Left = 0
Top = 1
Width = 75
Height = 25
Caption = #49352#47196#44256#52840
TabOrder = 0
OnClick = btnRefreshClick
end
end
object vtList: TVirtualStringTree
Left = 0
Top = 27
Width = 509
Height = 235
Align = alClient
Header.AutoSizeIndex = 0
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, toRightClickSelect]
OnContextPopup = vtListContextPopup
OnFreeNode = vtListFreeNode
OnGetText = vtListGetText
OnGetHint = vtListGetHint
OnGetNodeDataSize = vtListGetNodeDataSize
Touch.InteractiveGestures = [igPan, igPressAndTap]
Touch.InteractiveGestureOptions = [igoPanSingleFingerHorizontal, igoPanSingleFingerVertical, igoPanInertia, igoPanGutter, igoParentPassthrough]
ExplicitWidth = 479
Columns = <
item
Position = 0
Text = #48264#54840
end
item
Position = 1
Text = #51060#47492
Width = 120
end
item
Position = 2
Text = #49444#47749
Width = 100
end
item
Position = 3
Text = #51228#51312#49324
Width = 80
end
item
Position = 4
Text = #54616#46300#50920#50612' ID'
Width = 120
end>
end
end
object tabMtpMon: TTabSheet
Caption = 'MTP '#44048#49884'/'#52264#45800
ImageIndex = 1
object Label1: TLabel
Left = 32
Top = 80
Width = 78
Height = 15
Caption = #50696#50808' '#51109#52824' '#47785#47197
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 509
Height = 27
Align = alTop
BevelOuter = bvNone
TabOrder = 0
ExplicitTop = 8
object btnMtpMon: TButton
Left = 0
Top = 1
Width = 75
Height = 25
Caption = #44048#49884'/'#52264#45800
TabOrder = 0
OnClick = btnMtpMonClick
end
end
object chPreventMtp: TCheckBox
Left = 16
Top = 48
Width = 289
Height = 17
Caption = #50672#44208#46104#45716' '#47784#46304' MTP '#51109#52824#47484' '#52264#45800#54633#45768#45796'.'
TabOrder = 1
end
object mmExcp: TMemo
Left = 32
Top = 101
Width = 281
Height = 100
ScrollBars = ssVertical
TabOrder = 2
end
end
end
object popFun: TPopupMenu
AutoHotkeys = maManual
Left = 220
Top = 122
object miRemoveDev: TMenuItem
Caption = #50672#44208' '#54644#51228
OnClick = miRemoveDevClick
end
end
end