home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / delphi / cbsuite.lzh / SU1SRC.ZIP / FDEMO19.DFM / FDEMO19.txt
Encoding:
Text File  |  1996-12-09  |  11.1 KB  |  502 lines
  1. object Form19: TForm19
  2.   Left = 197
  3.   Top = 366
  4.   BorderStyle = bsDialog
  5.   Caption = 'Demo 19'
  6.   ClientHeight = 367
  7.   ClientWidth = 596
  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 Label1: TLabel
  16.     Left = 11
  17.     Top = 12
  18.     Width = 175
  19.     Height = 18
  20.     Alignment = taCenter
  21.     Caption = 'Panel 1with CheckBoxes'
  22.     Color = clBtnFace
  23.     Font.Color = clNavy
  24.     Font.Height = -15
  25.     Font.Name = 'Arial'
  26.     Font.Style = [fsBold]
  27.     ParentColor = False
  28.     ParentFont = False
  29.   end
  30.   object Label2: TLabel
  31.     Left = 424
  32.     Top = 20
  33.     Width = 105
  34.     Height = 54
  35.     Caption = 'Panel 2 with a Radiogroup on Top'
  36.     Color = clBtnFace
  37.     Font.Color = clNavy
  38.     Font.Height = -15
  39.     Font.Name = 'Arial'
  40.     Font.Style = [fsBold]
  41.     ParentColor = False
  42.     ParentFont = False
  43.     WordWrap = True
  44.   end
  45.   object Label3: TLabel
  46.     Left = 216
  47.     Top = 20
  48.     Width = 127
  49.     Height = 54
  50.     Caption = 'Panel 3 with a DBRadiogroup on Top'
  51.     Color = clBtnFace
  52.     Font.Color = clNavy
  53.     Font.Height = -15
  54.     Font.Name = 'Arial'
  55.     Font.Style = [fsBold]
  56.     ParentColor = False
  57.     ParentFont = False
  58.     WordWrap = True
  59.   end
  60.   object CancelBtn: TBitBtn
  61.     Left = 486
  62.     Top = 330
  63.     Width = 95
  64.     Height = 33
  65.     TabOrder = 0
  66.     Kind = bkCancel
  67.     Margin = 2
  68.     Spacing = -1
  69.     IsControl = True
  70.   end
  71.   object Panel1: TPanel
  72.     Left = 28
  73.     Top = 36
  74.     Width = 121
  75.     Height = 81
  76.     BorderStyle = bsSingle
  77.     TabOrder = 1
  78.     object CheckBox1: TCheckBox
  79.       Left = 12
  80.       Top = 8
  81.       Width = 97
  82.       Height = 17
  83.       Alignment = taLeftJustify
  84.       Caption = 'CheckBox1'
  85.       Font.Color = clFuchsia
  86.       Font.Height = -13
  87.       Font.Name = 'Arial'
  88.       Font.Style = [fsBold]
  89.       ParentFont = False
  90.       TabOrder = 0
  91.     end
  92.     object CheckBox3: TCheckBox
  93.       Left = 12
  94.       Top = 32
  95.       Width = 97
  96.       Height = 17
  97.       Alignment = taLeftJustify
  98.       Caption = 'CheckBox3'
  99.       Font.Color = clFuchsia
  100.       Font.Height = -13
  101.       Font.Name = 'Arial'
  102.       Font.Style = [fsBold]
  103.       ParentFont = False
  104.       TabOrder = 1
  105.     end
  106.     object CheckBox4: TCheckBox
  107.       Left = 12
  108.       Top = 56
  109.       Width = 97
  110.       Height = 17
  111.       Alignment = taLeftJustify
  112.       Caption = 'CheckBox4'
  113.       Font.Color = clFuchsia
  114.       Font.Height = -13
  115.       Font.Name = 'Arial'
  116.       Font.Style = [fsBold]
  117.       ParentFont = False
  118.       TabOrder = 2
  119.     end
  120.   end
  121.   object CheckBox2: TCheckBox
  122.     Left = 212
  123.     Top = 200
  124.     Width = 97
  125.     Height = 17
  126.     Caption = 'CheckBox2'
  127.     Font.Color = clBlack
  128.     Font.Height = -15
  129.     Font.Name = 'Arial'
  130.     Font.Style = [fsBold]
  131.     ParentFont = False
  132.     TabOrder = 2
  133.   end
  134.   object RadioButton1: TRadioButton
  135.     Left = 212
  136.     Top = 176
  137.     Width = 113
  138.     Height = 17
  139.     Caption = 'RadioButton1'
  140.     Font.Color = clBlack
  141.     Font.Height = -15
  142.     Font.Name = 'Arial'
  143.     Font.Style = [fsBold]
  144.     ParentFont = False
  145.     TabOrder = 3
  146.   end
  147.   object RadioGroup1: TRadioGroup
  148.     Left = 16
  149.     Top = 248
  150.     Width = 153
  151.     Height = 89
  152.     Caption = 'RadioGroup1'
  153.     Font.Color = clYellow
  154.     Font.Height = -13
  155.     Font.Name = 'Arial'
  156.     Font.Style = [fsBold]
  157.     ParentFont = False
  158.     TabOrder = 4
  159.   end
  160.   object RadioButton2: TRadioButton
  161.     Left = 28
  162.     Top = 268
  163.     Width = 113
  164.     Height = 17
  165.     Caption = 'RadioButton2'
  166.     Font.Color = clYellow
  167.     Font.Height = -13
  168.     Font.Name = 'Arial'
  169.     Font.Style = [fsBold]
  170.     ParentFont = False
  171.     TabOrder = 5
  172.   end
  173.   object RadioButton3: TRadioButton
  174.     Left = 28
  175.     Top = 288
  176.     Width = 113
  177.     Height = 17
  178.     Caption = 'RadioButton3'
  179.     Font.Color = clYellow
  180.     Font.Height = -13
  181.     Font.Name = 'Arial'
  182.     Font.Style = [fsBold]
  183.     ParentFont = False
  184.     TabOrder = 6
  185.   end
  186.   object RadioButton4: TRadioButton
  187.     Left = 28
  188.     Top = 308
  189.     Width = 113
  190.     Height = 17
  191.     Caption = 'RadioButton4'
  192.     Font.Color = clYellow
  193.     Font.Height = -13
  194.     Font.Name = 'Arial'
  195.     Font.Style = [fsBold]
  196.     ParentFont = False
  197.     TabOrder = 7
  198.   end
  199.   object Panel2: TPanel
  200.     Left = 396
  201.     Top = 72
  202.     Width = 185
  203.     Height = 113
  204.     TabOrder = 8
  205.     object RadioGroup2: TRadioGroup
  206.       Left = 8
  207.       Top = 8
  208.       Width = 169
  209.       Height = 97
  210.       Caption = 'RadioGroup2'
  211.       Font.Color = clOlive
  212.       Font.Height = -15
  213.       Font.Name = 'Arial'
  214.       Font.Style = [fsBold]
  215.       ParentFont = False
  216.       TabOrder = 0
  217.     end
  218.     object RadioButton5: TRadioButton
  219.       Left = 32
  220.       Top = 32
  221.       Width = 113
  222.       Height = 17
  223.       Caption = 'RadioButton5'
  224.       Font.Color = clOlive
  225.       Font.Height = -15
  226.       Font.Name = 'Arial'
  227.       Font.Style = [fsBold]
  228.       ParentFont = False
  229.       TabOrder = 1
  230.     end
  231.     object RadioButton6: TRadioButton
  232.       Left = 32
  233.       Top = 56
  234.       Width = 113
  235.       Height = 17
  236.       Caption = 'RadioButton6'
  237.       Font.Color = clOlive
  238.       Font.Height = -15
  239.       Font.Name = 'Arial'
  240.       Font.Style = [fsBold]
  241.       ParentFont = False
  242.       TabOrder = 2
  243.     end
  244.     object RadioButton7: TRadioButton
  245.       Left = 32
  246.       Top = 80
  247.       Width = 113
  248.       Height = 17
  249.       Caption = 'RadioButton7'
  250.       Font.Color = clOlive
  251.       Font.Height = -15
  252.       Font.Name = 'Arial'
  253.       Font.Style = [fsBold]
  254.       ParentFont = False
  255.       TabOrder = 3
  256.     end
  257.   end
  258.   object DBRadioGroup1: TDBRadioGroup
  259.     Left = 12
  260.     Top = 144
  261.     Width = 169
  262.     Height = 73
  263.     Caption = 'DBRadioGroup1'
  264.     Font.Color = clRed
  265.     Font.Height = -15
  266.     Font.Name = 'Arial'
  267.     Font.Style = [fsBold]
  268.     ParentFont = False
  269.     TabOrder = 9
  270.   end
  271.   object DBCheckBox1: TDBCheckBox
  272.     Left = 24
  273.     Top = 168
  274.     Width = 121
  275.     Height = 17
  276.     Alignment = taLeftJustify
  277.     Caption = 'DBCheckBox1'
  278.     Font.Color = clRed
  279.     Font.Height = -15
  280.     Font.Name = 'Arial'
  281.     Font.Style = [fsBold]
  282.     ParentFont = False
  283.     TabOrder = 10
  284.     ValueChecked = 'True'
  285.     ValueUnchecked = 'False'
  286.   end
  287.   object DBCheckBox2: TDBCheckBox
  288.     Left = 24
  289.     Top = 192
  290.     Width = 121
  291.     Height = 17
  292.     Alignment = taLeftJustify
  293.     Caption = 'DBCheckBox2'
  294.     Font.Color = clRed
  295.     Font.Height = -15
  296.     Font.Name = 'Arial'
  297.     Font.Style = [fsBold]
  298.     ParentFont = False
  299.     TabOrder = 11
  300.     ValueChecked = 'True'
  301.     ValueUnchecked = 'False'
  302.   end
  303.   object Panel3: TPanel
  304.     Left = 192
  305.     Top = 80
  306.     Width = 185
  307.     Height = 81
  308.     TabOrder = 12
  309.     object DBRadioGroup2: TDBRadioGroup
  310.       Left = 8
  311.       Top = 8
  312.       Width = 165
  313.       Height = 65
  314.       Caption = 'DBRadioGroup2'
  315.       Font.Color = clMaroon
  316.       Font.Height = -15
  317.       Font.Name = 'Arial'
  318.       Font.Style = [fsBold]
  319.       ParentFont = False
  320.       TabOrder = 0
  321.     end
  322.     object DBCheckBox3: TDBCheckBox
  323.       Left = 24
  324.       Top = 28
  325.       Width = 121
  326.       Height = 17
  327.       Caption = 'DBCheckBox3'
  328.       Font.Color = clMaroon
  329.       Font.Height = -15
  330.       Font.Name = 'Arial'
  331.       Font.Style = []
  332.       ParentFont = False
  333.       TabOrder = 1
  334.       ValueChecked = 'True'
  335.       ValueUnchecked = 'False'
  336.     end
  337.     object DBCheckBox4: TDBCheckBox
  338.       Left = 24
  339.       Top = 48
  340.       Width = 121
  341.       Height = 17
  342.       Caption = 'DBCheckBox4'
  343.       Font.Color = clMaroon
  344.       Font.Height = -15
  345.       Font.Name = 'Arial'
  346.       Font.Style = []
  347.       ParentFont = False
  348.       TabOrder = 2
  349.       ValueChecked = 'True'
  350.       ValueUnchecked = 'False'
  351.     end
  352.   end
  353.   object Button1: TButton
  354.     Left = 204
  355.     Top = 256
  356.     Width = 117
  357.     Height = 33
  358.     Caption = 'View Panel 1'
  359.     TabOrder = 13
  360.     OnClick = Button1Click
  361.   end
  362.   object Button2: TButton
  363.     Left = 204
  364.     Top = 288
  365.     Width = 117
  366.     Height = 33
  367.     Caption = 'View Panel 2'
  368.     TabOrder = 14
  369.     OnClick = Button2Click
  370.   end
  371.   object Button3: TButton
  372.     Left = 204
  373.     Top = 320
  374.     Width = 117
  375.     Height = 33
  376.     Caption = 'View Panel 3'
  377.     TabOrder = 15
  378.     OnClick = Button3Click
  379.   end
  380.   object Button4: TButton
  381.     Left = 324
  382.     Top = 256
  383.     Width = 185
  384.     Height = 33
  385.     Caption = 'View DBRadioGroup 1'
  386.     TabOrder = 16
  387.     OnClick = Button4Click
  388.   end
  389.   object Button5: TButton
  390.     Left = 324
  391.     Top = 288
  392.     Width = 185
  393.     Height = 33
  394.     Caption = 'View RadioGroup 1'
  395.     TabOrder = 17
  396.     OnClick = Button5Click
  397.   end
  398.   object Button6: TButton
  399.     Left = 324
  400.     Top = 320
  401.     Width = 117
  402.     Height = 33
  403.     Caption = 'View All'
  404.     TabOrder = 18
  405.     OnClick = Button6Click
  406.   end
  407.   object Memo1: TMemo
  408.     Left = 20
  409.     Top = 376
  410.     Width = 561
  411.     Height = 141
  412.     Alignment = taCenter
  413.     Lines.Strings = (
  414.       'This command is trying to View DBRadioGroup1 but the result'
  415.       
  416.         'is that only the the Frame is viewed. The reason for that is tha' +
  417.         't'
  418.       'the DBCheckBoxes displayed inside the DBRadioGroup are'
  419.       'not children of the DBRadioGroup. '
  420.       ''
  421.       'To get past this problem, rather use a TPanel with the '
  422.       'DBRadioGroup on top and then use the Panel as the TWinControl'
  423.       'to print.')
  424.     TabOrder = 19
  425.     Visible = False
  426.   end
  427.   object Memo2: TMemo
  428.     Left = 16
  429.     Top = 380
  430.     Width = 561
  431.     Height = 141
  432.     Alignment = taCenter
  433.     Lines.Strings = (
  434.       'This command is trying to View RadioGroup1 but the result'
  435.       
  436.         'is that only the the Frame is viewed. The reason for that is tha' +
  437.         't'
  438.       'the RadioButtons displayed inside the RadioGroup are'
  439.       'not children of the RadioGroup. '
  440.       ''
  441.       'To get past this problem, rather use a TPanel with the '
  442.       'RadioGroup on top and then use the Panel as the TWinControl'
  443.       'to print like Panel2')
  444.     TabOrder = 20
  445.     Visible = False
  446.   end
  447.   object DBPrintWin1: TDBPrintWin
  448.     About = 'Version 5.32'
  449.     AboutRegistered = 'TOM SNIDER'
  450.     HeaderFont.Color = clWindowText
  451.     HeaderFont.Height = 16
  452.     HeaderFont.Name = 'Arial'
  453.     HeaderFont.Style = []
  454.     Font.Color = clWindowText
  455.     Font.Height = 16
  456.     Font.Name = 'Arial'
  457.     Font.Style = []
  458.     FooterFont.Color = clWindowText
  459.     FooterFont.Height = 12
  460.     FooterFont.Name = 'Arial'
  461.     FooterFont.Style = []
  462.     FrameObjects = True
  463.     clBtnFaceAsWhite = True
  464.     OutputTo = poViewer
  465.     Orientation = Default
  466.     Units = poInches
  467.     ViewButtonVisible = False
  468.     ShowCancelDialog = True
  469.     LineWidth = 0
  470.     Copies = 1
  471.     GridBackDrop = False
  472.     GridBackDropUnits = poInches
  473.     ZoomPercentage = 25.000000000000000000
  474.     HeaderTop = 0.500000000000000000
  475.     HeaderLeft = 0.500000000000000000
  476.     HeaderStringLeft = '                                  '
  477.     HeaderStringCenter = '                                  '
  478.     HeaderStringRight = '                                  '
  479.     HeaderEnabled = True
  480.     HeaderOutlined = False
  481.     HeaderFilled = False
  482.     TextColor = clBlack
  483.     ViewBkColor = 11234567
  484.     ViewHeading = 'Printit Viewer'
  485.     HeadingColor = clSilver
  486.     FrameStyle = frThin
  487.     FooterTop = 10.170000000000000000
  488.     FooterString = '                                                  '
  489.     FooterEnabled = True
  490.     FooterOutlined = False
  491.     FooterFilled = False
  492.     FixSansSerif = True
  493.     FooterStringLeft = 'Printed on @Date at @Time'
  494.     FooterStringRight = 'Page @Page'
  495.     BorderLeft = 0.500000000000000000
  496.     BorderRight = 0.500000000000000000
  497.     LineSpacing = 2.800000000000000000
  498.     Left = 376
  499.     Top = 192
  500.   end
  501. end
  502.