-
Notifications
You must be signed in to change notification settings - Fork 1
/
CheckUnit.fmx
84 lines (84 loc) · 1.87 KB
/
CheckUnit.fmx
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
object CheckForm: TCheckForm
Left = 234
Top = 145
Caption = 'Check Quest'
ClientHeight = 446
ClientWidth = 688
Position = poOwnerFormCenter
OnClose = FormClose
OnCreate = FormCreate
object Memo: TMemo
Position.X = 0.000000000000000000
Position.Y = 0.000000000000000000
Width = 688
Height = 393
Align = alClient
TabOrder = 1
end
object Panel1: TPanel
Position.X = 0.000000000000000000
Position.Y = 393.000000000000000000
Width = 688
Height = 53
Align = alBottom
TabOrder = 0
object Label1: TLabel
Position.X = 120.000000000000000000
Position.Y = 8.000000000000000000
Width = 103
Height = 13
Text = 'Check quest progress'
WordWrap = False
AutoSize = True
end
object btClose: TButton
Position.X = 608.000000000000000000
Position.Y = 16.000000000000000000
Width = 75
Height = 25
Anchors = [akTop, akRight]
Cancel = True
Text = 'Close'
ModalResult = 2
TabOrder = 0
OnClick = btCloseClick
end
object btStop: TButton
Position.X = 8.000000000000000000
Position.Y = 8.000000000000000000
Width = 105
Height = 40
Text = 'STOP'
Margin = 5
TabOrder = 1
OnClick = btStopClick
WordWrap = True
end
object btSave: TButton
Position.X = 528.000000000000000000
Position.Y = 16.000000000000000000
Width = 75
Height = 25
Anchors = [akTop, akRight]
Text = 'Save'
TabOrder = 2
OnClick = btSaveClick
end
object pbCheckQuest: TProgressBar
Position.X = 120.000000000000000000
Position.Y = 24.000000000000000000
Width = 401
Height = 16
Anchors = [akLeft, akTop, akRight]
Max = 14
TabOrder = 3
end
end
object SaveDialog: TSaveDialog
DefaultExt = 'txt'
FileName = 'Check.txt'
Filter = 'Text Document|*.txt|All Documents|*.*'
Left = 488
Top = 416
end
end