home *** CD-ROM | disk | FTP | other *** search
- 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
-