home *** CD-ROM | disk | FTP | other *** search
/ Delphi Programming Unleashed / Delphi_Programming_Unleashed_SAMS_Publishing_1995.iso / chap20 / links / main.txt < prev   
Encoding:
Text File  |  1995-03-21  |  1.4 KB  |  68 lines
  1. object Form1: TForm1
  2.   Left = 177
  3.   Top = 46
  4.   ActiveControl = DBGrid1
  5.   AutoScroll = False
  6.   Caption = 'Links'
  7.   ClientHeight = 295
  8.   ClientWidth = 509
  9.   Font.Color = clWindowText
  10.   Font.Height = -13
  11.   Font.Name = 'System'
  12.   Font.Style = []
  13.   PixelsPerInch = 96
  14.   TextHeight = 16
  15.   object DBGrid1: TDBGrid
  16.     Left = 0
  17.     Top = 0
  18.     Width = 509
  19.     Height = 113
  20.     Align = alTop
  21.     DataSource = DataSource1
  22.     TabOrder = 0
  23.     TitleFont.Color = clWindowText
  24.     TitleFont.Height = -13
  25.     TitleFont.Name = 'System'
  26.     TitleFont.Style = []
  27.   end
  28.   object DBGrid2: TDBGrid
  29.     Left = 0
  30.     Top = 175
  31.     Width = 509
  32.     Height = 120
  33.     Align = alBottom
  34.     DataSource = DataSource2
  35.     TabOrder = 1
  36.     TitleFont.Color = clWindowText
  37.     TitleFont.Height = -13
  38.     TitleFont.Name = 'System'
  39.     TitleFont.Style = []
  40.   end
  41.   object Table1: TTable
  42.     Active = True
  43.     DatabaseName = 'dbdemos'
  44.     TableName = 'CUSTOMER'
  45.     Top = 128
  46.   end
  47.   object DataSource1: TDataSource
  48.     DataSet = Table1
  49.     Left = 40
  50.     Top = 128
  51.   end
  52.   object Table2: TTable
  53.     Active = True
  54.     DatabaseName = 'dbdemos'
  55.     IndexFieldNames = 'CustNo'
  56.     MasterFields = 'CustNo'
  57.     MasterSource = DataSource1
  58.     TableName = 'ORDERS'
  59.     Left = 80
  60.     Top = 128
  61.   end
  62.   object DataSource2: TDataSource
  63.     DataSet = Table2
  64.     Left = 120
  65.     Top = 128
  66.   end
  67. end
  68.