161 lines
4.4 KiB
Plaintext
161 lines
4.4 KiB
Plaintext
object DlgPerfectDel: TDlgPerfectDel
|
|
Left = 0
|
|
Top = 0
|
|
BorderIcons = [biSystemMenu]
|
|
Caption = #54028#51068' '#50756#51204' '#49325#51228
|
|
ClientHeight = 442
|
|
ClientWidth = 461
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Position = poScreenCenter
|
|
Scaled = False
|
|
OnClose = FormClose
|
|
TextHeight = 15
|
|
object pnTop: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 461
|
|
Height = 41
|
|
Align = alTop
|
|
BevelOuter = bvNone
|
|
TabOrder = 0
|
|
object Label1: TLabel
|
|
Left = 240
|
|
Top = 3
|
|
Width = 233
|
|
Height = 32
|
|
AutoSize = False
|
|
Caption = #49325#51228' '#54624' '#54028#51068#51012' '#52628#44032#54644#51452#49464#50836'.'
|
|
Layout = tlCenter
|
|
WordWrap = True
|
|
end
|
|
object btnDelete: TButton
|
|
Left = 7
|
|
Top = 10
|
|
Width = 75
|
|
Height = 25
|
|
Caption = #49325#51228
|
|
TabOrder = 0
|
|
OnClick = btnDeleteClick
|
|
end
|
|
object btnAddFile: TButton
|
|
Left = 88
|
|
Top = 10
|
|
Width = 65
|
|
Height = 25
|
|
Caption = #54028#51068' '#52628#44032
|
|
TabOrder = 1
|
|
OnClick = btnAddFileClick
|
|
end
|
|
object btnAddDir: TButton
|
|
Left = 159
|
|
Top = 10
|
|
Width = 65
|
|
Height = 25
|
|
Caption = #54260#45908' '#52628#44032
|
|
TabOrder = 2
|
|
OnClick = btnAddDirClick
|
|
end
|
|
end
|
|
object pnClient: TPanel
|
|
Left = 0
|
|
Top = 41
|
|
Width = 461
|
|
Height = 401
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
TabOrder = 1
|
|
object vtList: TVirtualStringTree
|
|
Left = 0
|
|
Top = 0
|
|
Width = 461
|
|
Height = 401
|
|
Align = alClient
|
|
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]
|
|
PopupMenu = popFun
|
|
TabOrder = 0
|
|
TreeOptions.MiscOptions = [toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning, toEditOnClick]
|
|
TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages]
|
|
TreeOptions.SelectionOptions = [toFullRowSelect, toMultiSelect, toRightClickSelect]
|
|
OnAfterPaint = vtListAfterPaint
|
|
OnContextPopup = vtListContextPopup
|
|
OnFreeNode = vtListFreeNode
|
|
OnGetText = vtListGetText
|
|
OnPaintText = vtListPaintText
|
|
OnGetImageIndex = vtListGetImageIndex
|
|
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 = #51060#47492
|
|
Width = 160
|
|
end
|
|
item
|
|
Position = 2
|
|
Text = #54869#51109#51088
|
|
Width = 70
|
|
end
|
|
item
|
|
Position = 3
|
|
Text = #44221#47196
|
|
Width = 250
|
|
end>
|
|
end
|
|
end
|
|
object popFun: TPopupMenu
|
|
AutoHotkeys = maManual
|
|
Left = 224
|
|
Top = 193
|
|
object miDelFile: TMenuItem
|
|
Caption = #49440#53469#54620' '#54028#51068' '#51228#50808
|
|
OnClick = miDelFileClick
|
|
end
|
|
object miClear: TMenuItem
|
|
Caption = #47785#47197' '#52488#44592#54868
|
|
OnClick = miClearClick
|
|
end
|
|
end
|
|
object OpenDialog: TOpenDialog
|
|
Filter = 'All files|*.*'
|
|
Options = [ofHideReadOnly, ofAllowMultiSelect, ofEnableSizing]
|
|
Left = 64
|
|
Top = 105
|
|
end
|
|
object FileOpenDialog: TFileOpenDialog
|
|
FavoriteLinks = <>
|
|
FileTypes = <>
|
|
Options = [fdoPickFolders]
|
|
Left = 64
|
|
Top = 161
|
|
end
|
|
end
|