home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / bp_6_93 / vbwin / vbsetup / setup2.frm < prev    next >
Text File  |  1994-09-23  |  3KB  |  92 lines
  1. VERSION 2.00
  2. Begin Form frm_Setup2 
  3.    BackColor       =   &H00808000&
  4.    ClientHeight    =   6810
  5.    ClientLeft      =   60
  6.    ClientTop       =   60
  7.    ClientWidth     =   9480
  8.    ControlBox      =   0   'False
  9.    FillStyle       =   0  'Solid
  10.    FontBold        =   -1  'True
  11.    FontItalic      =   -1  'True
  12.    FontName        =   "MS Sans Serif"
  13.    FontSize        =   24
  14.    FontStrikethru  =   0   'False
  15.    FontUnderline   =   0   'False
  16.    ForeColor       =   &H00000000&
  17.    Height          =   7215
  18.    Left            =   0
  19.    LinkMode        =   1  'Source
  20.    LinkTopic       =   "Form3"
  21.    MaxButton       =   0   'False
  22.    MinButton       =   0   'False
  23.    ScaleHeight     =   454
  24.    ScaleMode       =   3  'Pixel
  25.    ScaleWidth      =   632
  26.    Top             =   -285
  27.    Width           =   9600
  28.    WindowState     =   2  'Maximized
  29.    Begin Image img_Intro 
  30.       Height          =   5295
  31.       Left            =   180
  32.       Stretch         =   -1  'True
  33.       Top             =   1200
  34.       Width           =   9135
  35.    End
  36.    Begin Label lab_Title 
  37.       BackStyle       =   0  'Transparent
  38.       FontBold        =   -1  'True
  39.       FontItalic      =   0   'False
  40.       FontName        =   "MS Sans Serif"
  41.       FontSize        =   24
  42.       FontStrikethru  =   0   'False
  43.       FontUnderline   =   0   'False
  44.       ForeColor       =   &H80000005&
  45.       Height          =   1035
  46.       Left            =   180
  47.       TabIndex        =   1
  48.       Top             =   180
  49.       Width           =   9135
  50.    End
  51.    Begin Label lab_1 
  52.       Height          =   210
  53.       Left            =   6720
  54.       TabIndex        =   0
  55.       Top             =   6540
  56.       Visible         =   0   'False
  57.       Width           =   2610
  58.    End
  59. End
  60. '============================================================
  61. ' Projekt        : Setup-Steuerung mit Hilfe von Makros
  62. ' Formname       : SETUP2.FRM
  63. ' Aufgabe        : Hauptform
  64. ' Copyright      : Arthur Burda
  65. ' Compiler       : Visual Basic 3.0 fⁿr Windows
  66. '============================================================
  67. ' l. ─nderung am : 27.07.1994
  68. ' Version        : 1.00
  69. ' Bemerkungen    : Erste Implementierung
  70. '------------------------------------------------------------
  71.  
  72. Option Explicit
  73.  
  74. '============================================================
  75. ' Routine : Form_Unload
  76. '============================================================
  77. ' Aufgabe : Wird aufgerufen, wenn das Setup-Hauptfenster ge-
  78. '           schlossen wird und deinstalliert die Windows-Klasse
  79. '           zur 3D-Darstellung von Message-Boxen.
  80. ' Eingabe : Cancel = Abbruch (True oder False)
  81. ' Ausgabe : keine
  82. '------------------------------------------------------------
  83. '
  84. Sub Form_Unload (Cancel As Integer)
  85.  
  86.     Dim Result%
  87.  
  88.     Result% = DoneCtl3D("[]")
  89.  
  90. End Sub
  91.  
  92.