home *** CD-ROM | disk | FTP | other *** search
/ PC Format Collection 48 / SENT14D.ISO / tech / delphi / disk15 / dbaware1.pak / MAIN.DFM / MAIN.txt
Encoding:
Text File  |  1995-08-24  |  2.6 KB  |  137 lines
  1. object Form1: TForm1
  2.   Left = 249
  3.   Top = 95
  4.   AutoScroll = False
  5.   Width = 358
  6.   Height = 300
  7.   ActiveControl = DBGrid1
  8.   Caption = 'Data-Aware Controls'
  9.   Font.Color = clBlack
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   PixelsPerInch = 96
  14.   TextHeight = 13
  15.   object DBGrid1: TDBGrid
  16.     Left = 0
  17.     Top = 169
  18.     Width = 350
  19.     Height = 104
  20.     Align = alClient
  21.     DataSource = DataSource1
  22.     TabOrder = 0
  23.     TitleFont.Color = clBlack
  24.     TitleFont.Height = -11
  25.     TitleFont.Name = 'MS Sans Serif'
  26.     TitleFont.Style = []
  27.   end
  28.   object Panel1: TPanel
  29.     Left = 0
  30.     Top = 0
  31.     Width = 350
  32.     Height = 169
  33.     Align = alTop
  34.     TabOrder = 1
  35.     object Label1: TLabel
  36.       Left = 16
  37.       Top = 12
  38.       Width = 77
  39.       Height = 13
  40.       Caption = 'PaymentMethod'
  41.     end
  42.     object Label2: TLabel
  43.       Left = 264
  44.       Top = 12
  45.       Width = 40
  46.       Height = 13
  47.       Caption = 'TDBEdit'
  48.     end
  49.     object Label3: TLabel
  50.       Left = 264
  51.       Top = 44
  52.       Width = 73
  53.       Height = 13
  54.       Caption = 'TDBComboBox'
  55.     end
  56.     object Label4: TLabel
  57.       Left = 264
  58.       Top = 74
  59.       Width = 56
  60.       Height = 13
  61.       Caption = 'TDBListBox'
  62.     end
  63.     object DBEdit1: TDBEdit
  64.       Left = 104
  65.       Top = 8
  66.       Width = 145
  67.       Height = 20
  68.       DataField = 'PaymentMethod'
  69.       DataSource = DataSource1
  70.       MaxLength = 7
  71.       TabOrder = 0
  72.     end
  73.     object DBComboBox1: TDBComboBox
  74.       Left = 104
  75.       Top = 40
  76.       Width = 145
  77.       Height = 20
  78.       DataField = 'PaymentMethod'
  79.       DataSource = DataSource1
  80.       ItemHeight = 13
  81.       Items.Strings = (
  82.         'Cash'
  83.         'COD'
  84.         'Credit'
  85.         'VISA'
  86.         'MC'
  87.         'AmEx'
  88.         'Check')
  89.       TabOrder = 1
  90.     end
  91.     object DBListBox1: TDBListBox
  92.       Left = 104
  93.       Top = 72
  94.       Width = 145
  95.       Height = 81
  96.       DataField = 'PaymentMethod'
  97.       DataSource = DataSource1
  98.       ItemHeight = 13
  99.       Items.Strings = (
  100.         'Cash'
  101.         'COD'
  102.         'Credit'
  103.         'VISA'
  104.         'MC'
  105.         'AmEx'
  106.         'Check')
  107.       TabOrder = 2
  108.     end
  109.   end
  110.   object Table1: TTable
  111.     Active = True
  112.     DatabaseName = 'DBDEMOS'
  113.     TableName = 'ORDERS.DB'
  114.     Left = 16
  115.     Top = 88
  116.     object Table1OrderNo: TFloatField
  117.       FieldName = 'OrderNo'
  118.     end
  119.     object Table1CustNo: TFloatField
  120.       FieldName = 'CustNo'
  121.     end
  122.     object Table1PaymentMethod: TStringField
  123.       FieldName = 'PaymentMethod'
  124.       Size = 7
  125.     end
  126.     object Table1ItemsTotal: TCurrencyField
  127.       FieldName = 'ItemsTotal'
  128.       Currency = True
  129.     end
  130.   end
  131.   object DataSource1: TDataSource
  132.     DataSet = Table1
  133.     Left = 48
  134.     Top = 88
  135.   end
  136. end
  137.