home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 September / Chip_2002-09_cd1.bin / zkuste / delphi / kompon / d3456 / SQLSET.ZIP / DEMO / MAIN.DFM / MAIN.txt
Text File  |  2001-07-12  |  2KB  |  77 lines
  1. object MainForm: TMainForm
  2.   Left = 206
  3.   Top = 121
  4.   Width = 420
  5.   Height = 298
  6.   Caption = 'Demo of TSQLSet'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   Position = poScreenCenter
  13.   OnCreate = FormCreate
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object Panel1: TPanel
  17.     Left = 0
  18.     Top = 0
  19.     Width = 412
  20.     Height = 57
  21.     Align = alTop
  22.     TabOrder = 0
  23.     object Label1: TLabel
  24.       Left = 16
  25.       Top = 8
  26.       Width = 44
  27.       Height = 13
  28.       Caption = 'Countries'
  29.     end
  30.     object ComboBox1: TComboBox
  31.       Left = 16
  32.       Top = 24
  33.       Width = 153
  34.       Height = 22
  35.       Style = csOwnerDrawFixed
  36.       ItemHeight = 16
  37.       TabOrder = 0
  38.       OnChange = ComboBox1Change
  39.     end
  40.   end
  41.   object DBGrid1: TDBGrid
  42.     Left = 0
  43.     Top = 57
  44.     Width = 412
  45.     Height = 214
  46.     Align = alClient
  47.     DataSource = DataSource1
  48.     TabOrder = 1
  49.     TitleFont.Charset = DEFAULT_CHARSET
  50.     TitleFont.Color = clWindowText
  51.     TitleFont.Height = -11
  52.     TitleFont.Name = 'MS Sans Serif'
  53.     TitleFont.Style = []
  54.   end
  55.   object SQLSet1: TSQLSet
  56.     SQLItems = <
  57.       item
  58.         Title = 'Countries'
  59.         SQLText = 'SELECT Country FROM "Customer.db"'#13#10'GROUP BY Country'#13#10
  60.       end
  61.       item
  62.         Title = 'Customers'
  63.         SQLText = 'SELECT * FROM "Customer.db"'#13#10'WHERE Country = "CountryVar"'
  64.       end>
  65.     Left = 328
  66.     Top = 16
  67.   end
  68.   object DataSource1: TDataSource
  69.     Left = 368
  70.     Top = 64
  71.   end
  72.   object Query1: TQuery
  73.     Left = 368
  74.     Top = 16
  75.   end
  76. end
  77.