home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 26 / CD_ASCQ_26_1295.iso / vrac / pzdemo.zip / NEWBUT.FRM < prev    next >
Text File  |  1995-09-07  |  22KB  |  608 lines
  1. VERSION 2.00
  2. Begin Form NewBut 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   3  'Fixed Double
  5.    Caption         =   "Check out these new button and frame features"
  6.    ClientHeight    =   4725
  7.    ClientLeft      =   4125
  8.    ClientTop       =   2055
  9.    ClientWidth     =   6150
  10.    Height          =   5130
  11.    Left            =   4065
  12.    LinkTopic       =   "Form1"
  13.    MaxButton       =   0   'False
  14.    MinButton       =   0   'False
  15.    ScaleHeight     =   4725
  16.    ScaleWidth      =   6150
  17.    Top             =   1710
  18.    Width           =   6270
  19.    Begin PZPanel PZPanel1 
  20.       Alignment       =   6  'Center - TOP
  21.       BackColor       =   &H8000000F&
  22.       BevelOuter      =   1  'Inset
  23.       BevelOuterShading=   6  '3D Frame
  24.       Caption         =   "And show the focus in a variety of ways!"
  25.       Font3D          =   2  'Block Right
  26.       ForeColor       =   &H00800000&
  27.       Height          =   765
  28.       Index           =   2
  29.       Left            =   120
  30.       TabIndex        =   20
  31.       Top             =   3210
  32.       Width           =   5895
  33.       Begin PZPanel Focus 
  34.          AutoClick       =   1  'Command
  35.          BackColor       =   &H8000000F&
  36.          BevelOuter      =   2  'Raised
  37.          BevelOuterShading=   4  'Outlined Button
  38.          BevelOuterWidth =   3
  39.          BorderOuterColor=   &H0000FF00&
  40.          Caption         =   "&Any Combo"
  41.          CaptionPrefix   =   -1  'True
  42.          CornerBackColor =   &H00C0C0C0&
  43.          CornerSize      =   1
  44.          Font3D          =   1  'Block Left
  45.          FontBold        =   0   'False
  46.          FontItalic      =   0   'False
  47.          FontName        =   "MS Sans Serif"
  48.          FontSize        =   8.25
  49.          FontStrikethru  =   0   'False
  50.          FontUnderline   =   0   'False
  51.          ForeColor       =   &H00000080&
  52.          Height          =   405
  53.          Index           =   3
  54.          Left            =   4410
  55.          ShowFocus       =   5
  56.          TabIndex        =   3
  57.          Top             =   270
  58.          Width           =   1320
  59.          WordWrap        =   -1  'True
  60.       End
  61.       Begin PZPanel Focus 
  62.          AutoClick       =   1  'Command
  63.          BackColor       =   &H8000000F&
  64.          BevelOuter      =   2  'Raised
  65.          BevelOuterShading=   4  'Outlined Button
  66.          BevelOuterWidth =   3
  67.          Caption         =   "&Bold Caption"
  68.          CaptionPrefix   =   -1  'True
  69.          CornerBackColor =   &H00C0C0C0&
  70.          CornerSize      =   1
  71.          Font3D          =   1  'Block Left
  72.          FontBold        =   0   'False
  73.          FontItalic      =   0   'False
  74.          FontName        =   "MS Sans Serif"
  75.          FontSize        =   8.25
  76.          FontStrikethru  =   0   'False
  77.          FontUnderline   =   0   'False
  78.          ForeColor       =   &H00000080&
  79.          Height          =   405
  80.          Index           =   2
  81.          Left            =   3000
  82.          ShowFocus       =   4
  83.          TabIndex        =   2
  84.          Top             =   270
  85.          Width           =   1320
  86.          WordWrap        =   -1  'True
  87.       End
  88.       Begin PZPanel Focus 
  89.          AutoClick       =   1  'Command
  90.          BackColor       =   &H8000000F&
  91.          BevelOuter      =   2  'Raised
  92.          BevelOuterShading=   4  'Outlined Button
  93.          BevelOuterWidth =   3
  94.          Caption         =   "Outline &Caption"
  95.          CaptionPrefix   =   -1  'True
  96.          CornerBackColor =   &H00C0C0C0&
  97.          CornerSize      =   1
  98.          Font3D          =   1  'Block Left
  99.          FontBold        =   0   'False
  100.          FontItalic      =   0   'False
  101.          FontName        =   "MS Sans Serif"
  102.          FontSize        =   8.25
  103.          FontStrikethru  =   0   'False
  104.          FontUnderline   =   0   'False
  105.          ForeColor       =   &H00000080&
  106.          Height          =   405
  107.          Index           =   0
  108.          Left            =   1590
  109.          ShowFocus       =   2
  110.          TabIndex        =   1
  111.          Top             =   270
  112.          Width           =   1320
  113.          WordWrap        =   -1  'True
  114.       End
  115.       Begin PZPanel Focus 
  116.          AutoClick       =   1  'Command
  117.          BackColor       =   &H8000000F&
  118.          BevelOuter      =   2  'Raised
  119.          BevelOuterShading=   4  'Outlined Button
  120.          BevelOuterWidth =   3
  121.          Caption         =   "&Outline Border"
  122.          CaptionPrefix   =   -1  'True
  123.          CornerBackColor =   &H00C0C0C0&
  124.          CornerSize      =   1
  125.          Font3D          =   1  'Block Left
  126.          FontBold        =   0   'False
  127.          FontItalic      =   0   'False
  128.          FontName        =   "MS Sans Serif"
  129.          FontSize        =   8.25
  130.          FontStrikethru  =   0   'False
  131.          FontUnderline   =   0   'False
  132.          ForeColor       =   &H00000080&
  133.          Height          =   405
  134.          Index           =   1
  135.          Left            =   180
  136.          ShowFocus       =   1
  137.          TabIndex        =   0
  138.          Top             =   270
  139.          Width           =   1320
  140.          WordWrap        =   -1  'True
  141.       End
  142.    End
  143.    Begin PZPanel PZPanel1 
  144.       Alignment       =   6  'Center - TOP
  145.       BackColor       =   &H8000000F&
  146.       BevelInner      =   1  'Inset
  147.       BevelOuter      =   2  'Raised
  148.       BevelOuterShading=   6  '3D Frame
  149.       Caption         =   "Which can also behave like toggle or radio buttons"
  150.       Font3D          =   2  'Block Right
  151.       ForeColor       =   &H00800000&
  152.       Height          =   1005
  153.       Index           =   1
  154.       Left            =   90
  155.       TabIndex        =   9
  156.       TabStop         =   0   'False
  157.       Top             =   1140
  158.       Width           =   5895
  159.       Begin PZLabel Radio 
  160.          AutoClick       =   4  'Radio
  161.          BackColor       =   &H8000000F&
  162.          BevelOuter      =   2  'Raised
  163.          BevelOuterShading=   6  '3D Frame
  164.          BevelOuterWidth =   3
  165.          BorderOuter     =   3  'Shadow
  166.          BorderOuterColor=   &H00808080&
  167.          BorderOuterWidth=   3
  168.          Caption         =   "&Z Radio"
  169.          CaptionPrefix   =   -1  'True
  170.          CornerSize      =   4
  171.          FontBold        =   0   'False
  172.          FontItalic      =   0   'False
  173.          FontName        =   "MS Sans Serif"
  174.          FontSize        =   8.25
  175.          FontStrikethru  =   0   'False
  176.          FontUnderline   =   0   'False
  177.          ForeColor       =   &H00000080&
  178.          Height          =   525
  179.          Index           =   2
  180.          Left            =   4380
  181.          ShowFocus       =   8
  182.          TabIndex        =   13
  183.          Top             =   360
  184.          Width           =   1245
  185.       End
  186.       Begin PZLabel Radio 
  187.          AutoClick       =   4  'Radio
  188.          BackColor       =   &H8000000F&
  189.          BevelOuter      =   2  'Raised
  190.          BevelOuterShading=   6  '3D Frame
  191.          BevelOuterWidth =   3
  192.          BorderOuter     =   3  'Shadow
  193.          BorderOuterColor=   &H00808080&
  194.          BorderOuterWidth=   3
  195.          Caption         =   "&Y Radio"
  196.          CaptionPrefix   =   -1  'True
  197.          CornerSize      =   4
  198.          FontBold        =   0   'False
  199.          FontItalic      =   0   'False
  200.          FontName        =   "MS Sans Serif"
  201.          FontSize        =   8.25
  202.          FontStrikethru  =   0   'False
  203.          FontUnderline   =   0   'False
  204.          ForeColor       =   &H00000080&
  205.          Height          =   525
  206.          Index           =   1
  207.          Left            =   3000
  208.          ShowFocus       =   8
  209.          TabIndex        =   12
  210.          Top             =   360
  211.          Width           =   1245
  212.       End
  213.       Begin PZLabel Toggle 
  214.          AutoClick       =   3  'Toggle
  215.          BackColor       =   &H8000000F&
  216.          BevelOuter      =   2  'Raised
  217.          BevelOuterShading=   5  '3D Button
  218.          BorderOuter     =   1  'Solid
  219.          Caption         =   "&Just a toggle"
  220.          CaptionPrefix   =   -1  'True
  221.          FontBold        =   0   'False
  222.          FontItalic      =   0   'False
  223.          FontName        =   "MS Sans Serif"
  224.          FontSize        =   8.25
  225.          FontStrikethru  =   0   'False
  226.          FontUnderline   =   0   'False
  227.          ForeColor       =   &H00000080&
  228.          Height          =   525
  229.          Index           =   0
  230.          Left            =   300
  231.          ShowFocus       =   8
  232.          TabIndex        =   11
  233.          Top             =   360
  234.          Width           =   1245
  235.          WordWrap        =   -1  'True
  236.       End
  237.       Begin PZLabel Radio 
  238.          AutoClick       =   4  'Radio
  239.          BackColor       =   &H8000000F&
  240.          BevelOuter      =   2  'Raised
  241.          BevelOuterShading=   6  '3D Frame
  242.          BevelOuterWidth =   3
  243.          BorderOuter     =   3  'Shadow
  244.          BorderOuterColor=   &H00808080&
  245.          BorderOuterWidth=   3
  246.          Caption         =   "&X Radio"
  247.          CaptionPrefix   =   -1  'True
  248.          CornerSize      =   4
  249.          FontBold        =   0   'False
  250.          FontItalic      =   0   'False
  251.          FontName        =   "MS Sans Serif"
  252.          FontSize        =   8.25
  253.          FontStrikethru  =   0   'False
  254.          FontUnderline   =   0   'False
  255.          ForeColor       =   &H00000080&
  256.          Height          =   525
  257.          Index           =   0
  258.          Left            =   1650
  259.          ShowFocus       =   8
  260.          TabIndex        =   10
  261.          Top             =   360
  262.          Width           =   1245
  263.       End
  264.    End
  265.    Begin PZPanel PZPanel1 
  266.       Alignment       =   6  'Center - TOP
  267.       BackColor       =   &H8000000F&
  268.       BevelInner      =   2  'Raised
  269.       BevelOuter      =   1  'Inset
  270.       BevelOuterShading=   6  '3D Frame
  271.       Caption         =   "You can create a variety of command buttons and frames"
  272.       Font3D          =   2  'Block Right
  273.       ForeColor       =   &H00800000&
  274.       Height          =   1035
  275.       Index           =   0
  276.       Left            =   90
  277.       TabIndex        =   4
  278.       TabStop         =   0   'False
  279.       Top             =   60
  280.       Width           =   5895
  281.       Begin PZLabel CmdBut 
  282.          AutoClick       =   1  'Command
  283.          BackColor       =   &H8000000F&
  284.          BevelOuter      =   2  'Raised
  285.          BevelOuterShading=   4  'Outlined Button
  286.          BevelOuterWidth =   3
  287.          Caption         =   "Outlined (old) Style"
  288.          CornerSize      =   1
  289.          FontBold        =   0   'False
  290.          FontItalic      =   0   'False
  291.          FontName        =   "MS Sans Serif"
  292.          FontSize        =   8.25
  293.          FontStrikethru  =   0   'False
  294.          FontUnderline   =   0   'False
  295.          ForeColor       =   &H00800000&
  296.          Height          =   525
  297.          Index           =   3
  298.          Left            =   4380
  299.          ShowFocus       =   8
  300.          TabIndex        =   8
  301.          Top             =   360
  302.          Width           =   1245
  303.          WordWrap        =   -1  'True
  304.       End
  305.       Begin PZLabel CmdBut 
  306.          AutoClick       =   1  'Command
  307.          BackColor       =   &H8000000F&
  308.          BevelOuter      =   2  'Raised
  309.          BevelOuterShading=   5  '3D Button
  310.          Caption         =   "3D Style"
  311.          FontBold        =   0   'False
  312.          FontItalic      =   0   'False
  313.          FontName        =   "MS Sans Serif"
  314.          FontSize        =   8.25
  315.          FontStrikethru  =   0   'False
  316.          FontUnderline   =   0   'False
  317.          ForeColor       =   &H00800000&
  318.          Height          =   525
  319.          Index           =   2
  320.          Left            =   3000
  321.          ShowFocus       =   8
  322.          TabIndex        =   7
  323.          Top             =   360
  324.          Width           =   1245
  325.       End
  326.       Begin PZLabel CmdBut 
  327.          AutoClick       =   1  'Command
  328.          BackColor       =   &H8000000F&
  329.          BevelOuter      =   2  'Raised
  330.          BevelOuterShading=   6  '3D Frame
  331.          Caption         =   "Frame Style"
  332.          FontBold        =   0   'False
  333.          FontItalic      =   0   'False
  334.          FontName        =   "MS Sans Serif"
  335.          FontSize        =   8.25
  336.          FontStrikethru  =   0   'False
  337.          FontUnderline   =   0   'False
  338.          ForeColor       =   &H00800000&
  339.          Height          =   525
  340.          Index           =   1
  341.          Left            =   1620
  342.          ShowFocus       =   8
  343.          TabIndex        =   6
  344.          Top             =   360
  345.          Width           =   1245
  346.       End
  347.       Begin PZLabel CmdBut 
  348.          AutoClick       =   1  'Command
  349.          BackColor       =   &H8000000F&
  350.          BevelOuter      =   2  'Raised
  351.          BevelOuterShading=   5  '3D Button
  352.          BorderOuter     =   1  'Solid
  353.          Caption         =   "3D Style & Outlined"
  354.          FontBold        =   0   'False
  355.          FontItalic      =   0   'False
  356.          FontName        =   "MS Sans Serif"
  357.          FontSize        =   8.25
  358.          FontStrikethru  =   0   'False
  359.          FontUnderline   =   0   'False
  360.          ForeColor       =   &H00800000&
  361.          Height          =   525
  362.          Index           =   0
  363.          Left            =   270
  364.          ShowFocus       =   8
  365.          TabIndex        =   5
  366.          Top             =   360
  367.          Width           =   1245
  368.          WordWrap        =   -1  'True
  369.       End
  370.    End
  371.    Begin PZLabel Tab 
  372.       Alignment       =   6  'Center - TOP
  373.       AutoClick       =   5  'Tab
  374.       BackColor       =   &H00C0C0C0&
  375.       BackStyle       =   2  'Opaque (paint corners)
  376.       BevelOuter      =   2  'Raised
  377.       BevelOuterShading=   4  'Outlined Button
  378.       ButtonState     =   -1  'True
  379.       Caption         =   "Tab &0"
  380.       CaptionPrefix   =   -1  'True
  381.       CornerBackColor =   &H00C0C0C0&
  382.       CornerSize      =   4
  383.       FontBold        =   0   'False
  384.       FontItalic      =   0   'False
  385.       FontName        =   "MS Sans Serif"
  386.       FontSize        =   8.25
  387.       FontStrikethru  =   0   'False
  388.       FontUnderline   =   0   'False
  389.       Height          =   285
  390.       Index           =   0
  391.       Left            =   150
  392.       ShowFocus       =   8
  393.       TabIndex        =   15
  394.       TabStyle        =   1  'Top Tab
  395.       Top             =   2220
  396.       Width           =   1155
  397.    End
  398.    Begin PZLabel o 
  399.       Alignment       =   2  'Left Justify - BOTTOM
  400.       AutoClick       =   2  'Combo
  401.       BackColor       =   &H8000000F&
  402.       BevelOuter      =   2  'Raised
  403.       BevelOuterShading=   4  'Outlined Button
  404.       BevelOuterWidth =   3
  405.       Caption         =   " combined together"
  406.       CornerSize      =   2
  407.       FontBold        =   0   'False
  408.       FontItalic      =   0   'False
  409.       FontName        =   "MS Sans Serif"
  410.       FontSize        =   8.25
  411.       FontStrikethru  =   0   'False
  412.       FontUnderline   =   0   'False
  413.       ForeColor       =   &H00800000&
  414.       Height          =   285
  415.       Left            =   3030
  416.       ShowFocus       =   8
  417.       TabIndex        =   23
  418.       TabStyle        =   2  'Right Tab
  419.       Top             =   2820
  420.       Width           =   1455
  421.    End
  422.    Begin PZLabel Comb 
  423.       Alignment       =   8  'Center - BOTTOM
  424.       AutoClick       =   2  'Combo
  425.       BackColor       =   &H8000000F&
  426.       BevelOuter      =   2  'Raised
  427.       BevelOuterShading=   4  'Outlined Button
  428.       BevelOuterWidth =   3
  429.       Caption         =   "Plus buttons can be"
  430.       CornerSize      =   2
  431.       FontBold        =   0   'False
  432.       FontItalic      =   0   'False
  433.       FontName        =   "MS Sans Serif"
  434.       FontSize        =   8.25
  435.       FontStrikethru  =   0   'False
  436.       FontUnderline   =   0   'False
  437.       ForeColor       =   &H00800000&
  438.       Height          =   405
  439.       Left            =   1500
  440.       ShowFocus       =   8
  441.       TabIndex        =   22
  442.       Top             =   2700
  443.       Width           =   1575
  444.    End
  445.    Begin PZLabel CoolBut 
  446.       AutoClick       =   1  'Command
  447.       BackColor       =   &H00C0C0C0&
  448.       BackStyle       =   2  'Opaque (paint corners)
  449.       BevelOuter      =   2  'Raised
  450.       BevelOuterShading=   5  '3D Button
  451.       BevelOuterWidth =   3
  452.       BorderOuter     =   1  'Solid
  453.       Caption         =   "Click &Here to see more really cool stuff..."
  454.       CaptionMargin   =   4
  455.       CaptionPrefix   =   -1  'True
  456.       CornerBackColor =   &H00C0C0C0&
  457.       CornerSize      =   1
  458.       DirectDraw      =   0   'False
  459.       Font3D          =   2  'Block Right
  460.       FontBold        =   -1  'True
  461.       FontItalic      =   0   'False
  462.       FontName        =   "MS Sans Serif"
  463.       FontSize        =   9.75
  464.       FontStrikethru  =   0   'False
  465.       FontUnderline   =   0   'False
  466.       ForeColor       =   &H00800000&
  467.       GradientColor   =   &H00808080&
  468.       GradientStyle   =   1  'Vertical
  469.       Height          =   615
  470.       IconLeft        =   60
  471.       IconTop         =   2
  472.       Left            =   1440
  473.       Picture         =   NEWBUT.FRX:0000
  474.       ShowFocus       =   8
  475.       TabIndex        =   21
  476.       Top             =   4050
  477.       Width           =   3255
  478.       WordWrap        =   -1  'True
  479.    End
  480.    Begin PZLabel PZLabel1 
  481.       Alignment       =   6  'Center - TOP
  482.       BackColor       =   &H00C0C0C0&
  483.       BevelOuter      =   2  'Raised
  484.       BevelOuterShading=   4  'Outlined Button
  485.       Caption         =   "Or even look and act like tabs"
  486.       Font3D          =   2  'Block Right
  487.       ForeColor       =   &H00800000&
  488.       Height          =   705
  489.       Left            =   150
  490.       TabIndex        =   14
  491.       Top             =   2460
  492.       Width           =   5715
  493.    End
  494.    Begin PZLabel Tab 
  495.       Alignment       =   6  'Center - TOP
  496.       AutoClick       =   5  'Tab
  497.       BackColor       =   &H00C0C0C0&
  498.       BackStyle       =   2  'Opaque (paint corners)
  499.       BevelOuter      =   2  'Raised
  500.       BevelOuterShading=   4  'Outlined Button
  501.       Caption         =   "Tab &1"
  502.       CaptionPrefix   =   -1  'True
  503.       CornerBackColor =   &H00C0C0C0&
  504.       CornerSize      =   4
  505.       FontBold        =   0   'False
  506.       FontItalic      =   0   'False
  507.       FontName        =   "MS Sans Serif"
  508.       FontSize        =   8.25
  509.       FontStrikethru  =   0   'False
  510.       FontUnderline   =   0   'False
  511.       Height          =   285
  512.       Index           =   1
  513.       Left            =   1290
  514.       ShowFocus       =   8
  515.       TabIndex        =   16
  516.       TabStyle        =   1  'Top Tab
  517.       Top             =   2220
  518.       Width           =   1155
  519.    End
  520.    Begin PZLabel Tab 
  521.       Alignment       =   6  'Center - TOP
  522.       AutoClick       =   5  'Tab
  523.       BackColor       =   &H00C0C0C0&
  524.       BackStyle       =   2  'Opaque (paint corners)
  525.       BevelOuter      =   2  'Raised
  526.       BevelOuterShading=   4  'Outlined Button
  527.       Caption         =   "Tab &2"
  528.       CaptionPrefix   =   -1  'True
  529.       CornerBackColor =   &H00C0C0C0&
  530.       CornerSize      =   4
  531.       FontBold        =   0   'False
  532.       FontItalic      =   0   'False
  533.       FontName        =   "MS Sans Serif"
  534.       FontSize        =   8.25
  535.       FontStrikethru  =   0   'False
  536.       FontUnderline   =   0   'False
  537.       Height          =   285
  538.       Index           =   2
  539.       Left            =   2430
  540.       ShowFocus       =   8
  541.       TabIndex        =   17
  542.       TabStyle        =   1  'Top Tab
  543.       Top             =   2220
  544.       Width           =   1155
  545.    End
  546.    Begin PZLabel Tab 
  547.       Alignment       =   6  'Center - TOP
  548.       AutoClick       =   5  'Tab
  549.       BackColor       =   &H00C0C0C0&
  550.       BackStyle       =   2  'Opaque (paint corners)
  551.       BevelOuter      =   2  'Raised
  552.       BevelOuterShading=   4  'Outlined Button
  553.       Caption         =   "Tab &4"
  554.       CaptionPrefix   =   -1  'True
  555.       CornerBackColor =   &H00C0C0C0&
  556.       CornerSize      =   4
  557.       FontBold        =   0   'False
  558.       FontItalic      =   0   'False
  559.       FontName        =   "MS Sans Serif"
  560.       FontSize        =   8.25
  561.       FontStrikethru  =   0   'False
  562.       FontUnderline   =   0   'False
  563.       Height          =   285
  564.       Index           =   4
  565.       Left            =   4710
  566.       ShowFocus       =   8
  567.       TabIndex        =   19
  568.       TabStyle        =   1  'Top Tab
  569.       Top             =   2220
  570.       Width           =   1155
  571.    End
  572.    Begin PZLabel Tab 
  573.       Alignment       =   6  'Center - TOP
  574.       AutoClick       =   5  'Tab
  575.       BackColor       =   &H00C0C0C0&
  576.       BackStyle       =   2  'Opaque (paint corners)
  577.       BevelOuter      =   2  'Raised
  578.       BevelOuterShading=   4  'Outlined Button
  579.       Caption         =   "Tab &3"
  580.       CaptionPrefix   =   -1  'True
  581.       CornerBackColor =   &H00C0C0C0&
  582.       CornerSize      =   4
  583.       FontBold        =   0   'False
  584.       FontItalic      =   0   'False
  585.       FontName        =   "MS Sans Serif"
  586.       FontSize        =   8.25
  587.       FontStrikethru  =   0   'False
  588.       FontUnderline   =   0   'False
  589.       Height          =   285
  590.       Index           =   3
  591.       Left            =   3570
  592.       ShowFocus       =   8
  593.       TabIndex        =   18
  594.       TabStyle        =   1  'Top Tab
  595.       Top             =   2220
  596.       Width           =   1155
  597.    End
  598. End
  599. Option Explicit
  600. 'You will notice that there's almost no code in this form
  601.  
  602. 'That's because Pizazz does everything for you!!!
  603.  
  604. Sub CoolBut_Click ()
  605.     Unload Me
  606. End Sub
  607.  
  608.