home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_1 / ADDRESS / PRINTX.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1993-07-06  |  1.0 KB  |  36 lines

  1. VERSION 2.00
  2. Begin Form PrintX 
  3.    BorderStyle     =   3  'Fixed Double
  4.    Caption         =   "Printing ..."
  5.    ClientHeight    =   615
  6.    ClientLeft      =   3030
  7.    ClientTop       =   3285
  8.    ClientWidth     =   2175
  9.    Height          =   1020
  10.    Left            =   2970
  11.    LinkTopic       =   "Form1"
  12.    MaxButton       =   0   'False
  13.    MinButton       =   0   'False
  14.    ScaleHeight     =   615
  15.    ScaleWidth      =   2175
  16.    Top             =   2940
  17.    Width           =   2295
  18.    Begin SSCommand Command3D1 
  19.       Caption         =   "&Cancel"
  20.       Font3D          =   3  'Inset w/light shading
  21.       Height          =   375
  22.       Left            =   480
  23.       TabIndex        =   0
  24.       Top             =   120
  25.       Width           =   1215
  26.    End
  27. Sub Command3D1_Click ()
  28. 'PrintCancel is global to allow printout interruption by
  29. 'user
  30. PrintCancel = True
  31. End Sub
  32. Sub Form_Load ()
  33. PrintX.Top = Address.Top + (Address.Height - PrintX.Height) / 2
  34. PrintX.Left = Address.Left + (Address.Width - PrintX.Width) / 2
  35. End Sub
  36.