home *** CD-ROM | disk | FTP | other *** search
/ Delphi 5 for Professionals / DELPHI5.iso / AddOns / Books / 4 / EX23.ZIP / UNIT1.DFM / UNIT1.txt
Encoding:
Text File  |  1996-01-15  |  1.3 KB  |  72 lines

  1. object Form1: TForm1
  2.   Left = 200
  3.   Top = 103
  4.   Width = 435
  5.   Height = 300
  6.   Caption = 'Custom Login Prompt'
  7.   Font.Color = clWindowText
  8.   Font.Height = -13
  9.   Font.Name = 'System'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   Position = poScreenCenter
  13.   TextHeight = 16
  14.   object DBGrid1: TDBGrid
  15.     Left = 0
  16.     Top = 49
  17.     Width = 427
  18.     Height = 220
  19.     Align = alClient
  20.     DataSource = DataSource1
  21.     TabOrder = 0
  22.     TitleFont.Color = clWindowText
  23.     TitleFont.Height = -13
  24.     TitleFont.Name = 'System'
  25.     TitleFont.Style = []
  26.   end
  27.   object Panel1: TPanel
  28.     Left = 0
  29.     Top = 0
  30.     Width = 427
  31.     Height = 49
  32.     Align = alTop
  33.     TabOrder = 1
  34.     object Button1: TButton
  35.       Left = 8
  36.       Top = 8
  37.       Width = 233
  38.       Height = 33
  39.       Caption = 'Open table'
  40.       TabOrder = 0
  41.       OnClick = Button1Click
  42.     end
  43.     object BitBtn1: TBitBtn
  44.       Left = 328
  45.       Top = 8
  46.       Width = 89
  47.       Height = 33
  48.       Caption = 'E&xit'
  49.       TabOrder = 1
  50.       Kind = bkClose
  51.     end
  52.   end
  53.   object Database1: TDatabase
  54.     AliasName = 'IBLOCAL'
  55.     DatabaseName = 'Loc_IBLOCAL'
  56.     OnLogin = Database1Login
  57.     Left = 8
  58.     Top = 8
  59.   end
  60.   object Table1: TTable
  61.     DatabaseName = 'Loc_IBLOCAL'
  62.     TableName = 'CUSTOMER'
  63.     Left = 48
  64.     Top = 8
  65.   end
  66.   object DataSource1: TDataSource
  67.     DataSet = Table1
  68.     Left = 88
  69.     Top = 8
  70.   end
  71. end
  72.