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
|
object Form1: TForm1
Left = 286
Height = 169
Top = 202
Width = 312
HorzScrollBar.Page = 311
VertScrollBar.Page = 168
ActiveControl = CountWithCritSecButton
Caption = 'Form1'
ClientHeight = 169
ClientWidth = 312
LCLVersion = '1.1'
object Label1: TLabel
Left = 43
Height = 13
Top = 125
Width = 31
Caption = 'Label1'
ParentColor = False
end
object CountWithCritSecButton: TButton
Left = 40
Height = 31
Top = 24
Width = 156
AutoSize = True
BorderSpacing.InnerBorder = 4
Caption = 'Count with critical section'
OnClick = CountWithCritSecButtonClick
TabOrder = 0
end
object CountWithoutCritSecButton: TButton
Left = 40
Height = 31
Top = 64
Width = 172
AutoSize = True
BorderSpacing.InnerBorder = 4
Caption = 'Count without critical section'
OnClick = CountWithoutCritSecButtonClick
TabOrder = 1
end
end
|
