home *** CD-ROM | disk | FTP | other *** search
/ PC Open 19 / pcopen19.iso / Zipped / CALMIR21.ZIP / SOURCE.ZIP / SRC / TREE.DFM / TREE.txt
Encoding:
Text File  |  1998-02-20  |  2.9 KB  |  134 lines
  1. object Explorer: TExplorer
  2.   Left = 262
  3.   Top = 156
  4.   HelpContext = 23
  5.   BorderIcons = [biSystemMenu, biMinimize]
  6.   BorderStyle = bsSingle
  7.   Caption = 'Explorer'
  8.   ClientHeight = 254
  9.   ClientWidth = 213
  10.   Font.Color = clBlack
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   PixelsPerInch = 96
  15.   Scaled = False
  16.   OnClose = FormClose
  17.   OnCreate = FormCreate
  18.   OnDestroy = FormDestroy
  19.   OnHide = FormHide
  20.   OnPaint = FormPaint
  21.   OnResize = FormResize
  22.   OnShow = FormShow
  23.   TextHeight = 13
  24.   object Outline: TScrollTree
  25.     Left = 4
  26.     Top = 4
  27.     Width = 205
  28.     Height = 214
  29.     OnExpand = OutlineExpand
  30.     Options = [ooDrawTreeRoot]
  31.     Style = otOwnerDraw
  32.     ItemHeight = 16
  33.     OnDrawItem = OutlineDrawItem
  34.     Font.Color = clBlack
  35.     Font.Height = -13
  36.     Font.Name = 'Arial'
  37.     Font.Style = []
  38.     Color = clWhite
  39.     TabOrder = 0
  40.     OnClick = OutlineClick
  41.     OnDragDrop = OutlineDragDrop
  42.     OnDragOver = OutlineDragOver
  43.     OnMouseDown = OutlineMouseDown
  44.     OnMouseUp = OutlineMouseUp
  45.     OnKeyDown = OutlineKeyDown
  46.     ItemSeparator = '\'
  47.     ParentFont = False
  48.     PopupMenu = PopupMenu
  49.     ScrollBars = ssVertical
  50.     Data = {1F}
  51.   end
  52.   object OKBtn: TBitBtn
  53.     Left = 51
  54.     Top = 223
  55.     Width = 77
  56.     Height = 27
  57.     TabOrder = 1
  58.     OnClick = OpenFolderClick
  59.     Kind = bkOK
  60.     Margin = 4
  61.     Style = bsNew
  62.     Spacing = -1
  63.     IsControl = True
  64.   end
  65.   object CancelBtn: TBitBtn
  66.     Left = 132
  67.     Top = 223
  68.     Width = 77
  69.     Height = 27
  70.     TabOrder = 2
  71.     Kind = bkCancel
  72.     Margin = 4
  73.     Style = bsNew
  74.     Spacing = -1
  75.     IsControl = True
  76.   end
  77.   object PopupMenu: TPopupMenu
  78.     AutoPopup = False
  79.     OnPopup = PopupMenuPopup
  80.     Left = 87
  81.     Top = 36
  82.     object OpenFolder: TMenuItem
  83.       Caption = '&Open folder'
  84.       OnClick = OpenFolderClick
  85.       ShortCutText = 'Enter'
  86.     end
  87.     object OpenNew: TMenuItem
  88.       Caption = 'Open &new window'
  89.       OnClick = OpenNewClick
  90.       ShortCutText = 'Ctrl+Enter'
  91.     end
  92.     object N2: TMenuItem
  93.       Caption = '-'
  94.     end
  95.     object ExpandLevel: TMenuItem
  96.       Caption = 'Expand one &level'
  97.       OnClick = ExpandLevelClick
  98.       ShortCutText = '+'
  99.     end
  100.     object ExpandBranch: TMenuItem
  101.       Caption = 'Expand &branch'
  102.       OnClick = ExpandBranchClick
  103.       ShortCutText = '*'
  104.     end
  105.     object ExpandAll: TMenuItem
  106.       Caption = 'Expand &all'
  107.       OnClick = ExpandAllClick
  108.       ShortCutText = 'Ctrl+*'
  109.     end
  110.     object CollapseBranch: TMenuItem
  111.       Caption = '&Collapse branch'
  112.       OnClick = CollapseBranchClick
  113.       ShortCutText = '-'
  114.     end
  115.     object N1: TMenuItem
  116.       Caption = '-'
  117.     end
  118.     object RefreshTree: TMenuItem
  119.       Caption = '&Refresh'
  120.       OnClick = RefreshTreeClick
  121.       ShortCutText = 'F5'
  122.     end
  123.     object FileWindow: TMenuItem
  124.       Caption = 'Show file window'
  125.       OnClick = FileWindowClick
  126.       ShortCutText = 'Ctrl+W'
  127.     end
  128.   end
  129.   object SystemMenu: TSystemMenu
  130.     Left = 124
  131.     Top = 36
  132.   end
  133. end
  134.