forked from Alexey-T/CudaLister
-
Notifications
You must be signed in to change notification settings - Fork 0
/
form_main.lfm
171 lines (171 loc) · 3.84 KB
/
form_main.lfm
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
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
object fmMain: TfmMain
Left = 47
Height = 561
Top = 272
Width = 978
BorderStyle = bsNone
Caption = 'fmMain'
ClientHeight = 561
ClientWidth = 978
DesignTimePPI = 144
KeyPreview = True
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
PopupMenu = PopupText
LCLVersion = '2.2.4.0'
object PanelAll: TPanel
Left = 0
Height = 561
Top = 0
Width = 978
Align = alClient
BevelOuter = bvNone
ClientHeight = 561
ClientWidth = 978
TabOrder = 0
object ed: TATSynEdit
Left = 0
Height = 561
Top = 0
Width = 978
Align = alClient
DoubleBuffered = True
Font.Height = -18
Font.Name = 'MS Shell Dlg'
ParentFont = False
TabOrder = 0
TabStop = True
OnKeyDown = edKeyDown
OnClickLink = edClickLink
OnChangeCaretPos = edChangeCaretPos
OnCommand = edCommand
OptLastLineOnTop = True
OptCaretStopUnfocused = False
OptBorderVisible = False
OptBorderWidth = 0
OptBorderWidthFocused = 0
OptRulerVisible = False
OptMarginRight = 2000
OptNumbersStyle = cNumbersEach10th
OptUnprintedSpaces = False
OptUnprintedEnds = False
OptUnprintedEndsDetails = False
end
end
object PopupLexers: TPopupMenu
Left = 258
Top = 122
end
object PopupText: TPopupMenu
OnPopup = PopupTextPopup
Left = 353
Top = 122
object mnuTextUndo: TMenuItem
Caption = 'Undo'
ShortCut = 16474
OnClick = mnuTextUndoClick
end
object mnuTextRedo: TMenuItem
Caption = 'Redo'
ShortCut = 24666
OnClick = mnuTextRedoClick
end
object MenuItem6: TMenuItem
Caption = '-'
end
object mnuTextCut: TMenuItem
Caption = 'Cu&t'
ShortCut = 16472
OnClick = mnuTextCutClick
end
object mnuTextCopy: TMenuItem
Caption = '&Copy'
ShortCut = 16451
OnClick = mnuTextCopyClick
end
object mnuTextPaste: TMenuItem
Caption = '&Paste'
ShortCut = 16470
OnClick = mnuTextPasteClick
end
object mnuTextDelete: TMenuItem
Caption = '&Delete'
OnClick = mnuTextDeleteClick
end
object MenuItem5: TMenuItem
Caption = '-'
end
object mnuTextSel: TMenuItem
Caption = 'Select &all'
ShortCut = 16449
OnClick = mnuTextSelClick
end
object MenuItem4: TMenuItem
Caption = '-'
end
object mnuTextUpperCase: TMenuItem
Caption = '&Upper Case'
ShortCut = 16469
OnClick = mnuTextUpperCaseClick
end
object mnuTextLowerCase: TMenuItem
Caption = '&Lower Case'
ShortCut = 24661
OnClick = mnuTextLowerCaseClick
end
object MenuItem3: TMenuItem
Caption = '-'
end
object mnuTextGoto: TMenuItem
Caption = '&Go to...'
ShortCut = 16455
OnClick = mnuTextGotoClick
end
object mnuTextReadonly: TMenuItem
Caption = '&Read-only'
Checked = True
ShortCut = 16466
OnClick = mnuTextReadonlyClick
end
object mnuTextSave: TMenuItem
Caption = '&Save'
ShortCut = 16467
OnClick = mnuTextSaveClick
end
object MenuItem2: TMenuItem
Caption = '-'
end
object mnuOptions: TMenuItem
Caption = '&Options dialog...'
OnClick = mnuOptionsClick
end
object mnuWrap: TMenuItem
Caption = '&Word wrap'
ShortCut = 16471
OnClick = mnuWrapClick
end
object mnuFind: TMenuItem
Caption = '&Find...'
ShortCut = 16454
OnClick = mnuFindClick
end
end
object PopupEnc: TPopupMenu
Left = 450
Top = 134
end
object TimerStatusbar: TTimer
Enabled = False
Interval = 4000
OnTimer = TimerStatusbarTimer
Left = 569
Top = 150
end
object TimerEmpty: TTimer
Interval = 150
OnTimer = TimerEmptyTimer
Left = 707
Top = 168
end
end