doublecmd-plugins/plugins/wcx/set_dir_date_crap/dialog.lfm at master · j2969719/doublecmd-plugins · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
object DialogBox: TDialogBox
  Left = 540
  Height = 222
  Top = 132
  Width = 539
  AutoSize = True
  BorderStyle = bsDialog
  Caption = 'Options'
  ChildSizing.LeftRightSpacing = 10
  ChildSizing.TopBottomSpacing = 10
  ClientHeight = 222
  ClientWidth = 539
  Position = poOwnerFormCenter
  LCLVersion = '4.5.0.0'
  OnClose = DialogBoxClose
  OnShow = DialogBoxShow
  object gbOpts: TGroupBox
    Left = 16
    Height = 161
    Top = 8
    Width = 455
    AutoSize = True
    ChildSizing.LeftRightSpacing = 10
    ChildSizing.TopBottomSpacing = 10
    ChildSizing.HorizontalSpacing = 10
    ChildSizing.VerticalSpacing = 10
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 2
    ClientHeight = 158
    ClientWidth = 455
    TabOrder = 0
    object lblTime: TLabel
      Left = 10
      Height = 28
      Top = 10
      Width = 275
      Caption = 'Set date to directories'
      Layout = tlCenter
    end
    object cbTime: TComboBox
      Left = 295
      Height = 28
      Top = 10
      Width = 150
      Constraints.MinWidth = 150
      ItemHeight = 23
      ItemIndex = 0
      Items.Strings = (
        'Newest'
        'Oldest'
      )
      Style = csDropDownList
      TabOrder = 0
      Text = 'Newest'
      OnChange = ComboBoxChange
    end
    object lblPlaceholder: TLabel
      Left = 10
      Height = 24
      Top = 48
      Width = 275
    end
    object chOnlyRoot: TCheckBox
      Left = 295
      Height = 24
      Top = 48
      Width = 150
      Caption = 'Set for top level only'
      TabOrder = 1
      OnChange = CheckBoxChange
    end
    object lblFiletype: TLabel
      Left = 10
      Height = 28
      Top = 82
      Width = 275
      Caption = 'Get new date using'
      Layout = tlCenter
    end
    object cbType: TComboBox
      Left = 295
      Height = 28
      Top = 82
      Width = 150
      Constraints.MinWidth = 150
      ItemHeight = 23
      ItemIndex = 0
      Items.Strings = (
        'Only regular files'
        'Regular files from directory pointed to by the symlink as well'
        'Any file pointed to by the symlink as well'
        'Only regular files and the symlinks themselves'
        'Any filetype'
      )
      Style = csDropDownList
      TabOrder = 2
      Text = 'Only regular files'
      OnChange = ComboBoxChange
    end
    object lblDirs: TLabel
      Left = 10
      Height = 28
      Top = 120
      Width = 275
      Caption = 'Behavior for dates of the directories themselves'
      Layout = tlCenter
    end
    object cbDirs: TComboBox
      Left = 295
      Height = 28
      Top = 120
      Width = 150
      Constraints.MinWidth = 150
      ItemHeight = 23
      ItemIndex = 0
      Items.Strings = (
        'Ignore'
        'Take into account only empty ones'
        'Take everything into account'
      )
      Style = csDropDownList
      TabOrder = 3
      Text = 'Ignore'
      OnChange = ComboBoxChange
    end
  end
  object btnClose: TBitBtn
    AnchorSideTop.Control = gbOpts
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Side = asrBottom
    Left = 432
    Height = 31
    Top = 189
    Width = 97
    Anchors = [akTop, akRight]
    AutoSize = True
    BorderSpacing.Top = 20
    BorderSpacing.InnerBorder = 2
    BorderSpacing.CellAlignHorizontal = ccaCenter
    Cancel = True
    DefaultCaption = True
    Kind = bkClose
    ModalResult = 11
    TabOrder = 1
    OnClick = ButtonClick
  end
end