home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / demo / btdemo / togg.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1995-02-27  |  3.1 KB  |  96 lines
  1. VERSION 2.00
  2. Begin Form ToggForm 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   0  'None
  5.    Caption         =   "ButtonTool Toggle Effects"
  6.    ClientHeight    =   2040
  7.    ClientLeft      =   2820
  8.    ClientTop       =   1890
  9.    ClientWidth     =   3930
  10.    ControlBox      =   0   'False
  11.    Height          =   2445
  12.    Left            =   2760
  13.    LinkMode        =   1  'Source
  14.    LinkTopic       =   "Form2"
  15.    MaxButton       =   0   'False
  16.    MinButton       =   0   'False
  17.    ScaleHeight     =   2040
  18.    ScaleWidth      =   3930
  19.    Top             =   1545
  20.    Width           =   4050
  21.    Begin BTDEMOButton BTButton3 
  22.       Prop24          =   &H00808000&
  23.       Prop25          =   &H00808000&
  24.       Prop23          =   4
  25.       BackColor       =   &H00808000&
  26.       ButtonDown      =   0  'No effect
  27.       Height          =   2028
  28.       Index           =   4
  29.       Left            =   0
  30.       SymForeColor    =   &H00808080&
  31.       TabIndex        =   0
  32.       Top             =   0
  33.       Width           =   3924
  34.       Begin BTDEMOButton BTButton4 
  35.          Prop25          =   &H00808080&
  36.          Prop23          =   6
  37.          BackColor       =   &H00C0C0C0&
  38.          ButtonDown      =   2  'Invert 3-D colors
  39.          FontColor       =   &H00C0C0C0&
  40.          Height          =   696
  41.          Left            =   1188
  42.          ShowFocus       =   0   'False
  43.          SymForeColor    =   &H00007F00&
  44.          SymPicDown      =   TOGG.FRX:0000
  45.          SymPicUp        =   TOGG.FRX:03DE
  46.          SymType         =   1
  47.          SymXRatio       =   80
  48.          SymYRatio       =   80
  49.          TabIndex        =   3
  50.          Top             =   1116
  51.          Width           =   1608
  52.       End
  53.       Begin BTDEMOButton BTButton2 
  54.          Prop25          =   &H00808080&
  55.          Prop23          =   6
  56.          BackColor       =   &H00C0C0C0&
  57.          ButtonDown      =   2  'Invert 3-D colors
  58.          FontColor       =   &H00C0C0C0&
  59.          Height          =   690
  60.          Left            =   2100
  61.          ShowFocus       =   0   'False
  62.          SymForeColor    =   &H00007F00&
  63.          SymPicDown      =   TOGG.FRX:07D0
  64.          SymPicUp        =   TOGG.FRX:0AD2
  65.          SymType         =   1
  66.          SymXRatio       =   80
  67.          SymYRatio       =   80
  68.          TabIndex        =   2
  69.          ToggleMode      =   -1  'True
  70.          Top             =   300
  71.          Width           =   1605
  72.       End
  73.       Begin BTDEMOButton MainButton 
  74.          Prop25          =   &H00808080&
  75.          Prop23          =   8
  76.          BackColor       =   &H00000000&
  77.          ButtonDown      =   2  'Invert 3-D colors
  78.          Caption         =   "&Toggle"
  79.          Height          =   675
  80.          Index           =   4
  81.          Left            =   180
  82.          ShowFocus       =   0   'False
  83.          SymForeColor    =   &H00007F00&
  84.          TabIndex        =   1
  85.          ToggleMode      =   -1  'True
  86.          Top             =   300
  87.          Width           =   1605
  88.       End
  89.    End
  90. Sub BTButton4_Click ()
  91.     Unload ToggForm
  92. End Sub
  93. Sub OKButton_Click ()
  94.     Unload ToggForm
  95. End Sub
  96.