Subversion Repositories aysalia

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 daniel-mar 1 
VERSION 5.00
2 
Begin VB.Form TheEnd
3 
   BackColor       =   &H00400000&
4 
   BorderStyle     =   0  'None
5 
   Caption         =   "Das Ende"
6 
   ClientHeight    =   5895
7 
   ClientLeft      =   0
8 
   ClientTop       =   0
9 
   ClientWidth     =   8130
10 
   LinkTopic       =   "TheEnd"
11 
   ScaleHeight     =   5895
12 
   ScaleWidth      =   8130
13 
   ShowInTaskbar   =   0   'False
14 
   StartUpPosition =   2  'CenterScreen
15 
   Begin VB.CommandButton Command1
16 
      BackColor       =   &H00FF8080&
17 
      Cancel          =   -1  'True
18 
      Caption         =   "Ende"
19 
      Default         =   -1  'True
20 
      Height          =   375
21 
      Left            =   6960
22 
      Style           =   1  'Graphical
23 
      TabIndex        =   6
24 
      Top             =   5400
25 
      Width           =   975
26 
   End
27 
   Begin VB.Label Label6
28 
      BackStyle       =   0  'Transparent
29 
      Caption         =   "wird auf ewig in die Geschichte Aysalias aufgenommen."
30 
      BeginProperty Font
31 
         Name            =   "Times New Roman"
32 
         Size            =   15.75
33 
         Charset         =   0
34 
         Weight          =   400
35 
         Underline       =   0   'False
36 
         Italic          =   0   'False
37 
         Strikethrough   =   0   'False
38 
      EndProperty
39 
      ForeColor       =   &H00FFFFFF&
40 
      Height          =   825
41 
      Left            =   240
42 
      TabIndex        =   5
43 
      Top             =   4800
44 
      Width           =   6645
45 
   End
46 
   Begin VB.Label Label5
47 
      AutoSize        =   -1  'True
48 
      BackStyle       =   0  'Transparent
49 
      Caption         =   "'Name"
50 
      BeginProperty Font
51 
         Name            =   "Times New Roman"
52 
         Size            =   20.25
53 
         Charset         =   0
54 
         Weight          =   400
55 
         Underline       =   0   'False
56 
         Italic          =   0   'False
57 
         Strikethrough   =   0   'False
58 
      EndProperty
59 
      ForeColor       =   &H0000FFFF&
60 
      Height          =   465
61 
      Left            =   240
62 
      TabIndex        =   4
63 
      Top             =   4200
64 
      Width           =   1005
65 
   End
66 
   Begin VB.Label Label4
67 
      AutoSize        =   -1  'True
68 
      BackStyle       =   0  'Transparent
69 
      Caption         =   "ajek's Tot"
70 
      BeginProperty Font
71 
         Name            =   "Times New Roman"
72 
         Size            =   26.25
73 
         Charset         =   0
74 
         Weight          =   400
75 
         Underline       =   0   'False
76 
         Italic          =   0   'False
77 
         Strikethrough   =   0   'False
78 
      EndProperty
79 
      ForeColor       =   &H000000FF&
80 
      Height          =   600
81 
      Left            =   840
82 
      TabIndex        =   3
83 
      Top             =   240
84 
      Width           =   2010
85 
   End
86 
   Begin VB.Label Label3
87 
      AutoSize        =   -1  'True
88 
      BackStyle       =   0  'Transparent
89 
      Caption         =   "X"
90 
      BeginProperty Font
91 
         Name            =   "Times New Roman"
92 
         Size            =   36
93 
         Charset         =   0
94 
         Weight          =   400
95 
         Underline       =   0   'False
96 
         Italic          =   0   'False
97 
         Strikethrough   =   0   'False
98 
      EndProperty
99 
      ForeColor       =   &H000000C0&
100 
      Height          =   825
101 
      Left            =   360
102 
      TabIndex        =   2
103 
      Top             =   240
104 
      Width           =   525
105 
   End
106 
   Begin VB.Label Label2
107 
      BackStyle       =   0  'Transparent
108 
      Caption         =   $"TheEnd.frx":0000
109 
      BeginProperty Font
110 
         Name            =   "Times New Roman"
111 
         Size            =   15.75
112 
         Charset         =   0
113 
         Weight          =   400
114 
         Underline       =   0   'False
115 
         Italic          =   0   'False
116 
         Strikethrough   =   0   'False
117 
      EndProperty
118 
      ForeColor       =   &H00FFFFFF&
119 
      Height          =   1425
120 
      Left            =   240
121 
      TabIndex        =   1
122 
      Top             =   2640
123 
      Width           =   7335
124 
   End
125 
   Begin VB.Label Label1
126 
      BackStyle       =   0  'Transparent
127 
      Caption         =   $"TheEnd.frx":00D2
128 
      BeginProperty Font
129 
         Name            =   "Times New Roman"
130 
         Size            =   15.75
131 
         Charset         =   0
132 
         Weight          =   400
133 
         Underline       =   0   'False
134 
         Italic          =   0   'False
135 
         Strikethrough   =   0   'False
136 
      EndProperty
137 
      ForeColor       =   &H00FFFFFF&
138 
      Height          =   1545
139 
      Left            =   240
140 
      TabIndex        =   0
141 
      Top             =   1200
142 
      Width           =   7695
143 
   End
144 
End
145 
Attribute VB_Name = "TheEnd"
146 
Attribute VB_GlobalNameSpace = False
147 
Attribute VB_Creatable = False
148 
Attribute VB_PredeclaredId = True
149 
Attribute VB_Exposed = False
150 
Private Sub Command1_Click()
151 
End
152 
End Sub
153 
 
154 
Private Sub Form_Load()
155 
Label5.Caption = nom
156 
End Sub
157