home *** CD-ROM | disk | FTP | other *** search
/ Chip: Shareware for Win 95 / Chip-Shareware-Win95.bin / ostatni / delphi / delphi1 / scatter.exe / DELPHI / DEMOS / DATA / SCATTER / MAIN.DFM / MAIN.txt
Text File  |  1995-08-10  |  3KB  |  111 lines

  1. object Form1: TForm1
  2.   Left = 199
  3.   Top = 106
  4.   Width = 528
  5.   Height = 436
  6.   Caption = ' Example of Fast Copy Record using Scatter/Gather'
  7.   Font.Color = clWindowText
  8.   Font.Height = -13
  9.   Font.Name = 'System'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   TextHeight = 16
  13.   object DBNavigator1: TDBNavigator
  14.     Left = 3
  15.     Top = 6
  16.     Width = 241
  17.     Height = 25
  18.     DataSource = DataSource1
  19.     TabOrder = 0
  20.   end
  21.   object pbCopy: TButton
  22.     Left = 18
  23.     Top = 369
  24.     Width = 403
  25.     Height = 37
  26.     Caption = 'Copy Current Record in Clients.dbf to Clients2.dbf'
  27.     TabOrder = 1
  28.     OnClick = pbCopyClick
  29.   end
  30.   object GroupBox1: TGroupBox
  31.     Left = 16
  32.     Top = 39
  33.     Width = 499
  34.     Height = 163
  35.     Caption = ' \Delphi\Demos\Data\Clients.dbf '
  36.     TabOrder = 2
  37.     object DBGrid1: TDBGrid
  38.       Left = 7
  39.       Top = 34
  40.       Width = 468
  41.       Height = 114
  42.       Color = clWhite
  43.       DataSource = DataSource1
  44.       Font.Color = clBlack
  45.       Font.Height = -12
  46.       Font.Name = 'Arial'
  47.       Font.Style = []
  48.       Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
  49.       ParentFont = False
  50.       TabOrder = 0
  51.       TitleFont.Color = clBlack
  52.       TitleFont.Height = -12
  53.       TitleFont.Name = 'Arial'
  54.       TitleFont.Style = [fsBold]
  55.       OnEnter = DBGrid1Enter
  56.     end
  57.   end
  58.   object GroupBox2: TGroupBox
  59.     Left = 16
  60.     Top = 207
  61.     Width = 499
  62.     Height = 148
  63.     Caption = ' \Delphi\Demos\Data\Clients2.dbf '
  64.     TabOrder = 3
  65.     object DBGrid3: TDBGrid
  66.       Left = 10
  67.       Top = 27
  68.       Width = 463
  69.       Height = 114
  70.       Color = clWhite
  71.       DataSource = DataSource2
  72.       Font.Color = clBlack
  73.       Font.Height = -12
  74.       Font.Name = 'Arial'
  75.       Font.Style = []
  76.       Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
  77.       ParentFont = False
  78.       TabOrder = 0
  79.       TitleFont.Color = clBlack
  80.       TitleFont.Height = -12
  81.       TitleFont.Name = 'Arial'
  82.       TitleFont.Style = [fsBold]
  83.       OnEnter = DBGrid1Enter
  84.     end
  85.   end
  86.   object DataSource1: TDataSource
  87.     DataSet = Table1
  88.     Left = 433
  89.     Top = 2
  90.   end
  91.   object Table1: TTable
  92.     Active = True
  93.     DatabaseName = 'DBDEMOS'
  94.     TableName = 'CLIENTS.DBF'
  95.     Left = 470
  96.     Top = 2
  97.   end
  98.   object DataSource2: TDataSource
  99.     DataSet = Table2
  100.     Left = 441
  101.     Top = 372
  102.   end
  103.   object Table2: TTable
  104.     Active = True
  105.     DatabaseName = 'DBDEMOS'
  106.     TableName = 'CLIENTS2.DBF'
  107.     Left = 477
  108.     Top = 372
  109.   end
  110. end
  111.