1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
|
object Form1: TForm1
Left = 392
Height = 195
Top = 213
Width = 430
HorzScrollBar.Page = 429
VertScrollBar.Page = 194
BorderStyle = bsDialog
Caption = 'Holy Days'
ClientHeight = 195
ClientWidth = 430
OnShow = Form1SHOW
Position = poDesktopCenter
LCLVersion = '1.9.0.0'
object Bevel1: TBevel
Left = 13
Height = 173
Top = 14
Width = 282
Shape = bsFrame
end
object AshWednesdayLabel: TLabel
Left = 24
Height = 15
Top = 64
Width = 90
Caption = 'Aschermittwoch:'
ParentColor = False
end
object YearLabel: TLabel
Left = 24
Height = 15
Top = 24
Width = 21
Caption = 'Jahr'
ParentColor = False
end
object GoodFridayLabel: TLabel
Left = 24
Height = 15
Top = 81
Width = 54
Caption = 'Karfreitag:'
ParentColor = False
end
object EasterMondayLabel: TLabel
Left = 24
Height = 15
Top = 98
Width = 70
Caption = 'Ostermontag'
ParentColor = False
end
object AscensionDayLabel: TLabel
Left = 24
Height = 15
Top = 115
Width = 68
Caption = 'Himmelfahrt'
ParentColor = False
end
object PentecostLabel: TLabel
Left = 24
Height = 15
Top = 132
Width = 50
Caption = 'Pfingsten'
ParentColor = False
end
object CorpusCristiLabel: TLabel
Left = 24
Height = 15
Top = 149
Width = 73
Caption = 'Fronleichnam'
ParentColor = False
end
object CalculateButton: TButton
Left = 312
Height = 35
Top = 56
Width = 104
Caption = 'Berechne'
OnClick = Button1CLICK
TabOrder = 0
end
object Listbox1: TListBox
Left = 136
Height = 108
Top = 62
Width = 141
ItemHeight = 17
OnDrawItem = Listbox1DrawItem
Options = [lboDrawFocusRect]
Style = lbOwnerDrawFixed
TabOrder = 1
end
object Edit1: TEdit
Left = 136
Height = 23
Top = 24
Width = 141
Alignment = taRightJustify
TabOrder = 2
Text = '2017'
end
object EndButton: TButton
Left = 312
Height = 35
Top = 104
Width = 104
Caption = 'Ende'
OnClick = Button2CLICK
TabOrder = 3
end
object AboutButton: TButton
Left = 312
Height = 35
Top = 152
Width = 104
Caption = 'Info'
OnClick = Button3CLICK
TabOrder = 4
end
object LanguageButton: TButton
Left = 312
Height = 35
Top = 8
Width = 104
Caption = 'English'
OnClick = LanguageButtonCLICK
TabOrder = 5
end
end
|
