home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 January / Chip_1999-01_cd.bin / zkuste / delphi / D1 / DTOOLS30.ZIP / DEMOBACK.DFM / DEMOBACK.txt
Text File  |  1995-11-06  |  2KB  |  88 lines
  1. object BackgroundControls: TBackgroundControls
  2.   Left = 205
  3.   Top = 125
  4.   BorderIcons = []
  5.   BorderStyle = bsDialog
  6.   Caption = 'Background Controls'
  7.   ClientHeight = 268
  8.   ClientWidth = 358
  9.   Font.Color = clWindowText
  10.   Font.Height = -13
  11.   Font.Name = 'System'
  12.   Font.Style = []
  13.   PixelsPerInch = 96
  14.   ShowHint = True
  15.   TextHeight = 16
  16.   object TiledBitmap1: TTiledBitmap
  17.     Left = 188
  18.     Top = 7
  19.     Width = 160
  20.     Height = 160
  21.     Hint = 'This is a TTiledBitmap control.'
  22.     Bitmap.Data = {
  23.       C2000000424DC200000000000000420000002800000010000000100000000100
  24.       04000000000080000000130B0000130B00000300000003000000000000008000
  25.       0000FF0000001111111111111111111111111111111111111111111111111111
  26.       1111111111111111111111111111111111111111111111111100011111111111
  27.       1211101111111111121110111111111112111011111111111122211111111111
  28.       1111111111111111111111111111111111111111111111111111111111111111
  29.       111111111111}
  30.   end
  31.   object FountainFill1: TFountainFill
  32.     Left = 8
  33.     Top = 7
  34.     Width = 160
  35.     Height = 160
  36.     Hint = 'This is a TFountainFill control.  Change the colors below.'
  37.     FromColor = clBlue
  38.     ToColor = clNavy
  39.   end
  40.   object ShadowButton1: TShadowButton
  41.     Left = 224
  42.     Top = 210
  43.     Width = 89
  44.     Height = 33
  45.     Hint = 'Click me to make this window go away!'
  46.     Cancel = True
  47.     Caption = 'OK'
  48.     Default = True
  49.     ModalResult = 1
  50.     TabOrder = 0
  51.   end
  52.   object GroupBox1: TGroupBox
  53.     Left = 7
  54.     Top = 175
  55.     Width = 160
  56.     Height = 82
  57.     Caption = 'Colors'
  58.     TabOrder = 1
  59.     object cycFrom: TODCycler
  60.       Left = 12
  61.       Top = 24
  62.       Width = 137
  63.       Height = 21
  64.       Hint = 'Select the colors for the TFountainFill component.'
  65.       Caption = '&From'
  66.       Max = 3
  67.       TabOrder = 0
  68.       Value = 1
  69.       OnClick = cycClick
  70.       OnPaint = cycPaint
  71.     end
  72.     object cycTo: TODCycler
  73.       Left = 12
  74.       Top = 52
  75.       Width = 137
  76.       Height = 21
  77.       Hint = 'Select the colors for the TFountainFill component.'
  78.       Caption = '&To'
  79.       Max = 7
  80.       Min = 4
  81.       TabOrder = 1
  82.       Value = 7
  83.       OnClick = cycClick
  84.       OnPaint = cycPaint
  85.     end
  86.   end
  87. end
  88.