You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
82 lines
2.2 KiB
Plaintext
82 lines
2.2 KiB
Plaintext
VERSION 5.00
|
|
Object = "{77D82F10-C844-11CF-9663-006008104BEC}#1.0#0"; "VW4start.ocx"
|
|
Begin VB.Form FStart
|
|
BorderStyle = 0 'Kein
|
|
ClientHeight = 11520
|
|
ClientLeft = 45
|
|
ClientTop = 330
|
|
ClientWidth = 15360
|
|
ClipControls = 0 'False
|
|
ControlBox = 0 'False
|
|
MaxButton = 0 'False
|
|
MinButton = 0 'False
|
|
Picture = "FStart.frx":0000
|
|
ScaleHeight = 11520
|
|
ScaleWidth = 15360
|
|
ShowInTaskbar = 0 'False
|
|
StartUpPosition = 2 'Bildschirmmitte
|
|
Begin VW4StartLib.VWStart VWSStart1
|
|
Height = 15
|
|
Left = 2130
|
|
Top = 1725
|
|
Width = 0
|
|
_Version = 65536
|
|
_ExtentX = 0
|
|
_ExtentY = -26
|
|
_StockProps = 33
|
|
ProjectName = "EnterpriseDemo"
|
|
End
|
|
Begin VB.Label Label1
|
|
Alignment = 2 'Zentriert
|
|
AutoSize = -1 'True
|
|
BackStyle = 0 'Transparent
|
|
Caption = "InoTrek-Demo"
|
|
BeginProperty Font
|
|
Name = "StarTrek Film BT"
|
|
Size = 72
|
|
Charset = 0
|
|
Weight = 400
|
|
Underline = 0 'False
|
|
Italic = 0 'False
|
|
Strikethrough = 0 'False
|
|
EndProperty
|
|
ForeColor = &H000065FF&
|
|
Height = 1395
|
|
Left = 1740
|
|
TabIndex = 0
|
|
Top = 4335
|
|
Width = 9615
|
|
End
|
|
End
|
|
Attribute VB_Name = "FStart"
|
|
Attribute VB_GlobalNameSpace = False
|
|
Attribute VB_Creatable = False
|
|
Attribute VB_PredeclaredId = True
|
|
Attribute VB_Exposed = False
|
|
Option Explicit
|
|
|
|
|
|
|
|
Private Sub VWSStart1_FinalizeAppShutdown()
|
|
'Die Prozessdatenbank (VWEManager, VWEKernel, Treiber, OPC-Server, ...)
|
|
'wurde ordentlich geschlossen: Jetzt kann auch das Visual Basic Programm beendet werden.
|
|
End
|
|
End Sub
|
|
|
|
Private Sub VWSStart1_InitReady()
|
|
|
|
frmBack.Show
|
|
frmStartUp.Show
|
|
Me.Hide
|
|
|
|
End Sub
|
|
|
|
Private Sub Form_Load()
|
|
|
|
Label1.Left = (Me.Width - Label1.Width) / 2
|
|
Label1.Top = (Me.Height - Label1.Height) / 2
|
|
|
|
End Sub
|
|
|
|
|