object frmShowfiles: TfrmShowfiles Left = 654 Top = 163 Width = 252 Height = 473 HelpContext = 30 BorderStyle = bsSizeToolWin BorderWidth = 1 Caption = 'Dateien' Color = clBtnFace Constraints.MaxWidth = 500 Constraints.MinHeight = 200 Constraints.MinWidth = 200 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop KeyPreview = True OldCreateOrder = True Scaled = False OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy OnKeyPress = FormKeyPress OnKeyUp = FormKeyUp OnResize = FormResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Treeview: TTreeNT Left = 0 Top = 17 Width = 242 Height = 427 Align = alClient Ctl3D = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Indent = 19 InsertMarkColor = clBlack ItemHeight = 16 Options = [toAutoExpand, toEvenHeight, toHideSelection, toMultiSelect, toReadOnly, toRightClickSelect, toShowButtons, toShowLines, toShowRoot] ParentColor = False ParentCtl3D = False ParentFont = False PopupMenu = PopmFiles ScrollTime = 100 TabOrder = 0 OnAfterItemPaint = TreeviewAfterItemPaint OnDblClick = TreeviewDblClick OnKeyPress = TreeviewKeyPress OnMouseDown = TreeviewMouseDown end object hcFiles: THeaderControl Left = 0 Top = 0 Width = 242 Height = 17 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Sections = < item Text = 'Name' Width = 170 end item Alignment = taCenter Text = 'Gr��e' Width = 60 end item Alignment = taCenter Text = 'Datum' Width = 0 end> ParentFont = False OnSectionClick = hcFilesSectionClick end object PopmFiles: TPopupMenu OnPopup = PopmFilesPopup Left = 16 Top = 20 object Open1: TMenuItem Caption = '&�ffnen' end object N2: TMenuItem Caption = '-' end object View1: TMenuItem Caption = '&Anzeigen' ShortCut = 16470 OnClick = View1Click end object N1: TMenuItem Caption = '-' end object Delete1: TMenuItem Caption = '&Exclude' OnClick = Delete1Click end object Excludeextention1: TMenuItem Caption = 'Exclude e&xtention' ShortCut = 16472 OnClick = Excludeextention1Click end end object TimerFocus: TTimer Enabled = False Interval = 10 OnTimer = TimerFocusTimer Left = 16 Top = 56 end end