home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Delphi.5 / Samples / sourceD5 / browutil.exe / BROWSER / OPENFILE.DFM / OPENFILE.txt < prev   
Encoding:
Text File  |  2000-01-02  |  3.9 KB  |  176 lines
  1. object FrmOpenTable: TFrmOpenTable
  2.   Left = 80
  3.   Top = 134
  4.   AutoScroll = False
  5.   BorderIcons = [biSystemMenu, biHelp]
  6.   Caption = 'Open Table'
  7.   ClientHeight = 277
  8.   ClientWidth = 611
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   Icon.Data = {<image000.ico>}
  16.   OldCreateOrder = True
  17.   Position = poScreenCenter
  18.   OnActivate = FormActivate
  19.   OnCreate = FormCreate
  20.   PixelsPerInch = 96
  21.   TextHeight = 13
  22.   object Panel1: TPanel
  23.     Left = 0
  24.     Top = 0
  25.     Width = 611
  26.     Height = 49
  27.     Align = alTop
  28.     BevelInner = bvLowered
  29.     TabOrder = 1
  30.     object Label1: TLabel
  31.       Left = 391
  32.       Top = 6
  33.       Width = 48
  34.       Height = 13
  35.       Caption = 'Files &Type'
  36.       FocusControl = FilterComboBox1
  37.     end
  38.     object Label2: TLabel
  39.       Left = 7
  40.       Top = 28
  41.       Width = 52
  42.       Height = 13
  43.       Caption = '&Files Name'
  44.       FocusControl = EdtFileName
  45.       OnClick = BtnCancelClick
  46.     end
  47.     object Label3: TLabel
  48.       Left = 170
  49.       Top = 6
  50.       Width = 58
  51.       Height = 13
  52.       Caption = 'Select &Drive'
  53.       FocusControl = DriveComboBox1
  54.     end
  55.     object BtnOpen: TButton
  56.       Left = 3
  57.       Top = 2
  58.       Width = 50
  59.       Height = 20
  60.       Caption = '&Open'
  61.       Default = True
  62.       TabOrder = 0
  63.       OnClick = BtnOpenClick
  64.     end
  65.     object BtnCancel: TButton
  66.       Left = 53
  67.       Top = 2
  68.       Width = 50
  69.       Height = 20
  70.       Cancel = True
  71.       Caption = '&Cancel'
  72.       TabOrder = 1
  73.       OnClick = BtnCancelClick
  74.     end
  75.     object DriveComboBox1: TDriveComboBox
  76.       Left = 233
  77.       Top = 3
  78.       Width = 145
  79.       Height = 19
  80.       DirList = DirectoryListBox1
  81.       TabOrder = 3
  82.     end
  83.     object FilterComboBox1: TFilterComboBox
  84.       Left = 442
  85.       Top = 2
  86.       Width = 165
  87.       Height = 21
  88.       FileList = FileListBox1
  89.       Filter = 
  90.         'FoxPro 2.x & Paradox Tables (*.db,*.dbf)|*.db;*.dbf|Paradox Tabl' +
  91.         'e (*.db)|*.db|FoxPro 2.x Table (*.dbf)|*.dbf|Rich Text Format (R' +
  92.         'TF)|*.rtf|Text Files (*.txt)|*.txt|Video for Windows (*.avi,*.ic' +
  93.         'v)|*.avi;*.icv|Mediamatics MPEG Arcade(TM) Player|*.mpg|VCD (*.d' +
  94.         'at)|*.dat|Sounds (*.wav)|*.wav|MIDI Sequencer (*.mid,*.rmi)|*.mi' +
  95.         'd,*.rmi|Audio CD (*.dat)|*.dat|HTML Document|*.html|All files (*' +
  96.         '.*)|*.*'
  97.       TabOrder = 4
  98.       OnChange = FilterComboBox1Change
  99.     end
  100.     object EdtFileName: TEdit
  101.       Left = 64
  102.       Top = 24
  103.       Width = 542
  104.       Height = 21
  105.       TabOrder = 5
  106.     end
  107.     object BtnRun: TButton
  108.       Left = 103
  109.       Top = 2
  110.       Width = 50
  111.       Height = 20
  112.       Cancel = True
  113.       Caption = '&Run'
  114.       Enabled = False
  115.       TabOrder = 2
  116.       OnClick = BtnRunClick
  117.     end
  118.   end
  119.   object Panel2: TPanel
  120.     Left = 0
  121.     Top = 49
  122.     Width = 611
  123.     Height = 228
  124.     Align = alClient
  125.     BevelInner = bvLowered
  126.     TabOrder = 0
  127.     object Splitter1: TSplitter
  128.       Left = 151
  129.       Top = 2
  130.       Width = 4
  131.       Height = 224
  132.       Cursor = crHSplit
  133.     end
  134.     object ListBox1: TListBox
  135.       Left = 155
  136.       Top = 2
  137.       Width = 454
  138.       Height = 224
  139.       Align = alClient
  140.       Columns = 5
  141.       ItemHeight = 13
  142.       MultiSelect = True
  143.       TabOrder = 1
  144.       OnClick = ListBox1Click
  145.       OnDblClick = ListBox1DblClick
  146.       OnKeyDown = ListBox1KeyDown
  147.       OnKeyUp = ListBox1KeyUp
  148.       OnMouseDown = ListBox1MouseDown
  149.     end
  150.     object FileListBox1: TFileListBox
  151.       Left = 456
  152.       Top = 8
  153.       Width = 49
  154.       Height = 25
  155.       ItemHeight = 13
  156.       Mask = '*.db;*.dbf'
  157.       TabOrder = 2
  158.       Visible = False
  159.     end
  160.     object DirectoryListBox1: TDirectoryListBox
  161.       Left = 2
  162.       Top = 2
  163.       Width = 149
  164.       Height = 224
  165.       Align = alLeft
  166.       FileList = FileListBox1
  167.       ItemHeight = 16
  168.       TabOrder = 0
  169.       OnChange = DirectoryListBox1Change
  170.       OnEnter = DirectoryListBox1Enter
  171.       OnExit = DirectoryListBox1Exit
  172.       OnKeyDown = DirectoryListBox1KeyDown
  173.     end
  174.   end
  175. end
  176.