home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 February / PCWK0296.iso / po7_win / object10 / grapha.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1994-11-10  |  1.1 KB  |  40 lines
  1. VERSION 2.00
  2. Begin Form frmGraphA 
  3.    Caption         =   "Form1"
  4.    ClientHeight    =   3720
  5.    ClientLeft      =   1230
  6.    ClientTop       =   2205
  7.    ClientWidth     =   8370
  8.    Height          =   4125
  9.    Left            =   1170
  10.    LinkTopic       =   "Form1"
  11.    ScaleHeight     =   3720
  12.    ScaleWidth      =   8370
  13.    Top             =   1860
  14.    Width           =   8490
  15.    Begin GRAPH Graph1 
  16.       AsciiExtra      =   "0"
  17.       AutoInc         =   0  'Off
  18.       Height          =   3495
  19.       Left            =   120
  20.       TabIndex        =   0
  21.       TabStop         =   0   'False
  22.       Top             =   120
  23.       Width           =   8115
  24.    End
  25. Sub Form_Load ()
  26.  graph1.Height = frmGraphA.Height - 650
  27.  graph1.Width = frmGraphA.Width - 300
  28.  graph1.Left = 100
  29. End Sub
  30. Sub Form_Resize ()
  31.  If (frmGraphA.Height > 700) And (frmGraphA.Width > 350) Then
  32.   graph1.Height = frmGraphA.Height - 650
  33.   graph1.Width = frmGraphA.Width - 300
  34.   graph1.Left = 100
  35.  End If
  36. End Sub
  37. Sub Graph1_DblClick ()
  38.  Unload frmGraphA
  39. End Sub
  40.