home *** CD-ROM | disk | FTP | other *** search
/ CD Shareware Magazine 1999 April / CD_Shareware_Magazine_31.iso / Free / Prg / irc-code.exe / ABOUT.FRM (.txt) next >
Encoding:
Visual Basic Form  |  1996-10-21  |  3.7 KB  |  116 lines
  1. VERSION 4.00
  2. Begin VB.Form about 
  3.    Caption         =   "About IRCPre2"
  4.    ClientHeight    =   4496
  5.    ClientLeft      =   1600
  6.    ClientTop       =   1440
  7.    ClientWidth     =   5648
  8.    Height          =   4880
  9.    Left            =   1536
  10.    LinkTopic       =   "Form2"
  11.    ScaleHeight     =   281
  12.    ScaleMode       =   3  'Pixel
  13.    ScaleWidth      =   353
  14.    Top             =   1120
  15.    Width           =   5776
  16.    Begin VB.CommandButton OK 
  17.       Caption         =   "&OK"
  18.       Height          =   400
  19.       Left            =   4544
  20.       TabIndex        =   8
  21.       Top             =   4032
  22.       Width           =   976
  23.    End
  24.    Begin VB.Frame Frame1 
  25.       Height          =   2896
  26.       Left            =   128
  27.       TabIndex        =   2
  28.       Top             =   1024
  29.       Width           =   5392
  30.       Begin VB.Label Label7 
  31.          AutoSize        =   -1  'True
  32.          Caption         =   "Dasmius can be reached by email at danny@telecomputer.com"
  33.          Height          =   208
  34.          Left            =   128
  35.          TabIndex        =   7
  36.          Top             =   2496
  37.          Width           =   4768
  38.       End
  39.       Begin VB.Label Label6 
  40.          Caption         =   "http://www.telecomputer.com/ircpre"
  41.          ForeColor       =   &H00FF0000&
  42.          Height          =   208
  43.          Left            =   256
  44.          TabIndex        =   6
  45.          Top             =   2112
  46.          Width           =   2768
  47.       End
  48.       Begin VB.Label Label5 
  49.          AutoSize        =   -1  'True
  50.          Caption         =   "The official IRCPre home page is:"
  51.          Height          =   208
  52.          Left            =   128
  53.          TabIndex        =   5
  54.          Top             =   1856
  55.          Width           =   2528
  56.       End
  57.       Begin VB.Label Label4 
  58.          Caption         =   $"about.frx":0000
  59.          ForeColor       =   &H00000000&
  60.          Height          =   848
  61.          Left            =   128
  62.          TabIndex        =   4
  63.          Top             =   832
  64.          Width           =   5136
  65.       End
  66.       Begin VB.Label Label3 
  67.          Caption         =   "IRCPre2 was written by Dasmius. He can be found on EFNet IRC, in the channel #visualbasic."
  68.          Height          =   464
  69.          Left            =   128
  70.          TabIndex        =   3
  71.          Top             =   256
  72.          Width           =   5136
  73.       End
  74.    End
  75.    Begin VB.Label Label2 
  76.       AutoSize        =   -1  'True
  77.       Caption         =   "IRCPre2"
  78.       BeginProperty Font 
  79.          name            =   "Times New Roman"
  80.          charset         =   0
  81.          weight          =   400
  82.          size            =   46.88
  83.          underline       =   0   'False
  84.          italic          =   0   'False
  85.          strikethrough   =   0   'False
  86.       EndProperty
  87.       ForeColor       =   &H00FF0000&
  88.       Height          =   1024
  89.       Left            =   128
  90.       TabIndex        =   1
  91.       Top             =   0
  92.       Width           =   3152
  93.    End
  94.    Begin VB.Label Label1 
  95.       AutoSize        =   -1  'True
  96.       Caption         =   "IRCPre2 Copyright (C) 1996 by Dann M. Daggett II"
  97.       Height          =   208
  98.       Left            =   576
  99.       TabIndex        =   0
  100.       Top             =   4112
  101.       Width           =   3808
  102.    End
  103. Attribute VB_Name = "about"
  104. Attribute VB_Creatable = False
  105. Attribute VB_Exposed = False
  106. Option Explicit
  107. Private Sub Form_Load()
  108.   ' Center myself in the middle of the screen
  109.   Me.Left = (Screen.Width \ 2) - (Me.Width \ 2)
  110.   Me.Top = (Screen.Height \ 2) - (Me.Height \ 2)
  111. End Sub
  112. Private Sub OK_Click()
  113.   ' Close About box
  114.   Unload Me
  115. End Sub
  116.