object ATTRIBDLG: TATTRIBDLG Tag = 1 Left = 238 Top = 205 HelpContext = 140 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Change attributes' ClientHeight = 262 ClientWidth = 316 Font.Color = clBtnText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 4 Top = 164 Width = 309 Height = 61 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 2 object Date: TLabel Tag = 13 Left = 10 Top = 33 Width = 59 Height = 15 AutoSize = False Caption = '&Date:' FocusControl = AttrDate WordWrap = True end object Time: TLabel Tag = 14 Left = 168 Top = 33 Width = 57 Height = 15 AutoSize = False Caption = '&Time:' FocusControl = AttrTime WordWrap = True end object AttrChangeDate: TCheckBox Tag = 12 Left = 10 Top = 4 Width = 291 Height = 21 Caption = '&Change date/time:' TabOrder = 0 OnClick = AttrChangeDateClick end object AttrDate: TEdit Left = 69 Top = 31 Width = 92 Height = 21 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 Text = 'dd/mm/yyyy' OnEnter = AttrDateEnter end object AttrTime: TEdit Left = 224 Top = 31 Width = 77 Height = 21 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 Text = 'hh:mm:ss' OnEnter = AttrDateEnter end end object AttribRecurse: TCheckBox Tag = 5 Left = 14 Top = 6 Width = 295 Height = 19 Caption = 'R&ecurse subdirectories' TabOrder = 0 end object Changeattributes: TGroupBox Tag = 6 Left = 4 Top = 27 Width = 309 Height = 126 Caption = ' Change attributes ' TabOrder = 1 object UnchangedSetClear: TLabel Tag = 11 Left = 10 Top = 104 Width = 291 Height = 20 AutoSize = False Caption = '(gray = unchanged, checked = set attribute)' end object aArchive: TMyCheckBox Tag = 7 Left = 10 Top = 20 Width = 291 Height = 17 AllowGrayed = True Caption = '&a Archive' TabOrder = 0 end object rReadonly: TMyCheckBox Tag = 8 Left = 10 Top = 41 Width = 291 Height = 17 AllowGrayed = True Caption = '&r Read only' TabOrder = 1 end object hHidden: TMyCheckBox Tag = 9 Left = 10 Top = 63 Width = 291 Height = 17 AllowGrayed = True Caption = '&h Hidden' TabOrder = 2 end object sSystem: TMyCheckBox Tag = 10 Left = 10 Top = 84 Width = 291 Height = 17 AllowGrayed = True Caption = '&s System' TabOrder = 3 end end object Ok: TButton Tag = 4001 Left = 61 Top = 236 Width = 80 Height = 23 Caption = 'Ok' Default = True ModalResult = 1 TabOrder = 3 OnClick = OkClick end object Cancel: TButton Tag = 4002 Left = 146 Top = 236 Width = 80 Height = 23 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 4 end object id_GlobalHelp: TButton Tag = 4003 Left = 232 Top = 236 Width = 80 Height = 23 Caption = '&Help' TabOrder = 5 OnClick = id_GlobalHelpClick end object Translate1: TTranslate Tag = 5040 Top = 232 end object ResolutionFix1: TResolutionFix Left = 32 Top = 232 end end