home *** CD-ROM | disk | FTP | other *** search
/ Prima Shareware 3 / DuCom_Prima-Shareware-3_cd1.bin / PROGRAMO / delphi / ODA10 / _SETUP.1 / DemoMain.dfm / DemoMain.txt
Encoding:
Text File  |  1996-04-06  |  3.0 KB  |  152 lines

  1. object FormMain: TFormMain
  2.   Left = 213
  3.   Top = 112
  4.   Width = 513
  5.   Height = 291
  6.   Caption = 'Opus DirectAccess Test'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   TextHeight = 13
  13.   object Label1: TLabel
  14.     Left = 8
  15.     Top = 12
  16.     Width = 141
  17.     Height = 13
  18.     Caption = 'Demonstration Forms'
  19.     Font.Color = clBlack
  20.     Font.Height = -11
  21.     Font.Name = 'MS Sans Serif'
  22.     Font.Style = [fsBold]
  23.     ParentFont = False
  24.   end
  25.   object Label2: TLabel
  26.     Left = 248
  27.     Top = 12
  28.     Width = 112
  29.     Height = 13
  30.     Caption = 'Product Information'
  31.     Font.Color = clBlack
  32.     Font.Height = -11
  33.     Font.Name = 'MS Sans Serif'
  34.     Font.Style = [fsBold]
  35.     ParentFont = False
  36.   end
  37.   object Bevel1: TBevel
  38.     Left = 248
  39.     Top = 28
  40.     Width = 245
  41.     Height = 9
  42.     Shape = bsTopLine
  43.   end
  44.   object Bevel2: TBevel
  45.     Left = 8
  46.     Top = 28
  47.     Width = 217
  48.     Height = 9
  49.     Shape = bsTopLine
  50.   end
  51.   object BtnGrid: TButton
  52.     Left = 8
  53.     Top = 72
  54.     Width = 217
  55.     Height = 25
  56.     Caption = 'Single Query with Grid'
  57.     TabOrder = 1
  58.     OnClick = BtnGridClick
  59.   end
  60.   object BtnFastFind: TButton
  61.     Left = 8
  62.     Top = 184
  63.     Width = 217
  64.     Height = 25
  65.     Caption = 'DBControlGrid with fast Find'
  66.     TabOrder = 6
  67.     OnClick = BtnFastFindClick
  68.   end
  69.   object BtnMixedToMany: TButton
  70.     Left = 8
  71.     Top = 156
  72.     Width = 217
  73.     Height = 25
  74.     Caption = 'OneToMany with Query && (Table/Query)'
  75.     TabOrder = 4
  76.     OnClick = BtnMixedToManyClick
  77.   end
  78.   object BtnQueryToMany: TButton
  79.     Left = 8
  80.     Top = 100
  81.     Width = 217
  82.     Height = 25
  83.     Caption = 'OneToMany with Queries'
  84.     TabOrder = 2
  85.     OnClick = BtnQueryToManyClick
  86.   end
  87.   object BtnTableLookup: TButton
  88.     Left = 8
  89.     Top = 44
  90.     Width = 217
  91.     Height = 25
  92.     Caption = 'Table with fast Lookups'
  93.     TabOrder = 0
  94.     OnClick = BtnTableLookupClick
  95.   end
  96.   object BtnTableToMany: TButton
  97.     Left = 8
  98.     Top = 128
  99.     Width = 217
  100.     Height = 25
  101.     Caption = 'OneToMany with Tables'
  102.     TabOrder = 3
  103.     OnClick = BtnTableToManyClick
  104.   end
  105.   object BtnReport: TButton
  106.     Left = 8
  107.     Top = 212
  108.     Width = 217
  109.     Height = 25
  110.     Caption = 'QuickReport with Query'
  111.     TabOrder = 5
  112.     OnClick = BtnReportClick
  113.   end
  114.   object MemoInfo: TMemo
  115.     Left = 248
  116.     Top = 44
  117.     Width = 245
  118.     Height = 193
  119.     Color = clBtnFace
  120.     Ctl3D = True
  121.     Lines.Strings = (
  122.       'For further information about Opus DirectAccess, '
  123.       'please contact Opus Software GmbH at the '
  124.       'following address:'
  125.       ''
  126.       'Opus Software GmbH'
  127.       'Im Kratten 32'
  128.       '8623 Wetzikon'
  129.       'Switzerland'
  130.       ''
  131.       'CompuServe: 101560,2152'
  132.       'E-Mail:            opussoftware@access.ch')
  133.     ParentCtl3D = False
  134.     ReadOnly = True
  135.     TabOrder = 7
  136.   end
  137.   object Db: TDatabase
  138.     AliasName = 'Demo'
  139.     Connected = True
  140.     DatabaseName = 'DBDemo'
  141.     LoginPrompt = False
  142.     SessionName = 'Demo'
  143.     Left = 192
  144.   end
  145.   object Session: TSession
  146.     Active = True
  147.     KeepConnections = False
  148.     SessionName = 'Demo'
  149.     Left = 160
  150.   end
  151. end
  152.