home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic 4 Unleashed / Visual_Basic_4_Unleashed_SAMS_Publishing_1995.iso / truegrid / disk1 / callback / callback.$ / ABOUT.FRM (.txt) next >
Encoding:
Visual Basic Form  |  1995-02-17  |  2.8 KB  |  91 lines
  1. VERSION 2.00
  2. Begin Form About 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   3  'Fixed Double
  5.    Caption         =   "TrueGrid Pro 2.1"
  6.    ClientHeight    =   2115
  7.    ClientLeft      =   2355
  8.    ClientTop       =   2625
  9.    ClientWidth     =   4470
  10.    ClipControls    =   0   'False
  11.    ControlBox      =   0   'False
  12.    Height          =   2520
  13.    Left            =   2295
  14.    LinkTopic       =   "Form3"
  15.    MaxButton       =   0   'False
  16.    MinButton       =   0   'False
  17.    ScaleHeight     =   2115
  18.    ScaleWidth      =   4470
  19.    Top             =   2280
  20.    Width           =   4590
  21.    Begin CommandButton OK 
  22.       Caption         =   "&OK"
  23.       Default         =   -1  'True
  24.       Height          =   435
  25.       Left            =   1770
  26.       TabIndex        =   2
  27.       Top             =   915
  28.       Width           =   915
  29.    End
  30.    Begin Image Image1 
  31.       Height          =   480
  32.       Left            =   180
  33.       Picture         =   ABOUT.FRX:0000
  34.       Top             =   840
  35.       Width           =   480
  36.    End
  37.    Begin Label Label3 
  38.       Alignment       =   2  'Center
  39.       BackColor       =   &H00C0C0C0&
  40.       Caption         =   "Copyright (c) Apex Software Corporation, 1994.  All rights reserved."
  41.       FontBold        =   0   'False
  42.       FontItalic      =   0   'False
  43.       FontName        =   "MS Sans Serif"
  44.       FontSize        =   8.25
  45.       FontStrikethru  =   0   'False
  46.       FontUnderline   =   0   'False
  47.       Height          =   435
  48.       Left            =   480
  49.       TabIndex        =   3
  50.       Top             =   1500
  51.       Width           =   3495
  52.    End
  53.    Begin Label Label2 
  54.       Alignment       =   2  'Center
  55.       BackColor       =   &H00C0C0C0&
  56.       Caption         =   "Apex Software Corporation"
  57.       Height          =   255
  58.       Left            =   960
  59.       TabIndex        =   1
  60.       Top             =   585
  61.       Width           =   2535
  62.    End
  63.    Begin Label Label1 
  64.       Alignment       =   2  'Center
  65.       BackColor       =   &H00C0C0C0&
  66.       Caption         =   "Callback Sample"
  67.       FontBold        =   -1  'True
  68.       FontItalic      =   0   'False
  69.       FontName        =   "MS Sans Serif"
  70.       FontSize        =   9.75
  71.       FontStrikethru  =   0   'False
  72.       FontUnderline   =   0   'False
  73.       Height          =   255
  74.       Left            =   840
  75.       TabIndex        =   0
  76.       Top             =   225
  77.       Width           =   2775
  78.    End
  79. Sub CenterForm (F As Form)
  80. ' Center the specified form within the screen
  81.     F.Move (Screen.Width - F.Width) \ 2, (Screen.Height - F.Height) \ 2
  82. End Sub
  83. Sub Form_Load ()
  84.     'Centers the Form on the Screen
  85.     CenterForm About
  86. End Sub
  87. Sub OK_Click ()
  88.     'Unloads the About Box
  89.     Unload About
  90. End Sub
  91.