home *** CD-ROM | disk | FTP | other *** search
/ Delphi Programming Unleashed / Delphi_Programming_Unleashed_SAMS_Publishing_1995.iso / chap20 / fielder / main.txt < prev   
Encoding:
Text File  |  1995-03-21  |  1.0 KB  |  55 lines
  1. object Form1: TForm1
  2.   Left = 202
  3.   Top = 98
  4.   ActiveControl = ListBox1
  5.   AutoScroll = False
  6.   Caption = 'Fielder'
  7.   ClientHeight = 264
  8.   ClientWidth = 359
  9.   Font.Color = clWindowText
  10.   Font.Height = -13
  11.   Font.Name = 'System'
  12.   Font.Style = []
  13.   PixelsPerInch = 96
  14.   TextHeight = 16
  15.   object ListBox1: TListBox
  16.     Left = 24
  17.     Top = 56
  18.     Width = 129
  19.     Height = 193
  20.     ItemHeight = 16
  21.     TabOrder = 0
  22.   end
  23.   object bFields: TButton
  24.     Left = 24
  25.     Top = 8
  26.     Width = 129
  27.     Height = 33
  28.     Caption = 'Fields'
  29.     TabOrder = 1
  30.     OnClick = bFieldsClick
  31.   end
  32.   object ListBox2: TListBox
  33.     Left = 208
  34.     Top = 56
  35.     Width = 121
  36.     Height = 193
  37.     ItemHeight = 16
  38.     TabOrder = 2
  39.   end
  40.   object bCurRecord: TButton
  41.     Left = 208
  42.     Top = 8
  43.     Width = 121
  44.     Height = 33
  45.     Caption = 'Current Record'
  46.     TabOrder = 3
  47.     OnClick = bCurRecordClick
  48.   end
  49.   object Table1: TTable
  50.     Active = True
  51.     DatabaseName = 'dbdemos'
  52.     TableName = 'CUSTOMER.DB'
  53.   end
  54. end
  55.