home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / delphi / cbsuite.lzh / SU1SRC.ZIP / FDEMO13.DFM / FDEMO13.txt
Encoding:
Text File  |  1996-12-09  |  6.3 KB  |  254 lines
  1. object Form13: TForm13
  2.   Left = 197
  3.   Top = 412
  4.   BorderStyle = bsDialog
  5.   Caption = 'Hatch Demo '
  6.   ClientHeight = 427
  7.   ClientWidth = 452
  8.   Font.Color = clBlack
  9.   Font.Height = -14
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = [fsBold]
  12.   PixelsPerInch = 120
  13.   Position = poScreenCenter
  14.   TextHeight = 16
  15.   object CancelBtn: TBitBtn
  16.     Left = 234
  17.     Top = 384
  18.     Width = 96
  19.     Height = 33
  20.     Caption = '&Exit'
  21.     TabOrder = 1
  22.     Kind = bkCancel
  23.     Margin = 2
  24.     Spacing = -1
  25.     IsControl = True
  26.   end
  27.   object Preview: TBitBtn
  28.     Left = 116
  29.     Top = 384
  30.     Width = 89
  31.     Height = 33
  32.     Caption = 'Pre&view'
  33.     TabOrder = 0
  34.     OnClick = PreviewClick
  35.     Glyph.Data = {
  36.       78010000424D7801000000000000760000002800000020000000100000000100
  37.       04000000000000000000120B0000120B00000000000000000000000000000000
  38.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  39.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
  40.       0003377777777777777308888888888888807F33333333333337088888888888
  41.       88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
  42.       8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
  43.       8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
  44.       03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
  45.       03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
  46.       33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
  47.       33333337FFFF77333333333000000333333333377777733333330000}
  48.     NumGlyphs = 2
  49.   end
  50.   object Panel2: TPanel
  51.     Left = 16
  52.     Top = 16
  53.     Width = 417
  54.     Height = 357
  55.     TabOrder = 2
  56.     object Bevel3: TBevel
  57.       Left = 8
  58.       Top = 8
  59.       Width = 401
  60.       Height = 37
  61.     end
  62.     object Label4: TLabel
  63.       Left = 17
  64.       Top = 14
  65.       Width = 385
  66.       Height = 19
  67.       Caption = 'This is a demonstration of the TPrintWin Component.'
  68.       Color = clBtnFace
  69.       Font.Color = clMaroon
  70.       Font.Height = -17
  71.       Font.Name = 'Arial'
  72.       Font.Style = []
  73.       ParentColor = False
  74.       ParentFont = False
  75.     end
  76.     object Panel3: TPanel
  77.       Left = 8
  78.       Top = 52
  79.       Width = 401
  80.       Height = 293
  81.       TabOrder = 0
  82.       object Label5: TLabel
  83.         Left = 128
  84.         Top = 8
  85.         Width = 127
  86.         Height = 24
  87.         Caption = 'Some shapes'
  88.         Font.Color = clBlack
  89.         Font.Height = -20
  90.         Font.Name = 'Arial'
  91.         Font.Style = [fsBold]
  92.         ParentFont = False
  93.       end
  94.       object Shape13: TShape
  95.         Left = 16
  96.         Top = 48
  97.         Width = 105
  98.         Height = 41
  99.         Brush.Color = clTeal
  100.       end
  101.       object Shape14: TShape
  102.         Left = 144
  103.         Top = 48
  104.         Width = 105
  105.         Height = 41
  106.         Brush.Color = clTeal
  107.         Brush.Style = bsDiagCross
  108.       end
  109.       object Shape15: TShape
  110.         Left = 272
  111.         Top = 48
  112.         Width = 105
  113.         Height = 41
  114.         Brush.Color = 8404992
  115.         Brush.Style = bsFDiagonal
  116.       end
  117.       object Shape16: TShape
  118.         Left = 16
  119.         Top = 104
  120.         Width = 105
  121.         Height = 41
  122.         Brush.Color = 8404992
  123.         Brush.Style = bsCross
  124.         Shape = stCircle
  125.       end
  126.       object Shape17: TShape
  127.         Left = 144
  128.         Top = 104
  129.         Width = 105
  130.         Height = 41
  131.         Brush.Color = clMaroon
  132.         Brush.Style = bsCross
  133.         Shape = stEllipse
  134.       end
  135.       object Shape18: TShape
  136.         Left = 264
  137.         Top = 104
  138.         Width = 105
  139.         Height = 41
  140.         Brush.Color = clMaroon
  141.         Brush.Style = bsHorizontal
  142.         Shape = stSquare
  143.       end
  144.       object Shape19: TShape
  145.         Left = 16
  146.         Top = 168
  147.         Width = 105
  148.         Height = 41
  149.         Brush.Color = clPurple
  150.         Brush.Style = bsDiagCross
  151.         Shape = stRoundRect
  152.       end
  153.       object Shape20: TShape
  154.         Left = 144
  155.         Top = 168
  156.         Width = 105
  157.         Height = 41
  158.         Brush.Color = clPurple
  159.         Brush.Style = bsDiagCross
  160.         Shape = stRoundSquare
  161.       end
  162.       object Shape21: TShape
  163.         Left = 264
  164.         Top = 168
  165.         Width = 105
  166.         Height = 41
  167.         Brush.Color = clPurple
  168.         Brush.Style = bsDiagCross
  169.         Shape = stSquare
  170.       end
  171.       object Shape22: TShape
  172.         Left = 16
  173.         Top = 232
  174.         Width = 105
  175.         Height = 41
  176.         Brush.Color = clPurple
  177.         Shape = stEllipse
  178.       end
  179.       object Shape23: TShape
  180.         Left = 144
  181.         Top = 232
  182.         Width = 105
  183.         Height = 41
  184.         Brush.Color = clPurple
  185.         Brush.Style = bsVertical
  186.         Shape = stRoundRect
  187.       end
  188.       object Shape24: TShape
  189.         Left = 272
  190.         Top = 232
  191.         Width = 105
  192.         Height = 41
  193.         Brush.Color = clPurple
  194.         Brush.Style = bsVertical
  195.         Shape = stSquare
  196.       end
  197.     end
  198.   end
  199.   object PrintWin1: TPrintWin
  200.     About = 'Version 5.32'
  201.     AboutRegistered = 'TOM SNIDER'
  202.     HeaderFont.Color = clWindowText
  203.     HeaderFont.Height = 16
  204.     HeaderFont.Name = 'Arial'
  205.     HeaderFont.Style = []
  206.     Font.Color = clWindowText
  207.     Font.Height = 16
  208.     Font.Name = 'Arial'
  209.     Font.Style = []
  210.     FooterFont.Color = clWindowText
  211.     FooterFont.Height = 12
  212.     FooterFont.Name = 'Arial'
  213.     FooterFont.Style = []
  214.     FrameObjects = True
  215.     clBtnFaceAsWhite = True
  216.     OutputTo = poViewer
  217.     Orientation = Default
  218.     Units = poInches
  219.     ViewButtonVisible = False
  220.     ShowCancelDialog = True
  221.     LineWidth = 0
  222.     Copies = 1
  223.     GridBackDrop = False
  224.     GridBackDropUnits = poInches
  225.     ZoomPercentage = 25.000000000000000000
  226.     HeaderTop = 0.500000000000000000
  227.     HeaderLeft = 0.500000000000000000
  228.     HeaderStringLeft = '                                  '
  229.     HeaderStringCenter = '                                  '
  230.     HeaderStringRight = '                                  '
  231.     HeaderEnabled = True
  232.     HeaderOutlined = False
  233.     HeaderFilled = False
  234.     TextColor = clBlack
  235.     ViewBkColor = 11234567
  236.     ViewHeading = 'Printit Viewer'
  237.     HeadingColor = clSilver
  238.     FrameStyle = frThin
  239.     FooterTop = 25.130000000000000000
  240.     FooterString = '                                                  '
  241.     FooterEnabled = True
  242.     FooterOutlined = False
  243.     FooterFilled = False
  244.     FixSansSerif = True
  245.     FooterStringLeft = 'Printed on @Date at @Time'
  246.     FooterStringRight = 'Page @Page'
  247.     BorderLeft = 0.500000000000000000
  248.     BorderRight = 0.500000000000000000
  249.     LineSpacing = 2.800000000000000000
  250.     Left = 368
  251.     Top = 72
  252.   end
  253. end
  254.