home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / axpanel / form1.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1998-08-20  |  7.4 KB  |  224 lines
  1. VERSION 5.00
  2. Object = "{26E5C4ED-10D0-11D2-BF5B-00A024982E5B}#7.0#0"; "axpanel.ocx"
  3. Begin VB.Form Form1 
  4.    Caption         =   "Form1"
  5.    ClientHeight    =   4335
  6.    ClientLeft      =   60
  7.    ClientTop       =   345
  8.    ClientWidth     =   7605
  9.    LinkTopic       =   "Form1"
  10.    ScaleHeight     =   4335
  11.    ScaleWidth      =   7605
  12.    StartUpPosition =   3  'Windows Default
  13.    Begin axPanelControl.axPanel axPanel8 
  14.       Height          =   330
  15.       Left            =   1935
  16.       Top             =   3195
  17.       Width           =   3990
  18.       _ExtentX        =   7038
  19.       _ExtentY        =   582
  20.       BorderStyle     =   4
  21.       BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  22.          Name            =   "MS Sans Serif"
  23.          Size            =   8.25
  24.          Charset         =   0
  25.          Weight          =   400
  26.          Underline       =   0   'False
  27.          Italic          =   0   'False
  28.          Strikethrough   =   0   'False
  29.       EndProperty
  30.       Text            =   "axPanel"
  31.       TextAlignment   =   4
  32.       FloodType       =   5
  33.       FloodPercent    =   20
  34.       FloodBackColor  =   14737632
  35.    End
  36.    Begin axPanelControl.axPanel axPanel7 
  37.       Align           =   2  'Align Bottom
  38.       Height          =   420
  39.       Left            =   0
  40.       Top             =   3915
  41.       Width           =   7605
  42.       _ExtentX        =   13414
  43.       _ExtentY        =   741
  44.       BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  45.          Name            =   "MS Sans Serif"
  46.          Size            =   8.25
  47.          Charset         =   0
  48.          Weight          =   400
  49.          Underline       =   0   'False
  50.          Italic          =   0   'False
  51.          Strikethrough   =   0   'False
  52.       EndProperty
  53.       Text            =   "Aligned to Bottom"
  54.       TextAlignment   =   7
  55.       TextType        =   1
  56.       BackColor       =   16711935
  57.    End
  58.    Begin axPanelControl.axPanel axPanel6 
  59.       Height          =   1095
  60.       Left            =   270
  61.       Top             =   135
  62.       Width           =   4380
  63.       _ExtentX        =   7726
  64.       _ExtentY        =   1931
  65.       BorderStyle     =   6
  66.       Caption         =   "Frame"
  67.       BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  68.          Name            =   "MS Sans Serif"
  69.          Size            =   8.25
  70.          Charset         =   0
  71.          Weight          =   400
  72.          Underline       =   0   'False
  73.          Italic          =   0   'False
  74.          Strikethrough   =   0   'False
  75.       EndProperty
  76.       TextAlignment   =   4
  77.       BackColor       =   12632256
  78.       Begin VB.TextBox Text1 
  79.          Height          =   510
  80.          Left            =   540
  81.          TabIndex        =   1
  82.          Text            =   "Contains this text box"
  83.          Top             =   405
  84.          Width           =   1860
  85.       End
  86.    End
  87.    Begin axPanelControl.axPanel axPanel5 
  88.       Height          =   330
  89.       Left            =   2745
  90.       Top             =   1440
  91.       Width           =   1635
  92.       _ExtentX        =   2884
  93.       _ExtentY        =   582
  94.       BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  95.          Name            =   "MS Sans Serif"
  96.          Size            =   8.25
  97.          Charset         =   0
  98.          Weight          =   400
  99.          Underline       =   0   'False
  100.          Italic          =   0   'False
  101.          Strikethrough   =   0   'False
  102.       EndProperty
  103.       Text            =   "Scroll Percentage"
  104.       TextAlignment   =   4
  105.    End
  106.    Begin VB.HScrollBar HScroll1 
  107.       Height          =   285
  108.       LargeChange     =   10
  109.       Left            =   2025
  110.       Max             =   100
  111.       TabIndex        =   0
  112.       Top             =   1890
  113.       Width           =   3030
  114.    End
  115.    Begin axPanelControl.axPanel axPanel1 
  116.       Height          =   1815
  117.       Left            =   225
  118.       Top             =   1755
  119.       Width           =   690
  120.       _ExtentX        =   1217
  121.       _ExtentY        =   3201
  122.       BorderStyle     =   4
  123.       BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  124.          Name            =   "MS Sans Serif"
  125.          Size            =   8.25
  126.          Charset         =   0
  127.          Weight          =   400
  128.          Underline       =   0   'False
  129.          Italic          =   0   'False
  130.          Strikethrough   =   0   'False
  131.       EndProperty
  132.       Text            =   "axPanel"
  133.       TextAlignment   =   4
  134.       FloodShowPct    =   -1  'True
  135.       FloodType       =   4
  136.       FloodPercent    =   10
  137.    End
  138.    Begin axPanelControl.axPanel axPanel2 
  139.       Height          =   1815
  140.       Left            =   1080
  141.       Top             =   1755
  142.       Width           =   690
  143.       _ExtentX        =   1217
  144.       _ExtentY        =   3201
  145.       BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  146.          Name            =   "MS Sans Serif"
  147.          Size            =   8.25
  148.          Charset         =   0
  149.          Weight          =   400
  150.          Underline       =   0   'False
  151.          Italic          =   0   'False
  152.          Strikethrough   =   0   'False
  153.       EndProperty
  154.       Text            =   "axPanel"
  155.       TextAlignment   =   4
  156.       FloodShowPct    =   -1  'True
  157.       FloodType       =   3
  158.       FloodPercent    =   10
  159.       ForeColor       =   65535
  160.    End
  161.    Begin axPanelControl.axPanel axPanel3 
  162.       Height          =   375
  163.       Left            =   1935
  164.       Top             =   2295
  165.       Width           =   3120
  166.       _ExtentX        =   5503
  167.       _ExtentY        =   661
  168.       BorderStyle     =   4
  169.       BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  170.          Name            =   "MS Sans Serif"
  171.          Size            =   8.25
  172.          Charset         =   0
  173.          Weight          =   400
  174.          Underline       =   0   'False
  175.          Italic          =   0   'False
  176.          Strikethrough   =   0   'False
  177.       EndProperty
  178.       Text            =   "axPanel"
  179.       TextAlignment   =   4
  180.       FloodShowPct    =   -1  'True
  181.       FloodType       =   1
  182.       FloodPercent    =   10
  183.       BackColor       =   12632256
  184.    End
  185.    Begin axPanelControl.axPanel axPanel4 
  186.       Height          =   375
  187.       Left            =   1935
  188.       Top             =   2745
  189.       Width           =   3120
  190.       _ExtentX        =   5503
  191.       _ExtentY        =   661
  192.       BorderStyle     =   7
  193.       BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  194.          Name            =   "MS Sans Serif"
  195.          Size            =   8.25
  196.          Charset         =   0
  197.          Weight          =   400
  198.          Underline       =   0   'False
  199.          Italic          =   0   'False
  200.          Strikethrough   =   0   'False
  201.       EndProperty
  202.       Text            =   "axPanel"
  203.       TextAlignment   =   4
  204.       FloodType       =   2
  205.       FloodPercent    =   10
  206.       FloodColor      =   255
  207.    End
  208. Attribute VB_Name = "Form1"
  209. Attribute VB_GlobalNameSpace = False
  210. Attribute VB_Creatable = False
  211. Attribute VB_PredeclaredId = True
  212. Attribute VB_Exposed = False
  213. Private Sub Form_Load()
  214.   HScroll1.Value = 10
  215. End Sub
  216. Private Sub HScroll1_Change()
  217.   axPanel1.FloodPercent = HScroll1.Value
  218.   axPanel2.FloodPercent = HScroll1.Value
  219.   axPanel3.FloodPercent = HScroll1.Value
  220.   axPanel4.FloodPercent = HScroll1.Value
  221.   axPanel5.FloodPercent = HScroll1.Value
  222.   axPanel8.FloodPercent = HScroll1.Value
  223. End Sub
  224.