118 lines
3.5 KiB
Plaintext
118 lines
3.5 KiB
Plaintext
VERSION 5.00
|
||
Begin VB.Form frmAbout
|
||
BorderStyle = 1 'Fixed Single
|
||
Caption = "About..."
|
||
ClientHeight = 2535
|
||
ClientLeft = 45
|
||
ClientTop = 435
|
||
ClientWidth = 5175
|
||
BeginProperty Font
|
||
Name = "Tahoma"
|
||
Size = 8.25
|
||
Charset = 0
|
||
Weight = 400
|
||
Underline = 0 'False
|
||
Italic = 0 'False
|
||
Strikethrough = 0 'False
|
||
EndProperty
|
||
Icon = "frmAbout.frx":0000
|
||
LinkTopic = "Form1"
|
||
MaxButton = 0 'False
|
||
MinButton = 0 'False
|
||
ScaleHeight = 2535
|
||
ScaleWidth = 5175
|
||
StartUpPosition = 3 'Windows Default
|
||
Begin VB.CommandButton cmdOK
|
||
Caption = "OK"
|
||
Height = 345
|
||
Left = 3960
|
||
TabIndex = 4
|
||
Top = 840
|
||
Width = 1095
|
||
End
|
||
Begin VB.Label lblAbout
|
||
Caption = $"frmAbout.frx":151A
|
||
Height = 1215
|
||
Index = 1
|
||
Left = 120
|
||
TabIndex = 3
|
||
Top = 1200
|
||
Width = 3615
|
||
End
|
||
Begin VB.Label lblAbout
|
||
Alignment = 2 'Center
|
||
Caption = "Coded by Xeon"
|
||
BeginProperty Font
|
||
Name = "Tahoma"
|
||
Size = 8.25
|
||
Charset = 0
|
||
Weight = 700
|
||
Underline = 0 'False
|
||
Italic = 0 'False
|
||
Strikethrough = 0 'False
|
||
EndProperty
|
||
Height = 255
|
||
Index = 0
|
||
Left = 120
|
||
TabIndex = 2
|
||
Top = 840
|
||
Width = 3615
|
||
End
|
||
Begin VB.Label lblVersion
|
||
BackColor = &H00FFFFFF&
|
||
Caption = "Version 1.0"
|
||
Height = 255
|
||
Left = 840
|
||
TabIndex = 1
|
||
Top = 360
|
||
Width = 3255
|
||
End
|
||
Begin VB.Label lblApplicationTitle
|
||
BackColor = &H00FFFFFF&
|
||
Caption = "Pok<6F>mon Overworld Sprite Editor"
|
||
BeginProperty Font
|
||
Name = "Tahoma"
|
||
Size = 8.25
|
||
Charset = 0
|
||
Weight = 700
|
||
Underline = 0 'False
|
||
Italic = 0 'False
|
||
Strikethrough = 0 'False
|
||
EndProperty
|
||
Height = 255
|
||
Left = 840
|
||
TabIndex = 0
|
||
Top = 120
|
||
Width = 3735
|
||
End
|
||
Begin VB.Image imgProgramIcon
|
||
Height = 480
|
||
Left = 120
|
||
Picture = "frmAbout.frx":162C
|
||
Top = 120
|
||
Width = 480
|
||
End
|
||
Begin VB.Shape shpHeaderBackground
|
||
BackStyle = 1 'Opaque
|
||
BorderStyle = 0 'Transparent
|
||
Height = 735
|
||
Left = 0
|
||
Top = 0
|
||
Width = 6375
|
||
End
|
||
End
|
||
Attribute VB_Name = "frmAbout"
|
||
Attribute VB_GlobalNameSpace = False
|
||
Attribute VB_Creatable = False
|
||
Attribute VB_PredeclaredId = True
|
||
Attribute VB_Exposed = False
|
||
Option Explicit
|
||
|
||
Private Sub cmdOK_Click()
|
||
Unload Me
|
||
End Sub
|
||
|
||
Private Sub Form_Load()
|
||
lblVersion.Caption = "Version " & App.Major & "." & App.Minor & "." & App.Revision & " by Xeon"
|
||
End Sub
|