home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / tool / various / ctdemo / ct_check.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1995-02-26  |  8.5 KB  |  239 lines
  1. VERSION 2.00
  2. Begin Form w_check_demo 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   1  'Fixed Single
  5.    Caption         =   "Enhanced Standard Controls Demo"
  6.    ClientHeight    =   4410
  7.    ClientLeft      =   885
  8.    ClientTop       =   1425
  9.    ClientWidth     =   7350
  10.    Height          =   4935
  11.    Icon            =   CT_CHECK.FRX:0000
  12.    Left            =   825
  13.    LinkTopic       =   "Form1"
  14.    MaxButton       =   0   'False
  15.    MDIChild        =   -1  'True
  16.    ScaleHeight     =   4410
  17.    ScaleWidth      =   7350
  18.    Top             =   960
  19.    Width           =   7470
  20.    Begin ctGROUP ctGroup2 
  21.       Alignment       =   1  'Right
  22.       BackColor       =   &H00C0C0C0&
  23.       BorderColor     =   &H00808080&
  24.       BorderType      =   4  'Lowered Inset
  25.       Caption         =   "Radio Buttons"
  26.       FontBold        =   0   'False
  27.       FontItalic      =   0   'False
  28.       FontName        =   "MS Sans Serif"
  29.       FontSize        =   9.75
  30.       FontStrikethru  =   0   'False
  31.       FontUnderline   =   0   'False
  32.       ForeColor       =   &H00000000&
  33.       Height          =   2295
  34.       Left            =   4740
  35.       TabIndex        =   7
  36.       TextPosition    =   0  'Top
  37.       Top             =   1800
  38.       Width           =   2115
  39.       Begin ctRADIO ctRadio4 
  40.          Alignment       =   1  'Right Justify
  41.          BackColor       =   &H00C0C0C0&
  42.          Caption         =   "User Defined"
  43.          DisableColor    =   &H00808080&
  44.          ForeColor       =   &H00000000&
  45.          Height          =   315
  46.          Left            =   360
  47.          PicStyle        =   0  'User Defined
  48.          PictureFalse    =   CT_CHECK.FRX:0302
  49.          PictureTrue     =   CT_CHECK.FRX:03F4
  50.          ShowFocus       =   0   'False
  51.          TabIndex        =   11
  52.          Top             =   1620
  53.          Value           =   0   'False
  54.          Width           =   1455
  55.       End
  56.       Begin ctRADIO ctRadio3 
  57.          Alignment       =   1  'Right Justify
  58.          BackColor       =   &H00C0C0C0&
  59.          Caption         =   "Style #3"
  60.          DisableColor    =   &H00808080&
  61.          ForeColor       =   &H00000000&
  62.          Height          =   315
  63.          Left            =   360
  64.          PicStyle        =   3  'Style #3
  65.          ShowFocus       =   -1  'True
  66.          TabIndex        =   10
  67.          Top             =   1200
  68.          Value           =   0   'False
  69.          Width           =   1455
  70.       End
  71.       Begin ctRADIO ctRadio2 
  72.          Alignment       =   1  'Right Justify
  73.          BackColor       =   &H00C0C0C0&
  74.          Caption         =   "Style #2"
  75.          DisableColor    =   &H00808080&
  76.          ForeColor       =   &H00000000&
  77.          Height          =   315
  78.          Left            =   360
  79.          PicStyle        =   2  'Style #2
  80.          ShowFocus       =   -1  'True
  81.          TabIndex        =   9
  82.          Top             =   780
  83.          Value           =   0   'False
  84.          Width           =   1455
  85.       End
  86.       Begin ctRADIO ctRadio1 
  87.          Alignment       =   1  'Right Justify
  88.          BackColor       =   &H00C0C0C0&
  89.          Caption         =   "Style #1"
  90.          DisableColor    =   &H00808080&
  91.          ForeColor       =   &H00000000&
  92.          Height          =   315
  93.          Left            =   360
  94.          PicStyle        =   1  'Style #1
  95.          ShowFocus       =   -1  'True
  96.          TabIndex        =   8
  97.          Top             =   360
  98.          Value           =   0   'False
  99.          Width           =   1455
  100.       End
  101.    End
  102.    Begin ctGROUP ctGroup1 
  103.       Alignment       =   0  'Left
  104.       BackColor       =   &H00C0C0C0&
  105.       BorderColor     =   &H00808080&
  106.       BorderType      =   4  'Lowered Inset
  107.       Caption         =   "Check Buttons "
  108.       FontBold        =   0   'False
  109.       FontItalic      =   0   'False
  110.       FontName        =   "MS Sans Serif"
  111.       FontSize        =   9.75
  112.       FontStrikethru  =   0   'False
  113.       FontUnderline   =   0   'False
  114.       ForeColor       =   &H00000000&
  115.       Height          =   2295
  116.       Left            =   360
  117.       TabIndex        =   2
  118.       TextPosition    =   0  'Top
  119.       Top             =   1800
  120.       Width           =   2115
  121.       Begin ctCHECK ctCheck4 
  122.          Alignment       =   0  'Left Justify
  123.          BackColor       =   &H00C0C0C0&
  124.          Caption         =   "User Defined"
  125.          DisableColor    =   &H00808080&
  126.          ForeColor       =   &H00000000&
  127.          Height          =   315
  128.          Left            =   240
  129.          PicStyle        =   0  'User Defined
  130.          PictureFalse    =   CT_CHECK.FRX:04E6
  131.          PictureTrue     =   CT_CHECK.FRX:05B0
  132.          ShowFocus       =   0   'False
  133.          TabIndex        =   6
  134.          Top             =   1620
  135.          Value           =   0   'False
  136.          Width           =   1575
  137.       End
  138.       Begin ctCHECK ctCheck3 
  139.          Alignment       =   0  'Left Justify
  140.          BackColor       =   &H00C0C0C0&
  141.          Caption         =   "Style #3"
  142.          DisableColor    =   &H00808080&
  143.          ForeColor       =   &H00000000&
  144.          Height          =   315
  145.          Left            =   240
  146.          PicStyle        =   3  'Style #3
  147.          ShowFocus       =   -1  'True
  148.          TabIndex        =   5
  149.          Top             =   1200
  150.          Value           =   0   'False
  151.          Width           =   1575
  152.       End
  153.       Begin ctCHECK ctCheck2 
  154.          Alignment       =   0  'Left Justify
  155.          BackColor       =   &H00C0C0C0&
  156.          Caption         =   "Style #2"
  157.          DisableColor    =   &H00808080&
  158.          ForeColor       =   &H00000000&
  159.          Height          =   315
  160.          Left            =   240
  161.          PicStyle        =   2  'Style #2
  162.          ShowFocus       =   -1  'True
  163.          TabIndex        =   4
  164.          Top             =   780
  165.          Value           =   0   'False
  166.          Width           =   1575
  167.       End
  168.       Begin ctCHECK ctCheck1 
  169.          Alignment       =   0  'Left Justify
  170.          BackColor       =   &H00C0C0C0&
  171.          Caption         =   "Style #1"
  172.          DisableColor    =   &H00808080&
  173.          ForeColor       =   &H00000000&
  174.          Height          =   315
  175.          Left            =   240
  176.          PicStyle        =   1  'Style #1
  177.          ShowFocus       =   -1  'True
  178.          TabIndex        =   3
  179.          Top             =   360
  180.          Value           =   0   'False
  181.          Width           =   1575
  182.       End
  183.    End
  184.    Begin CommandButton Command1 
  185.       Caption         =   "Exit"
  186.       Height          =   375
  187.       Left            =   3060
  188.       TabIndex        =   0
  189.       Top             =   3720
  190.       Width           =   1095
  191.    End
  192.    Begin ctFRAME ctFrame1 
  193.       BackColor       =   &H00C0C0C0&
  194.       BorderColor     =   &H00FFFFFF&
  195.       DistanceApart   =   5
  196.       Height          =   1395
  197.       InnerBorder     =   1  'None
  198.       InnerWidth      =   1
  199.       Left            =   240
  200.       OuterBorder     =   4  'Drop Shadow
  201.       OuterWidth      =   6
  202.       ShadowColor     =   &H00808080&
  203.       ShowBottom      =   -1  'True
  204.       ShowLeft        =   -1  'True
  205.       ShowRight       =   -1  'True
  206.       ShowTop         =   -1  'True
  207.       TabIndex        =   12
  208.       Top             =   180
  209.       Width           =   6855
  210.       Begin Label Label2 
  211.          Alignment       =   2  'Center
  212.          BackColor       =   &H00C0C0C0&
  213.          Caption         =   "This demo uses the ctCHECK (check box), ctRADIO (radio buttons), ctGROUP (group box), and ctFRAME (frame control). These controls offer some enhanced features over their standard counterparts, and offer an easy way to change the look and feel of you windows."
  214.          FontBold        =   0   'False
  215.          FontItalic      =   0   'False
  216.          FontName        =   "MS Sans Serif"
  217.          FontSize        =   9.75
  218.          FontStrikethru  =   0   'False
  219.          FontUnderline   =   0   'False
  220.          ForeColor       =   &H00800000&
  221.          Height          =   1095
  222.          Left            =   180
  223.          TabIndex        =   1
  224.          Top             =   120
  225.          Width           =   6495
  226.       End
  227.    End
  228. Sub Command1_Click ()
  229.    Unload w_check_demo
  230. End Sub
  231. Sub Form_Load ()
  232.    ' Center the window on the screen
  233.    Move (Screen.Width - Width) / 2, (Screen.Height - Height) * .25
  234.    w_mdi_main.bt_check = BUTTON_DISABLE
  235. End Sub
  236. Sub Form_Unload (Cancel As Integer)
  237.    w_mdi_main.bt_check = BUTTON_UP
  238. End Sub
  239.