home *** CD-ROM | disk | FTP | other *** search
/ Chip: Shareware for Win 95 / Chip-Shareware-Win95.bin / ostatni / delphi / ruzne / auto32d3.exe / rar / AUTO32D3 / DEMOS / DELPHI3.0 / DRAWDBGR / MAIN.DFM / MAIN.txt
Text File  |  1997-04-20  |  2KB  |  106 lines
  1. object MainForm: TMainForm
  2.   Left = 202
  3.   Top = 104
  4.   Width = 442
  5.   Height = 297
  6.   Caption = 'MainForm'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   PixelsPerInch = 96
  13.   TextHeight = 13
  14.   object Panel1: TPanel
  15.     Left = 0
  16.     Top = 0
  17.     Width = 434
  18.     Height = 240
  19.     Align = alClient
  20.     BevelInner = bvLowered
  21.     BevelOuter = bvNone
  22.     BorderWidth = 5
  23.     Caption = 'Panel1'
  24.     TabOrder = 0
  25.     object AutoDBGrid1: TAutoDBGrid
  26.       Left = 6
  27.       Top = 6
  28.       Width = 422
  29.       Height = 228
  30.       Align = alClient
  31.       DataSource = DataSource1
  32.       TabOrder = 0
  33.       TitleFont.Charset = DEFAULT_CHARSET
  34.       TitleFont.Color = clWindowText
  35.       TitleFont.Height = -11
  36.       TitleFont.Name = 'MS Sans Serif'
  37.       TitleFont.Style = []
  38.       AutoOptions = []
  39.       AutoFilter.AssignEmpty = False
  40.       AutoFilter.TextBefore = 'Order by '
  41.       AutoRowHeight = 17
  42.       CurrentSortColumn = -1
  43.       FindFormFont.Charset = DEFAULT_CHARSET
  44.       FindFormFont.Color = clWindowText
  45.       FindFormFont.Height = -11
  46.       FindFormFont.Name = 'MS Sans Serif'
  47.       FindFormFont.Style = []
  48.       OnDrawFieldCellEvent = AutoDBGrid1DrawFieldCellEvent
  49.       Columns = <
  50.         item
  51.           FieldName = 'Name'
  52.           Title.Caption = '+Name'
  53.         end
  54.         item
  55.           FieldName = 'Capital'
  56.         end
  57.         item
  58.           FieldName = 'Population'
  59.           Width = 87
  60.         end
  61.         item
  62.           FieldName = 'Continent'
  63.           Width = 79
  64.         end>
  65.     end
  66.   end
  67.   object Panel2: TPanel
  68.     Left = 0
  69.     Top = 240
  70.     Width = 434
  71.     Height = 30
  72.     Align = alBottom
  73.     BevelOuter = bvNone
  74.     TabOrder = 1
  75.     object Button1: TButton
  76.       Left = 8
  77.       Top = 0
  78.       Width = 75
  79.       Height = 25
  80.       Caption = 'About'
  81.       TabOrder = 0
  82.       OnClick = Button1Click
  83.     end
  84.     object BitBtn1: TBitBtn
  85.       Left = 350
  86.       Top = 0
  87.       Width = 75
  88.       Height = 25
  89.       TabOrder = 1
  90.       Kind = bkClose
  91.     end
  92.   end
  93.   object DataSource1: TDataSource
  94.     DataSet = Table1
  95.     Left = 88
  96.     Top = 176
  97.   end
  98.   object Table1: TTable
  99.     Active = True
  100.     DatabaseName = 'DBDEMOS'
  101.     TableName = 'COUNTRY.DB'
  102.     Left = 48
  103.     Top = 72
  104.   end
  105. end
  106.