home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / edectl / frmexamp.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1997-07-16  |  4.4 KB  |  152 lines

  1. VERSION 5.00
  2. Object = "{597F0D03-FE03-11D0-9F5E-B42103C10710}#1.0#0"; "EDGECTL.OCX"
  3. Begin VB.Form frmExample 
  4.    BorderStyle     =   3  'Fixed Dialog
  5.    Caption         =   "Break"
  6.    ClientHeight    =   2784
  7.    ClientLeft      =   36
  8.    ClientTop       =   264
  9.    ClientWidth     =   3420
  10.    ControlBox      =   0   'False
  11.    LinkTopic       =   "Form1"
  12.    MaxButton       =   0   'False
  13.    MinButton       =   0   'False
  14.    ScaleHeight     =   2784
  15.    ScaleWidth      =   3420
  16.    ShowInTaskbar   =   0   'False
  17.    StartUpPosition =   2  'CenterScreen
  18.    WhatsThisButton =   -1  'True
  19.    WhatsThisHelp   =   -1  'True
  20.    Begin VB.CommandButton cmdOK 
  21.       Caption         =   "OK"
  22.       Default         =   -1  'True
  23.       Height          =   372
  24.       Left            =   960
  25.       TabIndex        =   12
  26.       Top             =   2280
  27.       Width           =   1092
  28.    End
  29.    Begin VB.CommandButton cmdCancel 
  30.       Cancel          =   -1  'True
  31.       Caption         =   "Cancel"
  32.       Height          =   372
  33.       Left            =   2160
  34.       TabIndex        =   11
  35.       Top             =   2280
  36.       Width           =   1092
  37.    End
  38.    Begin EDGECTLLib.EdgeCtl EdgeCtl3 
  39.       Height          =   132
  40.       Left            =   120
  41.       TabIndex        =   10
  42.       Top             =   1920
  43.       Width           =   3132
  44.       _Version        =   65536
  45.       _ExtentX        =   5524
  46.       _ExtentY        =   233
  47.       _StockProps     =   1
  48.    End
  49.    Begin VB.OptionButton optTwo 
  50.       Caption         =   "&Odd Page"
  51.       Height          =   252
  52.       Index           =   3
  53.       Left            =   1800
  54.       TabIndex        =   9
  55.       Top             =   1560
  56.       Width           =   1212
  57.    End
  58.    Begin VB.OptionButton optTwo 
  59.       Caption         =   "Con&tinuous"
  60.       Height          =   252
  61.       Index           =   2
  62.       Left            =   240
  63.       TabIndex        =   8
  64.       Top             =   1560
  65.       Width           =   1212
  66.    End
  67.    Begin VB.OptionButton optTwo 
  68.       Caption         =   "&Even Page"
  69.       Height          =   252
  70.       Index           =   1
  71.       Left            =   1800
  72.       TabIndex        =   7
  73.       Top             =   1200
  74.       Width           =   1212
  75.    End
  76.    Begin VB.OptionButton optTwo 
  77.       Caption         =   "&Next Page"
  78.       Height          =   252
  79.       Index           =   0
  80.       Left            =   240
  81.       TabIndex        =   6
  82.       Top             =   1200
  83.       Width           =   1212
  84.    End
  85.    Begin EDGECTLLib.EdgeCtl EdgeCtl2 
  86.       Height          =   132
  87.       Left            =   1440
  88.       TabIndex        =   5
  89.       Top             =   840
  90.       Width           =   1812
  91.       _Version        =   65536
  92.       _ExtentX        =   3196
  93.       _ExtentY        =   233
  94.       _StockProps     =   1
  95.    End
  96.    Begin VB.OptionButton optOne 
  97.       Caption         =   "&Column break"
  98.       Height          =   252
  99.       Index           =   1
  100.       Left            =   1800
  101.       TabIndex        =   3
  102.       Top             =   480
  103.       Width           =   1332
  104.    End
  105.    Begin VB.OptionButton optOne 
  106.       Caption         =   "&Page break"
  107.       Height          =   252
  108.       Index           =   0
  109.       Left            =   240
  110.       TabIndex        =   2
  111.       Top             =   480
  112.       Width           =   1212
  113.    End
  114.    Begin EDGECTLLib.EdgeCtl EdgeCtl1 
  115.       Height          =   132
  116.       Left            =   720
  117.       TabIndex        =   1
  118.       Top             =   120
  119.       Width           =   2532
  120.       _Version        =   65536
  121.       _ExtentX        =   4466
  122.       _ExtentY        =   233
  123.       _StockProps     =   1
  124.    End
  125.    Begin VB.Label Label2 
  126.       Caption         =   "Section breaks"
  127.       Height          =   252
  128.       Left            =   120
  129.       TabIndex        =   4
  130.       Top             =   840
  131.       Width           =   1212
  132.    End
  133.    Begin VB.Label Label1 
  134.       Caption         =   "Insert"
  135.       Height          =   252
  136.       Left            =   120
  137.       TabIndex        =   0
  138.       Top             =   120
  139.       Width           =   492
  140.    End
  141. Attribute VB_Name = "frmExample"
  142. Attribute VB_GlobalNameSpace = False
  143. Attribute VB_Creatable = False
  144. Attribute VB_PredeclaredId = True
  145. Attribute VB_Exposed = False
  146. Private Sub cmdCancel_Click()
  147.     frmExample.Hide
  148. End Sub
  149. Private Sub cmdOK_Click()
  150.     frmExample.Hide
  151. End Sub
  152.